Office中国论坛/Access中国论坛

标题: [分享]判断某字段值是否存在 [打印本页]

作者: zxklzxm1983 时间: 2009-12-6 21:30
标题: [分享]判断某字段值是否存在

找了一天的东东

问题解决很开心,拿出来跟大家分享一下
------------------------------------
原作者:竹笛

作者: goto2008 时间: 2009-12-6 21:53
谢谢分享

作者: goto2008 时间: 2009-12-6 21:55
除了用模块，还可以文本框的更新后事件里写。

If Nz([文本框]) = Nz(DLookup("[文本框]", "表", "[文本框]=" & "'" & 文本框 & "'")) Then
MsgBox "您输入的XXX已存在，请重新输入！", vbExclamation, "信息提示"
Me.文本框 = Null
End If

作者: zxklzxm1983 时间: 2009-12-6 22:14
goto2008的代码好简单

我试了试怎么不行呢.给个例子吧

作者: bai7934 时间: 2009-12-7 09:35
看看

欢迎光临 Office中国论坛/Access中国论坛 (http://www.office-cn.net/)