Case "中标造价","合同造价","合同结算" '造价分级合计
Dim str As String = dr("合同编号")
Dim idx As Integer = str.LastIndexOf("-")
Dim nms() As String = {"中标造价","合同造价","合同结算"}
If idx > -1 Then
Dim pid As String = str.SubString(0,idx)
Dim dt As DataRow = e.DataTable.Find("合同编号 = '" & pid & "'")
If dt IsNot Nothing Then
For Each nm As String In nms
dt(nm) = e.DataTable.Compute("Sum(nm)","合同编号 Like '" & pid & "-%' And 类别 = '" & dr("类别") & "'")
Next
End If
End If
错误提示：
.NET Framework 版本：2.0.50727.8762
Foxtable 版本：2018.8.30.1
错误所在事件：表，收款合同信息，DataColChanged
详细错误信息：
调用的目标发生了异常。
未找到列 [nm]。
加好友 
发短信
Post By：2018/9/5 14:37:00 [只看该作者]
