如果查询条件符合，则访问显示消息框

Question

您好我试图根据查询中的值显示消息框。我已经尝试了以下的DLookUp功能：

If (DLookup("ID1", "qry_CheckID") = Forms!MainForm!ID2) Then
    MsgBox "Your ID is bad.", vbOKOnly, ""
End If

基本上我想看看我的查询中的ID1是否与我表单中的ID2匹配。然而，DLookUp并没有按照我的意图工作。

Answer 1

在DLookup中包含过滤条件。连接变量，对表单字段/控件的引用是一个变量。如果没有匹配，Null将返回。因为在您的评论中，您说只有在查询中存在匹配项时才需要该消息：

If Not IsNull(DLookup("ID1", "qry_CheckID", "ID1 = " & Forms!MainForm!ID2)) Then
MsgBox "Your ID is bad.", vbOKOnly, ""
End If