Dim n2A00 As Double
Dim n2C00 As Double
Dim n4A00 As Double
Dim n4C00 As Double
If e.DataRow("项目") = "2、内部往来收入" Then
n2A00 = e.DataRow("A00")
n2C00 = e.DataRow("C00")
End If
If e.DataRow("项目") = "4、内部往来支出" Then
n4A00 = e.DataRow("A00")
n4C00 = e.DataRow("C00")
End If
If e.DataRow("项目") = "2、内部往来收入" Or e.DataRow("项目") = "4、内部往来支出" Then
e.DataRow("A00验证") = n2A00 - n4A00
e.DataRow("C00验证") = n2C00 - n4C00
output.show("n2A00" & n2A00)
output.show("n4A00" & n4A00)
output.show("n2C00" & n2C00)
output.show("n4C00" & n4C00)
End If
老师,这个行间的计算,不知道怎么整?
用的 DataColChanged
此主题相关图片如下:微信截图_20190618100725.png
![dvubb 图片点击可在新窗口打开查看](UploadFile/2019-6/20196181073641623.png)
[此贴子已经被作者于2019/6/18 10:08:31编辑过]