Foxtable(狐表)用户栏目专家坐堂 → 【请教】同一行内a、b、c三列的值,要求禁止任何两者之间重复


  共有3135人关注过本帖树形打印复制链接

主题:【请教】同一行内a、b、c三列的值,要求禁止任何两者之间重复

帅哥哟,离线,有人找我吗?
everybody
  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:小狐 帖子:307 积分:2252 威望:0 精华:0 注册:2013/2/28 9:05:00
【请教】同一行内a、b、c三列的值,要求禁止任何两者之间重复  发帖心情 Post By:2015/8/11 14:53:00 [显示全部帖子]

同一行,有a、b、c三列,现在要禁止同一行内,a、b、c三列的值,任何两者之间不能重复,应该怎么设置?

 回到顶部
帅哥哟,离线,有人找我吗?
everybody
  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:小狐 帖子:307 积分:2252 威望:0 精华:0 注册:2013/2/28 9:05:00
  发帖心情 Post By:2015/8/11 17:21:00 [显示全部帖子]

谢谢!

 回到顶部
帅哥哟,离线,有人找我吗?
everybody
  3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:小狐 帖子:307 积分:2252 威望:0 精华:0 注册:2013/2/28 9:05:00
  发帖心情 Post By:2015/8/11 17:40:00 [显示全部帖子]

'禁止统计员 复核员 监督员重名
Select Case e.DataCol.Name
    Case "统计员","复核员","监督员"
        Dim dr As DataRow = e.DataRow
        Dim Str1 As String = dr("统计员") & dr("复核员") & dr("监督员")
        If e.NewValue>"" Then
            str1=str1.Replace(e.NewValue,"")
            If Str1 > "" AndAlso Str1.Contains( e.NewValue) Then
                MessageBox.Show("统计员\监督员\复核员不能重复输入!","提示",MessageBoxButtons.OK,MessageBoxIcon.Error)
                dr(e.DataCol.Name)=""
            End If
        End If
End Select

这段代码应该是对的啊?怎么没反应?



 回到顶部
帅哥哟,离线,有人找我吗?
everybody
  4楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:小狐 帖子:307 积分:2252 威望:0 精华:0 注册:2013/2/28 9:05:00
  发帖心情 Post By:2015/8/11 20:51:00 [显示全部帖子]

大红袍大哥的代码有bug,呵呵

实测,就算是不重复,也会提示msgbox的。。。。。

 回到顶部
帅哥哟,离线,有人找我吗?
everybody
  5楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:小狐 帖子:307 积分:2252 威望:0 精华:0 注册:2013/2/28 9:05:00
  发帖心情 Post By:2015/8/15 8:18:00 [显示全部帖子]

还是搞不定,呵呵,能否再求教?


 回到顶部
帅哥哟,离线,有人找我吗?
everybody
  6楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:小狐 帖子:307 积分:2252 威望:0 精华:0 注册:2013/2/28 9:05:00
  发帖心情 Post By:2015/8/16 22:08:00 [显示全部帖子]

感谢老大!

 回到顶部