以文本方式查看主题 - Foxtable(狐表) (http://www.foxtable.com/bbs/index.asp) -- 专家坐堂 (http://www.foxtable.com/bbs/list.asp?boardid=2) ---- 怎样实现列中的值不重复 (http://www.foxtable.com/bbs/dispbbs.asp?boardid=2&id=66411) |
||||
-- 作者:dm168 -- 发布时间:2015/4/5 21:17:00 -- 怎样实现列中的值不重复 列如表A中的code列已经有1在文本框中填入1的时候会弹出提示框说编码不能重复,如果表A code列没有1就不会提示,并保存数据。 下面这段代码总是同时保存和提示,要怎样改才对?
\'叛断Code列是否重复 Dim val As String = e.Form.Controls("TextBox1").value For Each dr As DataRow In DataTables("表A").DataRows If dr IsNot Nothing Then If val IsNot Nothing Then If dr("Code") = val Then messagebox.show("编码必需是唯一的不能重复") Else Tables("表A").save End If End If End If Next [此贴子已经被作者于2015/4/5 21:18:47编辑过]
|
||||
-- 作者:dm168 -- 发布时间:2015/4/6 11:54:00 -- 没人帮我吗? |
||||
-- 作者:jialihaha -- 发布时间:2015/4/6 12:01:00 -- http://www.foxtable.com/help/topics/2481.htm |
||||
-- 作者:dm168 -- 发布时间:2015/4/6 23:30:00 -- 谢谢 |