主题：条件统计，

照着例子抄

 

http://www.foxtable.com/webhelp/scr/0681.htm

 

Select Case e.DataCol.name
    Case "项目编码","项目名称","计量期数"
        Dim filter As String = "项目编码='" & e.DataRow("项目编码") & "' and 项目名称='" & e.DataRow("项目名称") & "' And 计量期数='" & e.DataRow("计量期数") & "'"
        e.DataRow("成本fa piao金额") = DataTables("表A").Compute("sum(fa piao金额)", filter & " And 抵扣状态='已抵扣' and fa piao类别 in ('普piao','专piao')")
        e.DataRow("人工工资金额") = DataTables("表A").Compute("sum(fa piao金额)", filter & " and 抵扣状态='已抵扣' and fa piao类别='人工工资'")
End Select

提示没有对应的列，就是没有。

 

你表【开piao情况】、【进项piao录入】都有对应的列吗？如果没有，你应该修改你的统计条件。

试试

 

Select Case e.DataCol.name
    Case "项目编码","项目名称","计量期数"
        Dim filter1 As String = "项目编码='" & e.DataRow("项目编码") & "' and 项目名称='" & e.DataRow("项目名称") & "' And 计量期数='" & e.DataRow("计量期数") & "'"

        Dim filter2 As String = "项目编码='" & e.DataRow("项目编码") & "' and 项目名称='" & e.DataRow("项目名称") & "'"
        e.DataRow("fa piao金额") = DataTables("开piao情况").Compute("sum(开piao金额)", filter2 & " And 开piao状态='已开piao'")
        e.DataRow("成本fa piao") = DataTables("进项piao录入").Compute("sum(进项piao_税价合计金额)", filter1 & " And 登记状态='已复审' and fa piao类别 in ('普piao','专piao')")
        e.DataRow("人工工资") = DataTables("进项piao录入").Compute("sum(进项piao_税价合计金额)", filter1 & " And 登记状态='已复审' and fa piao类别='人工工资'")
End Select

e.DataRow("fa piao金额") = DataTables("开piao情况").Compute("sum(开piao金额)", filter2 & " And 开piao状态='已开piao'")

成本fa piao的统计条件是什么？进项piao录入有没有计量期数列？

那就试试改成

 

Dim filter1 As String = "项目编码='" & e.DataRow("项目编码") & "' and 项目名称='" & e.DataRow("项目名称") & "'" 
e.DataRow("成本fa piao") = DataTables("进项piao录入").Compute("sum(进项piao_税价合计金额)", filter1 & " And 登记状态='已复审' and fa piao类别 in ('普piao','专piao')")

 

报什么错？

 

如果确实不行，做个对应例子发上说明。