Dim g As New GroupTableBuilder("统计表1", DataTables("出库清单")) g.Groups.AddDef("出库单号") g.Groups.AddDef("订单号") g.Groups.AddDef("规格") g.Groups.AddDef("单价") g.Totals.AddDef("出库数量") g.Totals.AddDef("合计") e.Form.Controls("Table1").Table.DataSource = g.BuildDataSource