Dim g As New GroupTableBuilder("报价清单统计", DataTables("报价清单")) \'"报价清单统计"是数据表,不是临时表g.Groups.AddDef("承包合同ID")
g.Groups.AddDef("节目名称")
g.Groups.AddDef("单位")
g.Totals.AddDef("数量")
g.Totals.AddDef("合价")
g.Decimals = 2
g.FromServer = True
g.Filter = "[数量] <> 0"
g.Build()
MainTable = Tables("报价清单统计")
\'Tables("报价清单统计_Table1").DataSource = b.BuildDataSource()