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
这个内表操作,如何用改,从后台或服务器的后台数据库检查是否重复?
是改为下面?
dr = e.DataTable.SQGLFind("单号 = '" & e.NewValue & "'")
dr = e.DataTable.SQGLSe("单号 = '" & e.NewValue & "'")
如果数据没有完全加载。查2次,先Find,如果不存在,再SqlFind一次