Dim dt As DataTableDim b As New GroupTableBuilder("统计表1",DataTables("交易明细"))b.Groups.AddDef("日期",DateGroupEnum.Year,"年")b.Groups.AddDef("日期",DateGroupEnum.Month,"月")b.Groups.AddDef("交易码")b.Builddt = DataTables("统计表1")