ACCESSVBA里有两种方法可以实现退出Access应用程序。方法一使用Application对象的Quit方法例句：Private Sub Command1_Click() Application.Quit acQuitPromptEnd Sub代码中的“退出选项”
acQuitPrompt是可选参数，显示一个对话框，询问用户是否要保存已更改但尚未保存的任何数据库对象。
还有另外两种选项，分别是：acQuitSaveAll默认 保存所有对象，而不显示对话；
acQuitSaveNone 退出MicrosoftAccess而不保存任何对象。
如果不指定“退出选项”，例如 Application.Quit 则系统默认选择 acQuitSaveAll，它不会弹出询问框，建议使用这个默认选项。方法二使用DoCmd对象的Quit方法例句：Private Sub Command2_Click() DoCmd.Quit acQuitPromptEnd Sub代码中的“退出选项”
acQuitPrompt是可选参数，显示一个对话框，询问用户是否要保存已更改但尚未保存的任何数据库对象。
还有另外两种选项，分别是：acQuitSaveAll默认 保存所有对象，而不显示对话；acQuitSaveNone 退出MicrosoftAccess而不保存任何对象。如果不指定“退出选项”，例如 DoCmd.Quit 则系统默认选择 acQuitSaveAll，它不会弹出询问框，建议使用这个默认选项。说明：添加DoCmd对象的Quit方法是为了提供在MicrosoftAccessforWindows95的VisualBasic代码中执行Quit操作的后向兼容性。微软推荐使用Application对象的Quit方法来代替。
