主题：[求助] 统计总数问题

Dim hysln As Integer = Tables("会员信息表").Compute("Count(会员级别)", "会员级别 = '金卡'")
Dim hysl As WinForm.Label = e.Form.Controls("Label50")
hysl.Text = "会员总数为:  " & hysln

'-------银卡会员统计-------
Dim ykhysln As Integer = Tables("会员信息表").Compute("Count(会员级别)", "会员级别 = '银卡'")
Dim ykhysl As WinForm.Label = e.Form.Controls("Label96")
ykhysl.Text = "银卡会员数:  " & ykhysln

http://www.foxtable.com/help/topics/0393.htm