Office中国论坛/Access中国论坛

标题: 怎么判断text1,text2二选一必填且只能填一个(已解决) [打印本页]

作者: pascal331    时间: 2011-12-14 16:08
标题: 怎么判断text1,text2二选一必填且只能填一个(已解决)
本帖最后由 pascal331 于 2011-12-14 16:22 编辑

如题,请问这样的代码该怎么写

要弹出msgbox
找到实例了,谢谢关注
作者: chuyuchun    时间: 2011-12-15 11:30
哈哈  才看到  回复的晚了 不过楼主没有把示例方法发出来  我补充一下:

Private Sub Text7_GotFocus()
    If Len(Me.Text9) > 0 Then MsgBox "已有联系人1数据,联系人2不能再填入内容了": Me.Text9.SetFocus
End Sub
Private Sub Text9_GotFocus()
    If Len(Me.Text7) > 0 Then MsgBox "已有联系人2数据,联系人1不能再填入内容了容": Me.Text7.SetFocus
End Sub
作者: chuyuchun    时间: 2011-12-15 11:31
迟到的回答
作者: chuyuchun    时间: 2011-12-15 13:15
[attach]47667[/attach]

附件:
[attach]47668[/attach]




欢迎光临 Office中国论坛/Access中国论坛 (http://www.office-cn.net/) Powered by Discuz! X3.3