If e.DataCol.Name = "检测项目" Then
Dim dr As DataRow
dr = DataTables("B_TtemNo123").Find("检测项目 = '" & e.DataRow("检测项目") & "' And 标准 = '" & e.DataRow("标准") & "' And 检测方法 = '" & e.DataRow("检测方法") & "'")
If dr Is Nothing Then
Dim tr As Row
tr = Tables("B_TtemNo123").Addnew
tr("标准") = dr("标准")
tr("检测项目") = dr("检测项目")
tr("检测方法") = dr("检测方法")
tr("等级类别工艺") = dr("等级类别工艺")
tr("标准要求") = dr("标准要求")
tr("判定标准要求") = dr("判定标准要求")
tr("单位") = dr("单位")
tr("方法检出限") = dr("方法检出限")
End If
End If
请问这个代码那里请问题了,重置列提示如下:
.NET Framework 版本:2.0.50727.5420
Foxtable 版本:2017.4.22.1
错误所在事件:表,B_TtemNo, DataColChanged
详细错误信息:
调用的目标发生了异常。
未将对象引用设置到对象的实例。
[此贴子已经被作者于2017/4/30 10:10:20编辑过]