.NET Framework 版本:2.0.50727.3655
Foxtable 版本:2014.7.26.1
错误所在事件:表,项目经理,DataColChanged
详细错误信息:
调用的目标发生了异常。
在 Range 对象中,Min (53)必须小于或等于 max (-1)。
帮忙看看DataColChanged以下代码:
Dim da As Integer
Dim db As Integer
Dim dc As Integer
Dim de As Integer
Dim df As DataRow = e.DataRow
Dim dt As DataTable =DataTables("工程项目")
Select Case e.DataCol.Name
Case "姓名"
If df.IsNull("姓名") Then
df("持证次数") = Nothing
Else
da = dt .Compute("Count(项目经理身份证号)" , "项目经理身份证号 = '" & df("身份证号") & "'" )
db = dt .Compute("Count(项目安全员身份证号)" , "项目安全员身份证号 = '" & df("身份证号") & "'" )
dc = dt.Compute("Count(项目总工身份证号)" , "项目总工身份证号 = '" & df("身份证号") & "'" )
de = dt .Compute("Count(项目质检员身份证号)" , "项目质检员身份证号 = '" & df("身份证号") & "'" )
df("持证次数") = da + db + dc + de
'dr("次数") = dt.Compute("Count(项目经理身份证号)" , "项目经理身份证号 = '" & dr("身份证号") & "'" )
End If
End Select