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”。