合并多个组合统计结果，合计行跑到中间了，该怎么调整到最后一行啊。 - 专家坐堂 - Foxtable(狐表) - 新一代数据库软件，完美融合Access、Foxpro、Excel、vb.net之优势，人人都能掌握的快速软件开发工具!

此主题相关图片如下：微信截图_20201021172117.png

Dim bd11 As New sqlGroupTableBuilder("统计表2","现金余额表")

bd11.C

Dim dt11 As fxDataSource

bd11.Groups.AddDef("公司缩写") '根据型号分组

bd11.Groups.AddDef("银行账户") '根据型号分组

bd11.Totals.AddDef("余额") '对金额进行统计

bd11.VerticalTotal = True

dt11 = bd11.BuildDataSource()

Dim bd21 As New sqlGroupTableBuilder("统计表21","资金冻结情况表")

bd21.C

bd21.filter="类别='日提'"

Dim dt21 As fxDataSource

bd21.Groups.AddDef("公司缩写") '根据型号分组

bd21.Groups.AddDef("银行账户") '根据型号分组

bd21.Totals.AddExp("日提余额","isnull(申购金额,0)-isnull(赎回本金,0)") '对金额进行统计

bd21.VerticalTotal = True

dt21 = bd21.BuildDataSource()

Dim str11 As String = DataTables("资金冻结情况表").sqlGetcomboliststring("编号","类别='滚动' and 申购金额>0 and 结束确认人 is null").replace("|","','")

Dim bd31 As New sqlGroupTableBuilder("统计表22","资金冻结情况表")

bd31.C

Dim dt31 As fxDataSource

bd31.filter= "编号 In ('" & str11 & "')"

bd31.Groups.AddDef("公司缩写") '根据型号分组

bd31.Groups.AddDef("银行账户") '根据型号分组

bd31.Totals.AddExp("滚动余额","isnull(申购金额,0)-isnull(赎回本金,0)") '对金额进行统计

bd31.VerticalTotal = True

dt31 = bd31.BuildDataSource()

Dim str12 As String = DataTables("资金冻结情况表").sqlGetcomboliststring("编号","类别='定期' and 申购金额>0 and 结束确认人 is null").replace("|","','")

Dim bd41 As New sqlGroupTableBuilder("统计表23","资金冻结情况表")

bd41.C

Dim dt41 As fxDataSource

bd41.filter= "编号 In ('" & str12 & "')"

bd41.Groups.AddDef("公司缩写") '根据型号分组

bd41.Groups.AddDef("银行账户") '根据型号分组

bd41.Totals.AddExp("定期余额","isnull(申购金额,0)-isnull(赎回本金,0)") '对金额进行统计

bd41.VerticalTotal = True

dt41 = bd41.BuildDataSource()

Dim nms As String() = {"公司缩写","银行账户"} '指定连接列

dt11.Combine(nms,dt21,nms) '将销售统计数据组合到进货统计数据

dt11.Combine(nms,dt31,nms) '将退货统计数据组合到进货统计数据

dt11.Combine(nms,dt41,nms) '将退货统计数据组合到进货统计数据

dt11.show("统计表2")

DataTables("统计表2").DataCols.Add("合计",Gettype(Double), "iif(余额 is null,0,余额)+iif(日提余额 is null,0,日提余额)+iif(滚动余额 is null,0,滚动余额)+iif(定期余额 is null,0,定期余额)")

主题：合并多个组合统计结果，合计行跑到中间了，该怎么调整到最后一行啊。