示例二,统计不同月份的销售数量和金额
将下面的代码复制到命令窗口:
Dim b As New GroupTableBuilder("统计表1",DataTables("订单"))b.Groups.AddDef("日期","月份") '添加日期列用于分组,并用"月份"代替原名称b.Totals.AddDef("数量") '添加数量列用于统计b.Totals.AddDef("金额") '添加金额列用于统计b.Build '生成统计表MainTable = Tables("统计表1") '打开生成的统计表