我想达到的目的是“人员编号”列和“身份证号”列要一一对应。就是说，一个人员编号，只能有一个身份证号去匹配。在新的记录中，如果输入了人员编号后，再输入身份证号的时候，检索以前的记录，如发现已有的记录里有相应的人员编号和身份证编号对应行，就拦截输入。下面是代码，在DataColchanging事件中。但不起作用，请高手帮我看一下：
企业人员基本信息表_DataColChanging
If e.DataCol.Name="身份证号" Then
Dim dr
As DataRow
dr =
DataTables("企业人员基本信息表").find("人员编号" = e.DataRow("人员编号"),
"隶属关系变动时间 desc")
If dr
IsNot Nothing
If
e.NewValue<>dr("身份证号") Then
MessageBox.Show("同一人员不能使用不同工号,请重新录入!")
e.Cancel=True
End
If
End If
End If
加好友 
发短信
Post By：2015/4/10 13:45:00 [只看该作者]
