| 以文本方式查看主题 - Foxtable(狐表) (http://foxtable.net/bbs/index.asp) -- 专家坐堂 (http://foxtable.net/bbs/list.asp?boardid=2) ---- 禁止重复 (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=88428) |
| -- 作者：武汉老杨 -- 发布时间：2016/8/2 18:34:00 -- 禁止重复 行是从其他表复制过来的 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 这样，还是添加了一行记录，只是 “单据编号” 是 空值，其他的列还是添加进去了。 要求：如果 列重复了，不添加这一行记录，代码怎么写，写在哪里？
|
| -- 作者：大红袍 -- 发布时间：2016/8/2 19:43:00 -- 可以把这一行删除。
e.DataRow.Delete |