If e.DataCol.Name = "订单号" Then
    Dim dr As DataRow
    dr = e.DataTable.Find("订单号 = \'" & e.NewValue & "\'")
    If dr IsNot Nothing Then
        MessageBox.Show("此订单号已经存在!")
        e.Cancel = True
    End If
End If

当鼠标离开控件的时候，就会触发两次。

有老师说在控件中写代码，还要进入控件的时候保存原来的值，离开控件的时候再判断。 这样要设立一个全局变量，而且不能利用e.OldValue和e.NewValue

的方便性。

还是应该解决怎么才能不触发两次的根本问题吧。