帮助文件例子

e.DataRow("已收款金额") = DataTables("订单").Compute("Sum(金额)", Filter & " And 已付款 = True")

如果"已付款"列为字符型,上面那段代码怎么改?字符为"是"或"否"

我将 已付款 = True 改为 已付款 = 是

报错.

给是字加上单双引号也不行.

哦,我的例子和帮助文件的有一点点不一样,我的是这样的:

If e.DataCol.Name = "零件图号" Then
    e.DataRow("投料") = DataTables("记录").Compute("Sum(实际数量)","[零件图号] = \'" & e.NewValue & "\'")
    e.DataRow("装箱入库") = DataTables("成品入库").Compute("Sum(入库数量)","[零件图号] = \'" & e.NewValue & "\'")
    e.DataRow("销售出库") = DataTables("成品出库").Compute("Sum(数量)","[零件图号] = \'" & e.NewValue & "\'")
    e.DataRow("外协出库") = DataTables("外协加工").Compute("Sum(数量)","[零件图号] = \'" & " And 出入库 = \'是\'") 

    e.DataRow("外协入库") = DataTables("外协加工").Compute("Sum(数量)","[零件图号] = \'" & " And 出入库 = \'否\'") 
    End If

前面三个e正确,粉色字体的还有问题,麻烦版主再帮忙.

e.DataRow("外协出库") = DataTables("外协加工").Compute("Sum(数量)","[零件图号] = \'" & e.NewValue & "\'" And 出入库 = \'是\'") 

    e.DataRow("外协入库") = DataTables("外协加工").Compute("Sum(数量)","[零件图号] = \'" & e.NewValue & "\'" And 出入库 = \'否\'") 

报错:name "出入库" is not declared

是什么意思?

没有声明变量?

呵呵，4楼的代码，多了一个双引号，改一下：

e.DataRow("外协出库") = DataTables("外协加工").Compute("Sum(数量)","[零件图号] = \'" & e.NewValue & "\' And 出入库 = \'是\'")
e.DataRow("外协入库") = DataTables("外协加工").Compute("Sum(数量)","[零件图号] = \'" & e.NewValue & "\' And 出入库 = \'否\'")