刚才试了一下,发现不对:大红炮老师,为什么我的代码加了条件和不加条件是一样的。
代码一,没有条件,代码如下:
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") '打开生成的统计表
但是两个生成的表是一一样的。哪里出了问题?