主题：SQLGroupTableBuilder 加上Filter报错。

Dim g As new SQLGroupTableBuilder ("产品统计临时表","产品物料清单")
g.ConnectionName = _ServerName
Dim Cols1() As String = {"项目编码","产品编号"}
Dim Cols2() As String = {"项目编码","产品编号"}
g.AddTable("产品物料清单",Cols1,"项目产品表",Cols2)
g.AddTable("产品物料清单","项目编码","项目立项主表","项目编号")
'g.Filter = Tables("产品物料查询窗口_Table1").Filter
g.Groups.AddDef("项目名称")
g.Groups.AddDef("产品名称")
g.Groups.AddDef("物料_名称")
g.Groups.AddDef("物料_型号")
g.Groups.AddDef("物料_颜色")
g.Totals.AddDef("使用_数量",AggregateEnum.Sum)
g.Subtotal = True
g.Decimals = 2
g.Build
MessageBox.show("6-4")
Tables("产品物料查询窗口_Table1").DataSource = g.BuildDataSource