Dim b As New GroupTableBuilder("按日汇总",DataTables("汇总结算"))
b.Groups.AddDef("交易日期",DateGroupEnum.Year,"年") \'添加日期列用于分组,并用"年"代替原名称
b.Groups.AddDef("交易日期","月") \'添加日期列用于分组,并用"月"代替原名称
b.Groups.AddDef("交易日期", "日期")
b.Totals.AddDef("现金")
b.Totals.AddDef("银行卡")