如何在訪問中通過按鈕點擊的形式運行查詢和模塊？

Question

我有兩個保存的查詢和一個模塊， 我想讓這些按鈕在一個窗體中運行。

我想一個簡單的代碼successless：

Private Sub Button1_Click() 

CurrentDb.Execute "q1" 
CurrentDb.Execute "q2" 
CurrentDb.Execute "modul1" 
MsgBox ("finish!") 




End Sub 

可能有人幫助我嗎？

謝謝!!

Answer 1

試試這個：

DoCmd.OpenQuery "q1" 
DoCmd.OpenQuery "q2" 
DoCmd.OpenModule "modul1"