[分享]判断某字段值是否存在

zxklzxm1983 · 发表于 2009-12-6 21:30:03

找了一天的东东

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

goto2008 · 发表于 2009-12-6 21:53:05

谢谢分享

goto2008 · 发表于 2009-12-6 21:55:30

除了用模块，还可以文本框的更新后事件里写。

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

zxklzxm1983 · 发表于 2009-12-6 22:14:08

goto2008的代码好简单

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

bai7934 · 发表于 2009-12-7 09:35:28

看看

帐号		自动登录	找回密码
密码			注册

群介绍
Access培训群 (792054000)
Access免费培训群2 (792054000)
Access经典源码培训群 (77130759)
Access源码技巧群 (138920637)
access vba (307776555)

主题相关群

地区相关群[您还没设置居住地]

[Access本身] [分享]判断某字段值是否存在

本帖子中包含更多资源

群介绍
主题无相 (随机显示版	同地区群块其他地区)