Ms access 使用命令按钮访问2010表单-OpenQuery和PrintPreviewQuery

Ms access 使用命令按钮访问2010表单-OpenQuery和PrintPreviewQuery,ms-access,openquery,print-preview,Ms Access,Openquery,Print Preview,我创建了一个access 2010表单,其中有一个列表框和两个命令按钮。Listbox包含所有查询名称,命令按钮1用于“查询打印预览”,命令按钮2用于“打开查询”,应与Listbox中的“双击查询名称”相同。那么,如何使这些按钮和查询在列表中双击时打开?编辑:我已使用通过按钮或列表框打开查询所需的通用代码更新了我的答案。这假定列表框中的值是数据库中的有效查询名称 这很容易用一点VBA来完成 Option Explicit Private Sub List_DblClick(Cancel As I

我创建了一个access 2010表单,其中有一个列表框和两个命令按钮。Listbox包含所有查询名称,命令按钮1用于“查询打印预览”,命令按钮2用于“打开查询”,应与Listbox中的“双击查询名称”相同。那么,如何使这些按钮和查询在列表中双击时打开?

编辑:我已使用通过按钮或列表框打开查询所需的通用代码更新了我的答案。这假定列表框中的值是数据库中的有效查询名称

这很容易用一点VBA来完成

Option Explicit
Private Sub List_DblClick(Cancel As Integer)
Call Show_Click
End Sub

Private Sub Show_Click()
DoCmd.OpenQuery Me.List.Value
End Sub
这假定您的列表框称为列表。您的命令按钮称为Show


基本上,您希望在按钮的Click事件中运行的代码,并从列表框的DblClick事件中调用该sub。

因此我可以使用OpenQuery操作,但无论选择哪个查询,这将只打开一个查询。但是,当我双击列表框时,我希望能够从列表框中打开任何查询。此外,我应该能够选择一个查询并单击一个名为show的命令按钮,它应该执行与双击查询相同的操作。我不知道如何使用宏来执行此操作。我可能做错了什么。此代码是否应该显示我从列表中双击的查询?仅当您在“显示”按钮中使用VBA,并且“显示”按钮执行它应该执行的操作时。我不知道我们也需要提供给你。嗯。。因此,我需要能够访问我从列表框中选择的任何查询,方法是双击它们或选择,然后单击“显示”按钮。我用显示按钮的示例代码更新了我的答案,该按钮将根据列表框的值打开查询。非常感谢,这完美地解决了我的问题。我只是VBA和Access的初学者,但这个解决方案肯定会影响我的学习曲线。我的打印预览按钮也使用了acViewPreview。