Dim g As New GroupTableBuilder("统计表1", DataTables("排产明细表"))
g.Groups.AddDef("产品图号") '分组列
g.Groups.AddDef("产品名称")
g.Groups.AddDef("产品材料")
g.Groups.AddDef("产品规格")
g.Groups.AddDef("单位")
g.Totals.AddDef("订购数量")'统计列
g.Groups.AddDef("PCMXID")
g.Groups.AddDef("排产序列号")
g.Groups.AddDef("产品ID")
g.Groups.AddDef("产品描述")
g.Groups.AddDef("组装图号")
g.VerticalTotal = True
g.Filter = "排产单号 = '" & Tables("排产主表.排产明细表").Current("排产单号") & "'"
g.Build()
Tables ("排产统计_Table1" ). DataSource = DataTables ("统计表1" )
Tables("排产统计_Table1").font = new font("宋体", 11)
Tables("排产统计_Table1").AutoSizeCols()
上面代码中产品图号为分组列, 订购数量为统计列, 其他列要显示在统计表中但是不参与分组和统计, 如何操作