Access 2007中的自定義按鈕

Question

我在MS Access中爲我的表單添加了一些自定義按鈕，但不知怎的，我無法讓它們工作。在按鈕屬性中「事件」選項卡我已更改「點擊」事件以調用「事件過程」​​。然後在VBasic中，我選擇了我的按鈕，並從我知道的代碼應該給我提示，如果選擇了Yos，表單應該關閉。但是當我點擊我的按鈕時，沒有任何反應。難道我做錯了什麼 ？

Option Compare Database 
Option Explicit 

Private Sub cmdQuitApp_Click() 
If MsgBox("Are you sure you want to close the form?", vbYesNo + vbQuestion + vbInformation, "Clasing the form.") = vbYes Then 
DoCmd.Close 
End If 
End Sub 

Answer 1

將數據庫所在的文件夾配置爲受信任位置。有關詳細說明，請參閱「Create, remove, or change a trusted location for your files」。