ACCESS VBA裏有兩種方法可以實現退出Access應用程序。
方法壹
使用Application對象的Quit方法
例句:
Private?Sub?Command1_Click()Application.Quit?acQuitPrompt
End?Sub
代碼中的“退出選項 ”
acQuitPrompt 是可選參數,顯示壹個對話框,詢問用戶是否要保存已更改但尚未保存的任何數據庫對象。
還有另外兩種選項,分別是:
acQuitSaveAll 默認?保存所有對象,而不顯示對話;
acQuitSaveNone? 退出 Microsoft Access 而不保存任何對象。
如果不指定“退出選項 ”,例如?Application.Quit ?則系統默認選擇?acQuitSaveAll,它不會彈出詢問框,建議使用這個默認選項。
方法二
使用DoCmd對象的Quit方法
例句:
Private?Sub?Command2_Click()DoCmd.Quit?acQuitPrompt
End?Sub
代碼中的“退出選項 ”
acQuitPrompt 是可選參數,顯示壹個對話框,詢問用戶是否要保存已更改但尚未保存的任何數據庫對象。
還有另外兩種選項,分別是:
acQuitSaveAll 默認?保存所有對象,而不顯示對話;
acQuitSaveNone? 退出 Microsoft Access 而不保存任何對象。
如果不指定“退出選項 ”,例如?DoCmd.Quit ?則系統默認選擇?acQuitSaveAll,它不會彈出詢問框,建議使用這個默認選項。
說明:添加 DoCmd 對象的 Quit 方法是為了提供在 Microsoft Access for Windows 95 的 Visual Basic 代碼中執行 Quit 操作的後向兼容性。微軟推薦使用 Application 對象的 Quit 方法來代替。