主题：[求助]索引超出范围

我测试了一下这段代码，没问题

Dim b As New SQLCrossTableBuilder("统计表1","订单")
b.AddTable("订单","产品编号","产品","产品编号") '添加统计表
b.AddTable("订单","客户编号","客户","客户编号") '添加统计表
b.HGroups.AddDef("日期",DateGroupEnum.Year,"年") '添加日期列用于垂直分组,按年分组
b.HGroups.AddDef("{订单}.客户编号") '添加产品列用于垂直分组
b.VGroups.AddDef("客户名称","{0}_数量") '添加客户列用于水平分组
b.Totals.AddDef("数量") '添加数量列用于统计
b.HorizontalProportion = True '生成水平份额
b.filter = "{订单}.客户编号 in (1,3)"
Tables("trtr_table1").DataSource  = b.BuildDataSource

请做具体例子发上来测试。