以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp)
--  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2)
----  关于复选组合框的比较问题  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=145726)

--  作者:wugang0131
--  发布时间:2020/2/5 20:42:00
--  关于复选组合框的比较问题
比如加一个参会人员复选框和一个缺席人员复选框,如果两者输入人员相同,则消息盒子提示“输入重复”,该如何实现?请老师赐教!
图片点击可在新窗口打开查看此主题相关图片如下:图片222.png
图片点击可在新窗口打开查看

--  作者:wugang0131
--  发布时间:2020/2/5 20:44:00
--  
只要有一个人相同,系统就提示输入重复。
--  作者:wugang0131
--  发布时间:2020/2/6 9:30:00
--  
请老师指教
--  作者:有点蓝
--  发布时间:2020/2/6 10:18:00
--  
请上传实例说明
--  作者:wugang0131
--  发布时间:2020/2/6 11:02:00
--  
我已经用遍历解决了,谢谢蓝老师
--  作者:wugang0131
--  发布时间:2020/2/6 12:02:00
--  
Dim ch As String()=e.DataRow("参会人员").split(",")
Dim qx As String()=e.DataRow("缺席人员").split(",")
For Each Value1 As String In ch
For Each Value2 As String In qx
If Value1=Value2
MessageBox.Show("重复输入!")
Else
End If
Next
Next

还是再请教一下老师,这是我写的代码,倒是可以用了,但是每次项目重启或重置列时,它就会提示 重复输入,但实际输入的值并无重复。也不知是怎么回事,请老师赐教

--  作者:有点蓝
--  发布时间:2020/2/6 13:22:00
--  
代码在什么事件,完整代码给出来看看
--  作者:wugang0131
--  发布时间:2020/2/6 15:24:00
--  
在表属性DataColChanged事件,我贴的就是完整代码,谢谢
--  作者:wugang0131
--  发布时间:2020/2/6 15:28:00
--  
麻烦老师看看这段代码怎样改善,谢谢
--  作者:y2287958
--  发布时间:2020/2/6 15:38:00
--  
肯定是没判断列名及空值