如何验证一个文本框中的内容是否在另一个表中？

zhylee · 发表于 2012-1-2 14:46:55

想做个代码验证输入的是否存在在表中'存在就查看，不存在就写入这个值！

roych · 发表于 2012-1-2 20:07:19

本帖最后由 roych 于 2012-1-2 20:07 编辑

用Dlookup来试试。例如：
If Not IsNull(Me.Text0) Then
If Not Isnull(Dlookup("字段1","表1","字段1='" & Me.Text0 &"'")) Then
Docmd.RunSQL "Insert Into 表1(字段1) values('" & Me.Text0&"')"
End If
End If

Henry D. Sy · 发表于 2012-1-2 22:43:33

好像多了个not。{:soso_e100:}

Henry D. Sy · 发表于 2012-1-2 22:42:32

roych版的简单，易懂！
当然了，也可以用记录集！

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

群介绍
Access培训群 (792054000)
Access免费培训2群 (163530137)
Access免费培训群 (833510950)
Access免费培训群2 (792054000)
Access交流总群 (5004108)

主题相关群

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

[窗体] 如何验证一个文本框中的内容是否在另一个表中？

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