在Access VBA中执行隐藏查询

我想从VBA执行查询，但我不想向用户显示查询。我只想执行它，这样我的VBA代码就可以得到结果并将它们显示在表单上。有什么建议吗？

我假设您不希望向用户显示消息框，例如“您将要更新3条记录…”

您可以使用docmd.setwarnings

DoCmd.SetWarnings False
DoCmd.OpenQuery "Your Query Name", acViewNormal, acEdit
DoCmd.SetWarnings True

---

我已经回答了我自己的问题！这是一个很大的帮助，下面是我的代码：

Dim dbs As DAO.Database
Dim qdf As DAO.QueryDef
Dim rst As DAO.Recordset
Set dbs = CurrentDb
Set qdf = dbs.QueryDefs("GetVisitDetails")
qdf.Parameters("[Forms]![Visitor Management]![VRN]") = 1
Set rst = qdf.OpenRecordset()

---

然后我可以使用记录集。现在我只需要解决如何从表单中获取值。

您是否正在编译代码并为用户提供mde或accde？如果是这样的话，生活就会变得非常简单。

DoCmd.SetWarnings False

对于正确的错误处理来说，永远都不是一个好的建议或合适的替代品。