我是想在窗口中统计会员信息表的会员数量,下面的“全部会员统计”没有问题可以统计出来,而后面的“银卡会员统计”不出来,还是显示的是总会员数量。
“会员信息表”中有一个“会员级别”列,这一列有:“金卡”“银卡”。我想分别对金卡和银卡做一个统计如何写代码?
'-------------------全部会员统计------------------
Dim hysln As Integer = Tables("会员信息表").Rows.Count
Dim hysl As WinForm.Label = e.Form.Controls("Label50")
hysl.Text = "会员总数为: " & hysln
'-------银卡会员统计-------
Dim ykhysln As Integer = Tables("会员信息表").Rows.Count
Dim ykhysl As WinForm.Label = e.Form.Controls("Label96")
Dim r As Row = Tables("会员信息表").Current
If r IsNot Nothing Then
If r("会员级别") = "银卡" Then
ykhysl.Text = "银卡会员数: " & ykhysln
End If
End If