2楼的就是你要的答案。你可以不禁止重复啊
If e.DataCol.Name = "订单号" Then Dim dr As DataRow dr = e.DataTable.Find("订单号 = '" & e.NewValue & "'") If dr IsNot Nothing Then MessageBox.Show("此订单号已经存在!")
End IfEnd If
加好友 
发短信
Post By：2015/6/16 16:01:00 [显示全部帖子]
