If e.DataRow("公司版号") > 0 Then
Dim dr1 As DataRow
dr1 = e.DataTable.SQLFind("公司版号 = '" & E.DataRow("公司版号") & "'")
If dr1 IsNot Nothing Then
MessageBox.Show("此版位号已存在,请不要重复!")
e.Cancel = True
End If
End If
If e.DataRow("版号") IsNot Nothing Then
Dim dr As DataRow
dr = e.DataTable.SQLFind("版号 = '" & E.DataRow("版号") & "'")
If dr IsNot Nothing Then
MessageBox.Show("此版辊已存在,请不要重复!")
e.Cancel = True
End If
End If
老师我这个代码是因为我这两个字段里有空值会重复,然后我加了条件,但还总是显示有重复值但我查了除了空值跟0其它再无重复但他还老是不能保存跳出重复的信息。是什么情况?