Dim b As New CrossTableBuilder("统计表1",DataTables("查询表1"))
Dim  dt1 As   fxDataSource
 b.HGroups.AddDef("公司汇总","部门名称")
 b.HGroups.AddDef("大区")
 b.VGroups.AddDef("科目")
 b.Totals.AddDef("金额")
dt1 =   b.BuildDataSource()

Dim b1 As New  SQLGroupTableBuilder("统计表2","销售统计")
 Dim  dt2 As   fxDataSource
 b1.AddTable("销售统计","店铺名称","责任中心档案","部门名称") \'添加统计表
 b1.Groups.AddDef("店铺名称","部门名称")  \'根据型号分组
 b1.Totals.AddDef("销售数量")  \'对数量进行统计
 b1.Filter= Filter1
 dt2 =   b1.BuildDataSource()

Dim b2 As New GroupTableBuilder("统计表3",DataTables("查询表1"))
Dim  dt3 As   fxDataSource
 b2.Groups.AddDef("公司汇总","部门名称")
 b2.Totals.AddDef("金额","吊牌金额")
dt3 =   b2.BuildDataSource()

dt1.Combine("部门名称",dt2,"部门名称")  \'将销售统计数据组合到进货统计数据
dt1.Combine("部门名称",dt3,"部门名称")  \'将销售统计数据组合到进货统计数据
dt1.Show("统计表1")  \'显示统计结果

Tables("附表_Table1").DataSource = b.BuildDataSource()

上述代码的结果是统计表2和统计表3的数据没有组合过来，代码哪里有问题呢，求助