主题：[求助]分组统计数据存在问题（已解决）

以下代码交叉表分组统计，统计的分组数据与实际不符，如果将b.Subtotal = True去掉，合计数据正确。原因在哪里？请各位老师指教，谢谢。

Dim b As New CrossTableBuilder("工具分类汇总",DataTables("工具清单"))

b.HGroups.AddDef("使用单位")

b.HGroups.AddDef("工具名称")

b.VGroups.AddDef("工具等级")

b.VGroups.AddDef("工具状态")

b.Totals.AddDef("工具编号", AggregateEnum.Count, "工具编号")

b.HorizontalTotal = True

b.VerticalTotal = True

b.Build()

MainTable = Tables("工具分类汇总")

Tables("工具分类汇总").AutoSizeCols()