以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  [求助]窗口表指定列不重复计数  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=126978)
--  作者：天一生水
--  发布时间：2018/11/2 9:43:00
--  [求助]窗口表指定列不重复计数

下面的代码是对datatable的计数，如果对窗口表筛选后的行计数，怎样写？

谢谢！

Dim acs As List(Of String) = Tables("统计汇总_Table1").DataTable.GetValues("案号")
Dim cnt As Integer = acs.Count
e.Form.Controls("案件数1").text = cnt
--  作者：有点甜
--  发布时间：2018/11/2 9:44:00
--  

 

Dim acs As List(Of String) = Tables("统计汇总_Table1").DataTable.GetValues("案号", Tables("统计汇总_Table1").Filter)
Dim cnt As Integer = acs.Count
e.Form.Controls("案件数1").text = cnt

 

[此贴子已经被作者于2018/11/2 9:44:20编辑过]