以文本方式查看主题

-  Foxtable(狐表)  (http://www.foxtable.com/bbs/index.asp)
--  专家坐堂  (http://www.foxtable.com/bbs/list.asp?boardid=2)
----  筛选后分组统计的问题,请教各位  (http://www.foxtable.com/bbs/dispbbs.asp?boardid=2&id=64079)

--  作者:bagih
--  发布时间:2015/2/4 14:17:00
--  筛选后分组统计的问题,请教各位
在系统菜单工具栏里,筛选后进行‘分组统计’,运行正常。

筛选后,我把生成的‘分组统计’代码放在窗口按钮单击事件里,统计的不是筛选后的记录,是全部的,该怎么处理。谢谢各位老师,请指教。


分组统计代码:
Dim g As New GroupTableBuilder("打款清单", DataTables("总台账"))
g.Groups.AddDef("会员卡号")
g.Groups.AddDef("业务员")
g.Totals.AddDef("保费")
g.Totals.AddDef("佣金金额", "金额")
g.VerticalTotal = True
g.Build()
MainTable = Tables("打款清单")

--  作者:有点甜
--  发布时间:2015/2/4 14:27:00
--  
Dim g As New GroupTableBuilder("打款清单", DataTables("总台账"))
g.Groups.AddDef("会员卡号")
g.Groups.AddDef("业务员")
g.Totals.AddDef("保费")
g.Totals.AddDef("佣金金额", "金额")
g.VerticalTotal = True
g.Filter = Tables("总台账").Filter
g.Build()
MainTable = Tables("打款清单")

--  作者:bagih
--  发布时间:2015/2/4 14:32:00
--  
么么,谢谢BIN老师,可以了