请问,如何把两组代码产生的临时表数据和在一个表中?
Dim g As New GroupTableBuilder("统计表1", DataTables("坯布输入"))
g.Groups.AddDef("年")
g.Groups.AddDef("月")
g.Groups.AddDef("产品名称")
g.Totals.AddDef("匹数", "下机坯布_累计")
g.Totals.AddDef("总长", "长度_累计")
g.Totals.AddDef("织造车间扣分", "扣分_累计")
g.Totals.AddDef("总重", "重量_累计")
b.Decimals = 2
g.FromServer = True
g.Build()
MainTable = Tables("统计表1")
Dim b As New GroupTableBuilder("统计表2", DataTables("坯布输入"))
b.Filter = "日期 >= #" & Date.Today & "# “
b.Groups.AddDef("年")
b.Groups.AddDef("月")
b.Groups.AddDef("产品名称")
b.Totals.AddDef("匹数", "下机坯布_本日")
b.Totals.AddDef("总长", "长度_本日")
b.Totals.AddDef("织造车间扣分", "扣分_本日")
b.Totals.AddDef("总重", "重量_本日")
b.Decimals = 2
b.FromServer = True
b.Build()
MainTable = Tables("统计表2")