关于快捷菜单里分组统计和控件里的分组统计 - 专家坐堂 - Foxtable(狐表) - 新一代数据库软件，完美融合Access、Foxpro、Excel、vb.net之优势，人人都能掌握的快速软件开发工具!

Foxtable(狐表) → 用户栏目 → 专家坐堂 → 关于快捷菜单里分组统计和控件里的分组统计

共有6875人关注过本帖树形打印复制链接主题：关于快捷菜单里分组统计和控件里的分组统计

dingjuan

小大 1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

等级：幼狐帖子：153 积分：1356 威望：0 精华：0 注册：2012/4/22 15:29:00

关于快捷菜单里分组统计和控件里的分组统计 发帖心情

Post By：2012/8/8 0:53:00 [只看该作者]

关于快捷菜单里分组统计和控件里的分组统计，统计出来的结果不一样。

快捷菜单里的是如下的代码：

Dim g As New GroupTableBuilder("统计表1", DataTables("明细"))
g.Groups.AddDef("单价")
g.Totals.AddDef("实际吨位")
g.Build()
MainTable = Tables("统计表1")

当我把这个代码复制到‘窗口’里的‘按钮’控件里后。

两者的结果不一样，原因在于：快捷菜单里的分组统计只统计了筛选后的数据。而窗口里的按钮控件统计出来的是全部数据的结果。

主要差异在于：筛选与否！！！

我希望能够在‘按钮’控件里达到统计经过筛选后的数据，即达到和按快捷菜单里的‘分组统计’的效果！

求高人呀~~求求求~~~~

狐狸爸爸

小大 3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

等级：管理员帖子：47497 积分：251403 威望：0 精华：91 注册：2008/6/17 17:14:00

Post By：2012/8/8 8:58:00 [只看该作者]

你要是想只统计筛选出来的结果：

Dim g As New GroupTableBuilder("统计表1", DataTables("明细"))
g.Groups.AddDef("单价")
g.Totals.AddDef("实际吨位")

g.Filter = Tables("明细").Filter
g.Build()
MainTable = Tables("统计表1")

dingjuan

小大 5楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

等级：幼狐帖子：153 积分：1356 威望：0 精华：0 注册：2012/4/22 15:29:00

请教狐爸，需要加1个条件的情况下，按照下面加，无效果，应该怎么加？[单价]＞0 发帖心情

Post By：2012/8/9 1:33:00 [只看该作者]

Dim g As New GroupTableBuilder("统计表1", DataTables("明细"))

g.Groups.AddDef("单价")

g.Totals.AddDef("实际吨位")

g.Filter = "[单价] > 0"

g.Filter = Tables("明细").Filter

g.Build()

MainTable = Tables("统计表1")