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

Question

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

Answer 1

Edit：我已经用通过按钮或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

这假设您的列表框名为List。您的命令按钮名为"显示"。

基本上，您想要在按钮的Click事件中运行的代码，并从列表框的DblClick事件调用该子。