主题：关于SQLCrossTableBuilder的用法请教

狐表的统计功能强大，帮助的代码如下：

 

Dim b As New SQLCrossTableBuilder("统计表1","订单")
b.ConnectionName = "Sale"
b.AddTable("订单","产品ID","产品","产品ID") '添加统计表
b.AddTable("订单","客户ID","客户","客户ID") '添加统计表
b.HGroups.AddDef("客户名称") '添加客户列用于水平分组
b.VGroups.AddDef("产品名称","产品名称_{0}") '添加产品列用于垂直分组,并设置了Pattern参数
b.Totals.AddDef("数量") '添加数量列用于统计
b.Build '生成统计表
Maintable = Tables("统计表1") '打开生成的统计表

 

 

但是我的系统设计都是用窗口显示的，如何把这个统计表在窗口上显示呢？如果窗口的Table 名称为：talbe1 .代码要怎么改呢？

Tables("窗口1_Table1").DataSource = b.BuildDataSource()

 

参考

 

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

 

清楚了，谢谢大红袍老师。还有一人问题。就是关于"订单" 的筛选条件要在哪个地方写啊？

比如。我只想统计订单今年9月的订单？要在哪个地方写，多谢！

加条件

 

b.filter = "条件"

 

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

 

刚才试了一下，发现不对：大红炮老师，为什么我的代码加了条件和不加条件是一样的。

代码一，没有条件，代码如下：
Dim b As New SQLCrossTableBuilder("统计表1","销售订单明细")
b.C

b.AddTable("销售订单明细","MID","物料信息表","_Identify") '添加统计表
b.AddTable("销售订单明细","CID","客户资料表","_Identify") '添加统计表
b.HGroups.AddDef("客户名称") '添加客户列用于水平分组
b.VGroups.AddDef("产品名称","产品名称_{0}") '添加产品列用于垂直分组,并设置了Pattern参数
b.Totals.AddDef("产品数量") '添加数量列用于统计
b.Build '生成统计表
MainTable = Tables("统计表1") '打开生成的统计表

 

 

代码二： 加了条件

 

Dim dt1 As Date = new Date(2015,10,9)
Dim b As New SQLCrossTableBuilder("统计表1","销售订单明细")
b.C

b.AddTable("销售订单明细","MID","物料信息表","_Identify") '添加统计表
b.AddTable("销售订单明细","CID","客户资料表","_Identify") '添加统计表
b.HGroups.AddDef("客户名称") '添加客户列用于水平分组
b.VGroups.AddDef("产品名称","产品名称_{0}") '添加产品列用于垂直分组,并设置了Pattern参数
b.Totals.AddDef("产品数量") '添加数量列用于统计
b.Build '生成统计表
'.Filter = "所属公司 = '恒滔' and 订单日期 >= #"  &  dt1  &  "#"
MainTable = Tables("统计表1") '打开生成的统计表

 

但是两个生成的表是一一样的。哪里出了问题？

b.C 那句代码是边接名称，不知道为什么过去去，都是一样的。

b.Filter 写在 b.Build 之前

如果写在之前，生成的是空表。

空表，就说明你条件写得有问题，例子上传上来测试。