Ms access Access 2007中的自定义按钮_Ms Access_Vba

Ms access Access 2007中的自定义按钮

ms-access vba

Ms access Access 2007中的自定义按钮,ms-access,vba,Ms Access,Vba,我正在MS Access中为我的表单添加一些自定义按钮，但不知何故，我无法使它们正常工作。在按钮属性事件选项卡中，我已将“单击”事件更改为调用“事件过程”。然后在VBasic中，我选择我的按钮，据我所知，这段代码应该给我提示，如果选择了Yos，表单应该关闭。但当我点击按钮时，什么也没发生。我做错什么了吗 Option Compare Database Option Explicit Private Sub cmdQuitApp_Click() If MsgBox("Are you sure y

我正在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

将数据库所在的文件夹配置为受信任的位置。有关详细说明，请参见“”