主题：[求助]字符型统计

帮助文件例子

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

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

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

报错.

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

 

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

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

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 出入库 = '否'")

好啦,谢谢!