如何让Access在退出系统前提示用户

　　很简单,建立一个窗体,名字叫隐藏,并在启动选项内选定这个窗体为启动时自动打开.

　然后在窗体的加载事件内加入如下代码:

　Private Sub Form_Load()

　Me.Visible = False

　End Sub

　'在窗体的卸载事件中加入如下代码:

 

　Private Sub Form_Unload(cel As Integer)

　If MsgBox("你真的要退出吗?", vbYesNo + vbQuestion, "请确认…") = vbNo Then Cancel = True

　End Sub