如果满足查询条件，则访问显示消息框

Question

嗨，我正在尝试根据查询中的值显示消息框。我已经尝试了以下DLookUp功能：

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

基本上，我想查看查询中的ID1是否与表单中的ID2匹配。但是，DLookUp并没有按照(我(的预期工作。

Answer 1

在 DLookuup 中包含筛选条件。连接变量，对表单字段/控件的引用是一个变量。如果没有匹配项，则返回 Null。由于您在评论中说仅当查询中存在匹配项时才需要消息：

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