Microsoft Access：基于输入的不同查询

【问题标题】：Microsoft Access: Different Queries Based On InputMicrosoft Access：基于输入的不同查询
【发布时间】：2018-12-25 19:26:24
【问题描述】：

我想创建一个表单，其中包含一个查询下拉列表，然后是一个按钮，当我按下它时，会运行我从该下拉列表中选择的查询。

我不介意手动填写下拉菜单，然后在可能的情况下添加比较代码。最好的方法是什么？

【问题讨论】：

问题在于运行查询。按钮的操作将我限制为特定查询，但我希望这取决于我从组合框中选择的查询。
“按钮的操作将我限制在特定的查询中” - 仅当您仅使用 GUI 和/或向导时。如果您编写 VBA，则没有这样的限制。请参阅下面 Minty 的回答。

标签： sql forms ms-access interactive

【解决方案1】：

您可以使用以下查询填充组合或可能更好的列表框。这将列出所有以 qryRep... 开头的查询并将它们显示为 Rep...

SELECT MsysObjects.Name, Mid([Name],4) AS QueryName
FROM MsysObjects
WHERE (((Left([Name],6))="qryRep"))
ORDER BY MsysObjects.Name;

通过将显示限制为指定组，您不会列出数据库中的每个查询。

从列表框的双击事件运行查询 - 假设它被称为 lstQueries；

 Private Sub lstQueries_DblClick(Cancel As Integer)

        Dim txtQueryName     As String

        txtQueryName = Me.lstQueries
        DoCmd.OpenQuery txtQueryName , acViewNormal, acReadOnly
 End sub

这将以只读视图打开查询。

【讨论】：

问题在于运行查询。按钮的操作将我限制为特定查询，但我希望这取决于我从组合框中选择的查询。