重置fa piao类型列差额提示调用目标发生异常，只有手动从错误fa piao类型调整到正确的才能让差额起作用，不能次重置列让所有差额自动计算 - 专家坐堂 - Foxtable(狐表) - 新一代数据库软件，完美融合Access、Foxpro、Excel、vb.net之优势，人人都能掌握的快速软件开发工具!

If e.DataCol.Name = "fa piao类型" Then

Dim Total As Double

Dim Haoma As String = e.DataRow("fa piao号码")

Select Case e.DataRow("fa piao类型")

Case "总包对建设"

Total = DataTables("订单往来").Compute("Sum(建设到总包开piao金额)","建设到总包fa piao号码 = '" & Haoma & " '")

e.DataRow("差额") = e.DataRow("fa piao金额") - Total

Case "国信对总包"

Total = DataTables("订单往来").Compute("Sum(总包到分包开piao金额)","总包到分包fa piao号码 = '" & Haoma & " '")

e.DataRow("差额") = e.DataRow("fa piao金额") - Total

Case "下游对国信(同步)"

Total = DataTables("订单往来").Compute("Sum(国信到下游fa piao金额)","国信到下游fa piao号码 = '" & Haoma & " '")

e.DataRow("差额") = e.DataRow("fa piao金额") - Total

Case "下游对国信(非同步)"

Total = DataTables("付款明细_非同步").Compute("Sum(fa piao金额)","fa piao号码 = '" & Haoma & " '")

e.DataRow("差额") = e.DataRow("fa piao金额") - Total

Case Else

e.DataRow("差额") = Nothing

End Select

主题：重置fa piao类型列差额提示调用目标发生异常，只有手动从错误fa piao类型调整到正确的才能让差额起作用，不能次重置列让所有差额自动计算