以文本方式查看主题

-  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=191601)

--  作者:yaojun
--  发布时间:2024/4/25 13:25: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
请问如何改成多条件的不重复值,请老师们帮忙修改下如下代码(例如年度与被考核人两个一起不重复,但2个单独时可以重复,2个条件一起就不可以重复),谢谢
If e.DataCol.Name = "被考核人" Then
    Dim dr As DataRow 
    dr = e.DataTable.Find("年度 = \'" & e.NewValue  And "被考核人 = \'" & e.NewValue & "\'")
    If dr IsNot Nothing Then
        MessageBox.Show("此被考核人已经存在!")
        e.Cancel = True
    End If
End If
[此贴子已经被作者于2024/4/25 13:28:01编辑过]

--  作者:有点蓝
--  发布时间:2024/4/25 13:43:00
--  
参考:http://www.foxtable.com/webhelp/topics/2481.htm