以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  RepeatFilter,不统计重复的~  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=121673)

--  作者:fubblyc
--  发布时间:2018/7/11 14:21:00
--  RepeatFilter,不统计重复的~
甜老师,问题如下:

forms("盘点明细表").Controls("table1").Table.DataTable.loadfilter = filter
forms("盘点明细表").Controls("table1").Table.DataTable.load(False)

forms("盘点明细表").Controls("table1").Table.RepeatFilter("扫码时间条码",1)  //加载出来去掉重复的,但是下面的统计,不会统计筛选后的table,而是还是筛选前的 datatable ,还是把重复的算进来了,有什么办法可以解决吗

Dim b As New GroupTableBuilder("统计表1",DataTables("盘点明细表"))
b.Groups.AddDef("门店名称") \'根据产品分组
b.Groups.AddDef("盘点日期",DateGroupEnum.none) \'根据产品分组
b.Groups.AddDef("姓名") \'根据产品分组
b.Groups.AddDef("库位") \'根据产品分组
b.Groups.AddDef("条码") \'根据产品分组
\'b.Groups.AddDef("货号") \'根据产品分组
b.Totals.AddDef("数量") \'对数量进行统计
b.filter = filter
b.Build \'生成统计表
forms("盘点明细表").Controls("table2").Table.DataSource = b.BuildDataSource

--  作者:有点蓝
--  发布时间:2018/7/11 14:47:00
--  
方法1、按筛选条件重新加载这个表
2、循环所有行,把重复的移除
可以参考:http://www.foxtable.com/bbs/dispbbs.asp?BoardID=2&ID=83243