我是想在窗口中统计会员信息表的会员数量，下面的“全部会员统计”没有问题可以统计出来，而后面的“银卡会员统计”不出来，还是显示的是总会员数量。
“会员信息表”中有一个“会员级别”列，这一列有：“金卡”“银卡”。我想分别对金卡和银卡做一个统计如何写代码？
'-------------------全部会员统计------------------
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
加好友 
发短信
Post By：2014/10/14 10:15:00 [显示全部帖子]
