如何在 Access 表单中显示查询结果？

Posted 2023-04-19

【中文标题】如何在 Access 表单中显示查询结果？

【英文标题】：How to show query results in an Access form?

【发布时间】：2020-07-31 09:01:50

【问题描述】：

表单包含一个文本框、一个按钮和一个子表单（我只是通过将查询拖到表单中来创建的）。该表包含 8 个字段。当输入这些字段关键字中的任何一个时，与这些关键字匹配的所有记录都应以相同的形式显示。但取而代之的是，Access 在单独的窗口中显示结果。我该如何解决这个问题？

我没有包含完整的 where 子句，这是我的查询：

选择 * 从表 WHERE Account_Name Like "" & [Forms]![Form1]![Text0] & "" OR Opportunity_Name Like "" & [Forms]![Form1]![Text0] & "" 或者 .....

我已将此查询分配给按钮。这是我的按钮点击事件：

Private Sub Command2_Click()
On Error GoTo Err_Command2_Click

    Dim stDocName As String

    stDocName = "Search2"
    DoCmd.OpenQuery stDocName, acNormal, acEdit
    DoCmd.Requery
    subform.Requery

Exit_Command2_Click:
    Exit Sub

Err_Command2_Click:
    MsgBox Err.Description
    Resume Exit_Command2_Click
End Sub

它可以工作，但唯一的问题是它在单独的窗口中显示数据。我怎样才能解决这个问题？谢谢。

【参考方案1】：

它会打开一个单独的窗口，因为这是编写代码的目的。删除两个 DoCmd 行。那么重新查询的代码必须引用子表单容器控件。

Me.subformContainerName.Requery

【讨论】：

非常感谢。还有一个问题。我如何修改文本框按键事件以在用户继续输入时过滤并显示结果，而不是单击搜索按钮？

点评***.com/questions/46810301/…