Dim b As New GroupTableBuilder("统计表1",DataTables("咨询业务热线登记表"))
b.filter = Tables("咨询业务热线登记表").Filter
b.Groups.AddDef("来电时间",DateGroupEnum.Year,"年")
a.Groups.AddDef("来电时间",DateGroupEnum.Year,"年")
a.Groups.AddDef("来电时间","月")
a.Groups.AddDef("来电时间",DateGroupEnum.Day,"日")