主题：筛选后的数据如何统计

Dim zzrs As New GroupTableBuilder("统计表1", DataTables("人事档案基础信息"))
zzrs.Groups.AddDef("性别")
zzrs.Filter = Tables("人事档案基础信息").filter
zzrs.Totals.AddDef("姓名", AggregateEnum.Count,"现有人数",True)  '--统计姓名列行数,填充到临时表现有人数列
zzrs.Subtotal = True
zzrs.Build()