主题：组合多个统计

Dim bd2 As New GroupTableBuilder("统计表2", DataTables("计件统计"))

Dim dt2 As fxDataSource

bd2.Groups.AddDef("姓名1") '根据型号分组

bd2.Totals.AddDef("数量1", "数量") '对数量进行统计

bd2.Totals.AddDef("金额1", "金额") '对金额进行统计

dt2 = bd2.BuildDataSource()

Dim bd3 As New GroupTableBuilder("统计表3", DataTables("计件统计"))

Dim dt3 As fxDataSource

bd3.Groups.AddDef("姓名2") '根据型号分组

bd3.Totals.AddDef("数量2", "数量") '对数量进行统计

bd3.Totals.AddDef("金额2", "金额") '对金额进行统计

dt3 = bd3.BuildDataSource()