主题：根据“存栏表”得出报表“在库统计表”

 不是直接设置交叉统计即可？

Dim g As New CrossTableBuilder("统计表1", DataTables("个体信息表"))
g.HGroups.AddDef("栋号")
g.HGroups.AddDef("性别")
g.VGroups.AddDef("笼号")
g.Totals.AddDef("动物编号", AggregateEnum.Count, "动物编号")
g.Totals.AddDef("种源", AggregateEnum.Count, "种源")
g.Totals.AddDef("BV", AggregateEnum.Count, "BV")
g.HorizontalTotal = True
g.VerticalTotal = True
g.Build()
MainTable = Tables("统计表1")

http://www.foxtable.com/help/topics/0165.htm