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

Dim g As New GroupTableBuilder("统计表1", DataTables("订单往来"))

Dim dt1 As fxDataSource

g.Groups.AddDef("框架合同编号")

g.Groups.AddDef("下游付款日期", "月")

g.Totals.AddDef("下游付款金额")

dt1=g.Builddatasource()

Dim h As New GroupTableBuilder("统计表2", DataTables("订单往来"))

Dim dt2 As fxDataSource

h.Groups.AddDef("框架合同编号")

h.Groups.AddDef("建设到总包收款日期", "月")

h.Totals.AddDef("建设到总包收款金额")

dt2=h.Builddatasource()

Dim j As New GroupTableBuilder("统计表3", DataTables("分包结算付款明细_对下游_非同步"))

Dim dt3 As fxDataSource

j.Groups.AddDef("框架合同编号")

j.Groups.AddDef("付款日期", "月")

j.Totals.AddDef("付款金额")

dt3=j.Builddatasource()

dt1.Combine("框架合同编号",dt3,"框架合同编号")

dt1.Combine("框架合同编号",dt2,"框架合同编号")

dt1.Show("统计表1")

想让到下游付款日期，到下游付款金额和付款日期，付款金额合并到一起

Dim nms1 As String() = {"框架合同编号","下游付款日期"} '指定连接列

Dim nms2 As String() = {"框架合同编号","建设到总包收款日期"}

Dim nms3 As String() = {"框架合同编号","付款日期"}
dt1.Combine(nms1,dt2,nms2) '将销售统计数据组合到进货统计数据

dt1.Combine(nms1,dt3,nms3)

dt1.Show("统计表1")

谢谢大佬，解决了一部分问题，但是报错，我把那个月给去掉就可以实现一部分

试试

Dim nms As String() = {"框架合同编号","月"} '指定连接列

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

dt1.Combine(nms,dt3,nms)

dt1.Show("统计表1")

主题：分组统计多表统计到一表一列