ACCESSVBA里有兩種方法可以實現(xiàn)退出Access應(yīng)用程序。方法一使用Application對象的Quit方法例句：PrivateSubCommand1_Click()Application.QuitacQuitPromptEndSub代碼中的“退出選項”

acQuitPrompt是可選參數(shù)，顯示一個對話框，詢問用戶是否要保存已更改但尚未保存的任何數(shù)據(jù)庫對象。

還有另外兩種選項，分別是：acQuitSaveAll默認保存所有對象，而不顯示對話；

acQuitSaveNone退出MicrosoftAccess而不保存任何對象。

如果不指定“退出選項”，例如Application.Quit則系統(tǒng)默認選擇acQuitSaveAll，它不會彈出詢問框，建議使用這個默認選項。方法二使用DoCmd對象的Quit方法例句：PrivateSubCommand2_Click()DoCmd.QuitacQuitPromptEndSub代碼中的“退出選項”

acQuitPrompt是可選參數(shù)，顯示一個對話框，詢問用戶是否要保存已更改但尚未保存的任何數(shù)據(jù)庫對象。

還有另外兩種選項，分別是：acQuitSaveAll默認保存所有對象，而不顯示對話；acQuitSaveNone退出MicrosoftAccess而不保存任何對象。如果不指定“退出選項”，例如DoCmd.Quit則系統(tǒng)默認選擇acQuitSaveAll，它不會彈出詢問框，建議使用這個默認選項。說明：添加DoCmd對象的Quit方法是為了提供在MicrosoftAccessforWindows95的VisualBasic代碼中執(zhí)行Quit操作的后向兼容性。微軟推薦使用Application對象的Quit方法來代替。

刪除/插入(delete/insert)利用的是CurrentDb.Execute(stSql)。

代碼如下：

[plain]viewplaincopy

'拼寫刪除指定PRNumber的SQL文

stSql="DELETEFROM[000_BASTS]WHERE[PRNR]='"&pr_nr&"'"

'執(zhí)行SQL文

CurrentDb.Execute(stSql)