Question

access 按钮 打开查询

在access的一个窗口上，添加一个按钮，点击按钮，打开各个已经做好了的查询。
这个按钮的代码怎么弄？
我知道了打开表的代码：
Private Sub Command0_Click()
On Error GoTo Err_Command0_Click

Dim stDocName As String

stDocName = "表1"
DoCmd.OpenTable stDocName

Exit_Command0_Click:
Exit Sub

Err_Command0_Click:
MsgBox Err.Description
Resume Exit_Command0_Click

End Sub

打开查询的代码不晓得是改哪里？先谢谢。

Answer 1

不用定义变量,直接打开就行了:
DoCmd.OpenTable "表1"

DoCmd.OpenQuery "查询1"

Answer 2

然后呢？