Dim g As New CrossTableBuilder("统计表1", DataTables("订单")) g.HGroups.AddDef("日期", DateGroupEnum.Year, "年") g.HGroups.AddDef("日期", "月") g.HGroups.AddDef("日期", DateGroupEnum.Day, "日") g.HGroups.AddDef("产品") g.VGroups.AddDef("客户") g.Totals.AddDef("数量", "数量") g.Totals.AddDef("金额", "金额") g.Build() MainTable = Tables("统计表1")
|