以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  组合多个统计结果  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=127068)

--  作者:gslxgl
--  发布时间:2018/11/4 16:51:00
--  组合多个统计结果
Dim bd1 As New GroupTableBuilder("统计表1",DataTables("粮食直补"))
Dim dt1 As fxDataSource
bd1.Groups.AddDef("资金名称") \'根据型号分组

bd1.Totals.AddDef("金额","金额") \'对金额进行统计
dt1 = bd1.BuildDataSource()

Dim bd2 As New GroupTableBuilder("统计表2",DataTables("退耕还林"))
Dim dt2  As fxDataSource
bd2.Groups.AddDef("资金名称") \'根据型号分组

bd2.Totals.AddDef("金额","金额") \'对金额进行统计
dt2 = bd2.BuildDataSource()


dt1.Combine("资金名称",dt2,"资金名称") \'将销售统计数据组合到进货统计数据

Tables("资金科目统计_Table1").DataSource = dt1 \'将统计结果绑定到Table



根据以上代码统计结果为:图片点击可在新窗口打开查看


--  作者:y2287958
--  发布时间:2018/11/4 16:53:00
--  
代码未发现异常
--  作者:gslxgl
--  发布时间:2018/11/4 16:56:00
--  
图片点击可在新窗口打开查看图片点击可在新窗口打开查看
--  作者:gslxgl
--  发布时间:2018/11/4 16:57:00
--  
统计后出现金额列和金额1列,如果不要出现金额1列,直接统计到金额列如何改代码


--  作者:y2287958
--  发布时间:2018/11/4 16:58:00
--  
作ie浏览器上传附件或图片
--  作者:gslxgl
--  发布时间:2018/11/4 17:12:00
--  


图片点击可在新窗口打开查看此主题相关图片如下:hkl1w4pa53fd`zv{kb9g8$j.png
图片点击可在新窗口打开查看


--  作者:y2287958
--  发布时间:2018/11/4 17:13:00
--  
上实例+详细说明
--  作者:gslxgl
--  发布时间:2018/11/4 17:20:00
--  

图片点击可在新窗口打开查看此主题相关图片如下:www.png
图片点击可在新窗口打开查看
汇总后成为这样的
--  作者:y2287958
--  发布时间:2018/11/4 17:23:00
--  
组合统计结果是不行了,上例子吧
--  作者:gslxgl
--  发布时间:2018/11/4 17:30:00
--  
 下载信息  [文件大小:   下载次数: ]
图片点击可在新窗口打开查看点击浏览该文件:工作簿1.xlsx

根据粮食直补表和退耕还林表,如何得到统计表