在访问中，来自表单的查询不会显示记录

Question

我正在创建一个数据库，该数据库收集有关雇主的信息。

我正在尝试创建一个将打开参数查询的表单。该表格有一个列出雇主的组合框，然后是一个用于搜索和取消的命令按钮。当用户从组合框中进行选择并单击表单中的搜索按钮时，我想访问以基于选择打开查询。我对从多个表中提取的查询做了类似的操作，并遇到了类似的问题，可通过更改JOIN来解决。这次查询仅从一个表中提取。

这是查询的SQL

SELECT
    [Employer Contact].Employer, [Employer Contact].Supervisor,
    [Employer Contact].[Supervisor Phone], [Employer Contact].[Supervisor Email],
    [Employer Contact].Street, [Employer Contact].Town, [Employer Contact].Zip,
    [Employer Contact].Region
FROM
    [Employer Contact]
WHERE
    ((([Employer Contact].Employer)=[Forms]![Edit Employer Contact Info]![cboContactSearch]));

这是表格的VBA

Private Sub cmdContactSearch_Click()
    On Error Resume Next
    DoCmd.OpenQuery "Employer Contact Query", acViewNormal
    DoCmd.Close acForm, "Edit Employer Contact Info"
End Sub

如何设置它，以便当用户单击搜索时，查询会打开并显示所选记录？