此主题相关图片如下:qq图片20170408020723.png
If e.DataCol.Name = "项目" Then
e.DataRow("应发金额") = DataTables("中建龙城工资").Compute("Sum(税前工资)","[项目] = '" & e.DataRow("项目") & "'")
e.DataRow("实发金额") = DataTables("中建龙城工资").Compute("Sum(实发工资)","[项目] = '" & e.DataRow("项目") & "'")
If e.DataCol.Name = "项目" Then
e.DataRow("应发金额") = DataTables("中建龙城费用").Compute("Sum(应发金额合计)","[项目] = '" & e.DataRow("项目") & "'")
e.DataRow("实发金额") = DataTables("中建龙城费用").Compute("Sum(实发金额)","[项目] = '" & e.DataRow("项目") & "'")
End If
End If
代码写完之后,只统计了最后一行的,请问是不是掉了什么东西?
研究了一晚上了,不是统计的时候直接填充所有行,就是只统计一行
请老师帮忙修改指正一下!