主题：如何后台全局禁止重复数据 急急急

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

我用的是录入窗口方式录入，但是同时我设置了只加载所有者=当前用户名的数据，当前用户名下是不能录入2个完全相同的用户名了 但是我换个用户后就可以录入了，这样其实整个表里面确实是存在了两个相同的用户了，问下高手 如何实现整个表达到不能录入相同数据的效果 并且提示呢？