关于DLookup的问题

lukeaccess　发表于：2011-02-12 11:24:48 　

我想在窗体的一个文本框中的值，表中是否有。
1.If (DLookup("[材料名称]", "表", "[材料名称] <> '" & Me.材料名称 & "'")) Then
msgbox"材料名称相同"
else
msgbox"材料名称不同"
end if

2.If DLookup("[材料名称]", "表") = Me.材料名称 Then
msgbox"材料名称相同"
else
msgbox"材料名称不同"
end if
都会出现类型不匹配的错误，但是我的数据类型确实是文本型没有不匹配，不知道是什么原因，请高手指点

王樵民发表于：2011-02-12 11:42:15

你的错误主要是，DLookup是一个函数，将要返回从记录集中找出满足条件的字段值，返回的不是布尔型，所以错误正确的写法如下：

If (DLookup("[材料名称]", "new", "[材料名称]='" & Me.材料名称 & "'") <> "") Then
MsgBox "材料名称相同"
Else
MsgBox "材料名称不同"
End If

总记录：1篇页次：1/1 9 1 :

Access交流中心