Dim gb As new sqlGroupTableBuilder("统计配件窗口","产品配件用量表") gb.AddTable("产品配件用量表","产品型号","配件统计表","型号") gb.Groups.AddDef("配件名称") gb.Groups.AddDef("配件品类") gb.Groups.AddDef("配件规格") gb.Groups.AddDef("配件颜色") gb.Groups.AddDef("配件单位") gb.Totals.AddExp("需求数量","[数量] * [配件用量]") Tables("统计配件窗口_Table1").datasource = gb.Build() Tables("统计配件窗口").visible = False
|