主题：[求助]拒绝重复

老师好，我要在同一个时间段里名称列不出现重复的名称。谢谢。

禁止输入重复值
http://www.foxtable.com/help/topics/2481.htm

 

比如在时间列里2015年11月19号这一天在名称列里不出现重复的名称。

datacolchanging事件

 

If e.DataCol.Name = "名称" Then
     Dim dr  As  DataRow
     dr = e.DataTable.Find("名称 = '" & e.NewValue &  "' and 时间 = #" & e.DataRow("时间") & "#")
     If dr IsNot Nothing Then
         MessageBox.Show("此时间已存在相同名称!")
         e.Cancel =  True
     End  If
 End  If

老师，对关联表怎样设置。

 

一样这样写，限制条件加上。

 

dr = e.DataTable.Find("名称 = '" & e.NewValue &  "' and 时间 = #" & e.DataRow("时间") & "# and 关联列 = '" & e.DataRow("关联列") & "'")

老师，上面代码在导入数据时没有重复也为提示有重复。

导入的时候，判断重复这样写代码

 

http://www.foxtable.com/help/topics/2334.htm

 

Dim dr As DataRow = DataTables("订单").Find("编号 = '" & bh & "'")

列名、表名、对应的东西，全部要变。

 

如果不会写代码，就认认真真学习，或者上传具体例子别人把你写。