以文本方式查看主题

-  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=139299)

--  作者:happyft
--  发布时间:2019/8/10 10:29:00
--  筛选后如果显示交叉统计的汇总数据?
Dim b As New CrossTableBuilder("统计表1",dt)
b.HGroups.AddDef("产品编码") \'添加客户列用于水平分组
b.HGroups.AddDef("品名") \'添加客户列用于水平分组
b.HGroups.AddDef("规格") \'添加客户列用于水平分组
b.HGroups.AddDef("客户") \'添加客户列用于水平分组
b.VGroups.AddDef("进出日期",DateGroupEnum.Year,"{0}年") \'添加产品列用于垂直分组,并设置了Pattern参数
b.VGroups.AddDef("进出日期",DateGroupEnum.Month,"{0}月") \'添加产品列用于垂直分组,并设置了Pattern参数
b.VGroups.AddDef("进出日期",DateGroupEnum.Week,"{0}周") \'添加产品列用于垂直分组,并设置了Pattern参数
b.VGroups.AddDef("进出日期",DateGroupEnum.Day,"{0}日") \'添加产品列用于垂直分组,并设置了Pattern参数
b.Totals.AddDef("累计出货") \'添加数量列用于统计
b.Totals.AddDef("出货金额") \'添加数量列用于统计
b.Totals.AddDef("累计退货") \'添加数量列用于统计
b.Totals.AddDef("退货金额") \'添加数量列用于统计
b.HorizontalTotal = True \'水平方向自动汇总
b.VerticalTotal = True \'垂直方向自动汇总

上面的红色代码在交叉统计后最下方会显示合计,但如果统计后对表进行筛选,那个合计就不见了,筛选后如何按筛选的数据同样显示合计,
不会是要重新汇总吧?

谢谢!

--  作者:有点蓝
--  发布时间:2019/8/10 10:36:00
--  
筛选后重新调用合计代码
参考:http://www.foxtable.com/webhelp/topics/2750.htm