以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  求助:数据重复问题  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=18111)

--  作者:yifan3429
--  发布时间:2012/4/2 15:07:00
--  求助:数据重复问题

使用如下代码

 

假定有个订单表,要求产品编号列不能输入重复值,可以将这个表的DataColChanging事件代码设置为:

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

通过窗口组合输入  产品编号列是表达式    等于 代码+编号     要求产品编号不重复

 

结果还是允许重复

图片点击可在新窗口打开查看
图片点击可在新窗口打开查看 
 
[此贴子已经被作者于2012-4-3 9:17:46编辑过]

--  作者:mr725
--  发布时间:2012/4/2 16:44:00
--  

看不到图片··· 你上面的公式中哪有订单号? 发个例子上来


--  作者:yifan3429
--  发布时间:2012/4/5 10:23:00
--  
没人回答  自己顶下
--  作者:狐狸爸爸
--  发布时间:2012/4/5 10:50:00
--  
做个简单例子发上来。