Select Case e.DataCol.Name
    Case "第一列"

            Dim fdr As DataRow = DataTables("表A").Find("第一列 = \'" & e.NewValue & "\'")
            If fdr IsNot Nothing Then
                \'e.NewValue = e.OldValue
                MessageBox.show("身份证号存在重复数据","提示")
            End If

End Select

这句代码放在表A事件 DataColChanging  里,来检查输入数据的重复性

在窗口1中绑定表A第一列到文本框,然后在窗口1文本框输入数据后 按回车或tal切换到下一个文本框时

如果有数据重复会弹出窗口,但这个窗口确定掉以扣会再弹出一次,请问怎么把弹二次窗口换成只弹一次就可以

如果输入数据后用鼠标切换到其它文本框就只弹出一次

是在窗口1里面的文本框输入的吗

试了一下，用回车切换也是弹一次啊。