主题：[求助]取得排除重值后的行数

如代码

Dim t as table = tables("表A")
Dim n As Integer = t.DataTable.GetValues("第一列", t.filter).count
msgbox(n)

http://www.foxtable.com/webhelp/scr/2747.htm