不同字段名称如何进行组合统计？ - 专家坐堂 - Foxtable(狐表) - 新一代数据库软件，完美融合Access、Foxpro、Excel、vb.net之优势，人人都能掌握的快速软件开发工具!

Foxtable(狐表) → 用户栏目 → 专家坐堂 → 不同字段名称如何进行组合统计？

共有7014人关注过本帖树形打印复制链接主题：不同字段名称如何进行组合统计？

地瓜

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

加好友

发短信

等级：小狐帖子：382 积分：3007 威望：0 精华：0 注册：2012/8/30 16:09:00

不同字段名称如何进行组合统计？ 发帖心情

Post By：2017/1/25 11:11:00 [只看该作者]

在作组合统计是，由于在表设计时，表的字段不同，如何进行组合统计？谢谢！

此主题相关图片如下：tbltotalcglx.jpg

这是“采购立项汇总表”

此主题相关图片如下：tblcgba.jpg

这是“备案表”

此主题相关图片如下：tblcgys.jpg

这是“预算表”

要实现的思路是：根据采购单位和品目名称计算结余的金额：即是预算表中的金额-采购立项汇总表的金额-备案表中的金额

有点蓝

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

加好友

发短信

等级：超级版主帖子：111414 积分：567140 威望：0 精华：9 注册：2015/6/24 9:21:00

Post By：2017/1/25 11:45:00 [只看该作者]

组合统计和列名称是否一致没有必然的关系。不同的名称还更好处理，少了重命名的代码。用法完全一样

Dim bd1 As New GroupTableBuilder("统计表1",DataTables("进货单"))
Dim dt1 As fxDataSource
bd1.Groups.AddDef("型号") '根据型号分组
bd1.Totals.AddDef("数量A") '对数量进行统计
bd1.Totals.AddDef("金额A") '对金额进行统计
dt1 = bd1.BuildDataSource()

Dim bd2 As New GroupTableBuilder("统计表2",DataTables("销售单"))
Dim dt2 As fxDataSource
bd2.Groups.AddDef("型号") '根据型号分组
bd2.Totals.AddDef("数量B") '对数量进行统计
bd2.Totals.AddDef("金额B") '对金额进行统计
dt2 = bd2.BuildDataSource()

Dim bd3 As New GroupTableBuilder("统计表3",DataTables("退货单"))
Dim dt3 As fxDataSource
bd3.Groups.AddDef("型号") '根据型号分组
bd3.Totals.AddDef("数量X") '对数量进行统计
bd3.Totals.AddDef("金额X") '对金额进行统计
dt3 = bd3.BuildDataSource()

地瓜

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

加好友

发短信

等级：小狐帖子：382 积分：3007 威望：0 精华：0 注册：2012/8/30 16:09:00

Post By：2017/1/25 11:46:00 [只看该作者]

设计代码如下：

此主题相关图片如下：设计代码.jpg

提示错误：

此主题相关图片如下：错误提示.jpg

地瓜

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

加好友

发短信

等级：小狐帖子：382 积分：3007 威望：0 精华：0 注册：2012/8/30 16:09:00

Post By：2017/1/25 11:52:00 [只看该作者]

是按照帮助的例子作的，想实现的效果如下：

此主题相关图片如下：组合统计的效果.jpg

谢谢！

有点蓝

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

加好友

发短信

等级：超级版主帖子：111414 积分：567140 威望：0 精华：9 注册：2015/6/24 9:21:00

Post By：2017/1/25 11:54:00 [只看该作者]

改为SQLGroupTableBuilder试试

地瓜

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

加好友

发短信

等级：小狐帖子：382 积分：3007 威望：0 精华：0 注册：2012/8/30 16:09:00

Post By：2017/1/25 11:56:00 [只看该作者]

有这方面的例子吗？谢谢！

有点蓝

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

加好友

发短信

等级：超级版主帖子：111414 积分：567140 威望：0 精华：9 注册：2015/6/24 9:21:00

Post By：2017/1/25 11:58:00 [只看该作者]

代码一样啊

Dim bd1 As New SQLGroupTableBuilder("统计表1",DataTables("进货单"))
Dim dt1 As fxDataSource
bd1.Groups.AddDef("型号") '根据型号分组
bd1.Totals.AddDef("数量A") '对数量进行统计
bd1.Totals.AddDef("金额A") '对金额进行统计
dt1 = bd1.BuildDataSource()