请问这个合成的表达式有啥问题? - 专家坐堂 - Foxtable(狐表) - 新一代数据库软件，完美融合Access、Foxpro、Excel、vb.net之优势，人人都能掌握的快速软件开发工具!

Dim s_date As new Date(2013,1,31)

Dim e_date As new Date(2013,12,31)

Dim g As New CrossTableBuilder("统计表2",DataTables("十监区管理"))

g.HGroups.AddDef("日期",DateGroupEnum.None)

g.HGroups.AddDef("部门")

g.HGroups.AddDef("报表名称")

g.HGroups.AddDef("组别")

g.HGroups.AddDef("管组民警")

g.HGroups.AddDef("模具规格")

g.HGroups.AddDef("统计类型")

g.VGroups.AddDef("项目")

g.VGroups.AddDef("数据统计项目")

g.Totals.AddDef("数值", "数值")

g.Filter = "日期 >= '" & s_date & "' And 日期 <= '" & e_date & "'And 部门='十五监区' And 组别='砂场二组'"

g.Build()

If DataTables("统计表2").datarows.Count>0 Then

Dim 产量_废品 As String '产量的废品

Dim 产量_合格品 As String '产量的合格品

Dim 产量_计划 As String '产品的计划

Dim 造型件数_废品率 As String '造型的件数废品率

Dim 造型件数_废品 As String '造型件数废品

Dim 造型件数_计划 As String '造型件数废品

Dim 造型件数_合格 As String '造型件数合格品1

Dim 造型箱数_计划 As String '造型箱数计划1

Dim 造型箱数_完成 As String '造型箱数完成

Dim 造型箱数_计划完成率 As String '造型箱数

Dim 单重_单重 As String '造型箱数

For Each cl As Col In Tables("统计表2").cols

Select Case cl.Caption

Case "产量(吨)_废品"

产量_废品 =cl.Name

Case "造型件数_计划"

造型件数_计划 =cl.Name

Case "产量(吨)_合格品"

产量_合格品 =cl.Name

Case "产量(吨)_计划"

产量_计划 =cl.Name

Case "造型件数_废品"

造型件数_废品 =cl.Name

Case "造型件数_废品"

造型件数_废品 =cl.Name

Case "造型件数_合格"

造型件数_合格 =cl.Name

Case "造型箱数_计划"

造型箱数_计划 =cl.Name

Case "造型箱数_完成"

造型箱数_完成 =cl.Name

Case "造型箱数_计划完成率"

造型箱数_计划完成率 =cl.Name

Case "单重_单重"

单重_单重 =cl.Name

End Select

DataTables("统计表2").DataCols(产量_废品).Expression = "(" & 造型件数_废品 & "*" & 单重_单重 & ")/1000"

Output.Show(1)

DataTables("统计表2").DataCols(产量_合格品).Expression ="(" & 造型件数_合格 & "*" & 单重_单重 & ")/1000"

Output.Show(5)

DataTables("统计表2").DataCols(产量_计划).Expression ="(" & 造型件数_计划 & "*" & 单重_单重 & ")/1000"

Output.Show(6)

DataTables("统计表2").DataCols(造型件数_废品率).Expression = "(" & 造型件数_废品 & "/" & "(IsNull([" & 造型件数_合格 & "],0)" & "+" & "(IsNull([" & 造型件数_废品 & "],0)" & "))*100"

DataTables("统计表2").DataCols(造型箱数_计划完成率).Expression ="(" & 造型箱数_完成 & "/" & 造型箱数_计划 & ")*100"

Output.Show(8)

' Output.Show("(" & 造型件数_废品 & "/" & "(IsNull([" & 造型件数_合格 & "],0)" & "+" & "(IsNull([" & 造型件数_废品 & "],0)" & "))*100")

End If

红色字部分一直提示值不能为空参数为:key

此主题相关图片如下：tt截图未命名.bmp

主题：请问这个合成的表达式有啥问题?