想达到如下目的：“会议表中，”如果“缺席人员”列中有名字，则“发言人”列中改名字就不能输入。为此我写了如下代码：
If e.DataCol.Name = "发言人" Then
If e.DataRow.IsNull("缺席人员")=False Then
Dim r As Row = Tables("会议").Current
For Each s As String In r("缺席人员").split(",")
Dim pr As DataRow
pr = DataTables("会议").Find("[发言人] = '"& s &"'")
If e.DataRow("发言人")=pr("发言人") Then
e.DataRow("发言人")= e.OldValue
End If
Next
End If
End If
运行下来，可以实现目的，但同时系统总是提示“调用目标异常”。不知问题出在哪里？请各位老师指教，谢谢
加好友 
发短信
Post By：2021/1/19 14:35:00 [只看该作者]
