主题：多统计表组合错误？

对于日期分组，请这样处理

在Groups集合中添加一个分组列的语法是：　

Groups.AddDef(Name)
Groups.AddDef(Name, NewName)
Groups.AddDef(Name, NewName, NewCaption)
Groups.AddDef(Name, DateGroup)
Groups.AddDef(Name, DateGroup, NewName)
Groups.AddDef(Name, DateGroup, NewName, NewCaption)

参数说明

Name:        字符型，指定分组列。
NewName:     字符型，用于给分组列指定一个新的名称，这个名称在统计表中显示。
NewCaption:  字符型，用于给分组列设置标题。
DateGroup：  DateGroupEnum型枚举，如果分组列是日期列，可用此属性指定如何根据日期进行分组，默认按月分组。

DateGroupEnum枚举的可选值：

None ：     不分组
Year：      按年分组 
Quarter：   按季度分组
Month：     按月分组
Week：      按周分组
Day：       按天分组，月中的某一天。
Hour：      按小时分组
Minute：    按分钟分组
Second：    按秒分组

Dim b As New GroupTableBuilder("统计表1", DataTables("订单"), "产品 = 'PD01'")
b.Groups.AddDef("日期", DateGroupEnum.Year, "年") '添加日期列用于分组,并用"年"代替原名称
b.Groups.AddDef("日期","月") '添加日期列用于分组,并用"月"代替原名称
b.Totals.AddDef("数量") '添加数量列用于统计
b.Totals.AddDef("金额") '添加金额列用于统计
b.Build '生成统计