以下是引用manyifuwu在2016/5/18 1:18:00的发言：
想请教！如果表A 有日期列和编号列和电话号码列（三列）。允许不同日期编号和电话号码重复，日期列同一日期，编号和电话号码不能重复怎么实现呢？
If e.DataCol.name = "编号" Then
Dim fdr As DataRow = e.DataTable.find("日期 = #" & e.DataRow("日期") & "# And 电话号码 = '" & e.DataRow("电话号码") & "' and 编号 = '" & e.newvalue & "'")
If fdr IsNot Nothing Then
msgbox("编号重复")
e.cancel = True
End If
End If
If e.DataCol.name = "电话号码" Then
Dim fdr As DataRow = e.DataTable.find("日期 = #" & e.DataRow("日期") & "# And 电话号码 = '" & e.newvalue & "' and 编号 = '" & e.DataRow("编号") & "'")
If fdr IsNot Nothing Then
msgbox("电话号码重复")
e.cancel = True
End If
End If
加好友 
发短信
Post By：2016/5/18 10:16:00 [显示全部帖子]
