专家坐堂-请教：如下表为何出错？Foxtable(狐表) - 新一代数据库软件，完美融合Access、Foxpro、Excel、vb.net之优势，人人都能掌握的快速软件开发工具!

-- 请教：如下表为何出错？

Tables(e.form.Name & "_Table1").fill("sele ct a.客户编码, a.客户名称,a.简码,a.电话, 期初金额, sum(金额2) as 销售金额, sum(金额1) as 收款金额,(isnull(期初金额,0)+isnull(sum(金额2),0)-isnull(sum(金额1),0)) as 余额 from {客户} as a left join (sel ect 单位编码, 单位名称, 借方金额 as 金额1, 0 as 金额2 from {资金收付明细单} where 单据状态=\'已审核\' union all Se lect 客户编码, 客户名称, 0, 金额 from {销售单} where 单据状态=\'已审核\' ) As b on a.客户编码 = b.单位编码 And a.客户名称 = b.单位名称 group by a.客户编码, a.客户名称,a.简码,a.电话, 期初金额","wjhansdata",True)

Tables(e.form.Name & "_Table1").SetColVisibleWidth("客户编码|60|客户名称|198|电话|120|期初金额|100|销售金额|100|收款金额|100|余额|100")

Tables(e.form.Name & "_Table1").Cols("期初金额").GrandTotal = True \'指定要合计的列

Tables(e.form.Name & "_Table1").Cols("销售金额").GrandTotal = True

Tables(e.form.Name & "_Table1").Cols("收款金额").GrandTotal = True

Tables(e.form.Name & "_Table1").Cols("余额").GrandTotal = True

Tables(e.form.Name & "_Table1").DataTable.DataCols("期初金额").SetFormat("0.00")

Tables(e.form.Name & "_Table1").DataTable.DataCols("销售金额").SetFormat("0.00")

Tables(e.form.Name & "_Table1").DataTable.DataCols("收款金额").SetFormat("0.00")

Tables(e.form.Name & "_Table1").DataTable.DataCols("余额").SetFormat("0.00")

Tables(e.form.Name & "_Table1").sort="客户编码"

Tables(e.form.Name & "_Table1").GrandTotal = True \'显示合计模式

Dim Filter As String = "1=1"

If Filter >"" Then

Filter = Filter & " And "

End If

Filter = Filter & "余额<>0"

Tables(e.form.Name & "_Table1").filter=filter

生成的表余额为零的也显示出来