| 以文本方式查看主题 - Foxtable(狐表) (http://foxtable.net/bbs/index.asp) -- 专家坐堂 (http://foxtable.net/bbs/list.asp?boardid=2) ---- 请教一个问题，怎样才能使隐藏的行不参与汇总统计。 (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=2706) |
| -- 作者：jdtn -- 发布时间：2009/5/6 23:48:00 -- 请教一个问题，怎样才能使隐藏的行不参与汇总统计。 请教一个问题，怎样才能使隐藏的行不参与汇总统计。下面是公式 Dim b As New GroupTableBuilder("发票汇总",DataTables("qr")) b.Groups.AddDef("发票性质") b.Totals.AddDef("发票性质",AggregateEnum.Count,"开票份数") b.Totals.AddDef("合计金额") \'对数量进行统计 b.Build \'生成统计表 Maintable = Tables("发票汇总") \'打开生成的统计表 |
| -- 作者：八婺 -- 发布时间：2009/5/6 23:54:00 -- 分组和交叉统计是针对DataTable，使隐藏行不参与统计估计现在不行。 如果能加个选项倒不错。 [此贴子已经被作者于2009-5-6 23:56:17编辑过]
|
| -- 作者：狐狸爸爸 -- 发布时间：2009/5/7 8:51:00 -- Dim b As New GroupTableBuilder("发票汇总",DataTables("qr")) b.Groups.AddDef("发票性质") b.filter = Tables("发票汇总").Filter b.Totals.AddDef("发票性质",AggregateEnum.Count,"开票份数") b.Totals.AddDef("合计金额") \'对数量进行统计 b.Build |
| -- 作者：kylin -- 发布时间：2009/5/7 9:04:00 -- 以下是引用狐狸爸爸在2009-5-7 8:51:00的发言：
Dim b As New GroupTableBuilder("发票汇总",DataTables("qr")) b.Groups.AddDef("发票性质") b.filter = Tables("发票汇总").Filter b.Totals.AddDef("发票性质",AggregateEnum.Count,"开票份数") b.Totals.AddDef("合计金额") \'对数量进行统计 b.Build 学习了，呵呵 |
| -- 作者：yangming -- 发布时间：2009/5/7 10:14:00 -- 以下是引用狐狸爸爸在2009-5-7 8:51:00的发言：
Dim b As New GroupTableBuilder("发票汇总",DataTables("qr")) b.Groups.AddDef("发票性质") b.filter = Tables("发票汇总").Filter b.Totals.AddDef("发票性质",AggregateEnum.Count,"开票份数") b.Totals.AddDef("合计金额") \'对数量进行统计 b.Build 学习了!呵呵 |
| -- 作者：老有所乐 -- 发布时间：2009/5/7 15:57:00 -- 我试了一下，用菜单上的隐藏行，为是么有没有这个b.filter = Tables("发票汇总").Filter 都一样,仍然将隐藏行数据参与统计。 |
| -- 作者：狐狸爸爸 -- 发布时间：2009/5/7 16:29:00 -- 菜单的隐藏行，不是通过筛选实现的。 |
| -- 作者：老有所乐 -- 发布时间：2009/5/7 16:35:00 -- 谢谢！明白 |
| -- 作者：八婺 -- 发布时间：2009/5/7 17:44:00 -- 以下是引用八婺在2009-5-6 23:54:00的发言：
分组和交叉统计是针对DataTable，使隐藏行不参与统计估计现在不行。
|
| -- 作者：jdtn -- 发布时间：2009/5/7 22:16:00 -- 谢谢会用了， Dim b As New GroupTableBuilder("发票汇总",DataTables("qr")) b.Groups.AddDef("发票性质") b.filter = Tables("发票汇总").Filter。这里是("qr")不是("发票汇总"). b.Totals.AddDef("发票性质",AggregateEnum.Count,"开票份数") b.Totals.AddDef("合计金额") \'对数量进行统计 b.Build \'生成统计表 Maintable = Tables("发票汇总") \'打开生成的统计表 |