應(yīng)用于 Application 對象的 Quit 方法。
Quit 方法用于退出 Microsoft Access。在退出前,可以選擇其中一項(xiàng)選項(xiàng)來保存數(shù)據(jù)庫對象。
expression.Quit(Option)
expression 必需。返回一個(gè) Application 對象的表達(dá)式。
Option 可選 AcQuitOption。退出選項(xiàng)。
AcQuitOption 可以是下列 AcQuitOption 常量之一: |
acQuitPrompt 顯示一個(gè)對話框,詢問用戶是否要保存已更改但尚未保存的任何數(shù)據(jù)庫對象。(以前為 acPrompt)。 |
acQuitSaveAll 默認(rèn) 保存所有對象,而不顯示對話框。(以前為 acSaveYes)。 |
acQuitSaveNone 退出 Microsoft Access 而不保存任何對象。(以前為 acExit)。 |
說明
Quit 方法和單擊“文件”菜單上的“退出”效果相同??梢詣?chuàng)建自定義菜單命令或在窗體上創(chuàng)建一個(gè)過程中包括 Quit 方法的命令按鈕。例如,可以將一個(gè) Quit 按鈕放在窗體上,并在按鈕的 Click 事件中包含一個(gè)使用 Quit 方法的過程,該方法的 Option 參數(shù)設(shè)為 acQuitSaveAll。
在 Visual Basic 中,DoCmd 對象的 Quit 方法執(zhí)行 Quit 操作。
expression.Quit(Options)
expression 必需。返回一個(gè) DoCmd 對象的表達(dá)式。
Options 可選 AcQuitOption。退出選項(xiàng)。
AcQuitOption 可以是下列 AcQuitOption 常量之一: |
acQuitPrompt 顯示一個(gè)對話框,詢問用戶是否要保存已更改但尚未保存的任何數(shù)據(jù)庫對象。 |
acQuitSaveAll 默認(rèn) 保存所有對象而不顯示對話框。 |
acQuitSaveNone 退出 Microsoft Access 而不保存任何對象。 |
說明
添加 DoCmd 對象的 Quit 方法是為了提供在 Microsoft Access for Windows 95 的 Visual Basic 代碼中執(zhí)行 Quit 操作的后向兼容性。建議使用 Application 對象的 Quit 方法來代替。
下面的示例顯示了名為 AppExit 的命令按鈕的 Click 事件過程。在單擊 AppExit 按鈕之后,將顯示一個(gè)對話框來提示用戶保存更改,然后退出 Microsoft Access。
Private Sub AppExit_Click()
Application.Quit acQuitPrompt
End Sub
下面的示例顯示一個(gè)或多個(gè)對話框,這些對話框在用戶退出 Microsoft Access 時(shí),詢問其是否保存已更改的任何對象:
DoCmd.Quit acQuitPrompt