Quit 方法
内容
Quit 方法用于退出 Microsoft Access。在退出前，可以选择其中一项选项来保存数据库对象。
expression.Quit(Option)
expression 必需。返回一个 Application 对象的表达式。
Option 可选 AcQuitOption。退出选项。
AcQuitOption 可以是下列 AcQuitOption 常量之一： |
acQuitPrompt 显示一个对话框，询问用户是否要保存已更改但尚未保存的任何数据库对象。（以前为 acPrompt）。 |
acQuitSaveAll 默认 保存所有对象，而不显示对话框。（以前为 acSaveYes）。 |
acQuitSaveNone 退出 Microsoft Access 而不保存任何对象。（以前为 acExit）。 |
说明
Quit 方法和单击“文件”菜单上的“退出”效果相同。可以创建自定义菜单命令或在窗体上创建一个过程中包括 Quit 方法的命令按钮。例如，可以将一个 Quit 按钮放在窗体上，并在按钮的 Click 事件中包含一个使用 Quit 方法的过程，该方法的 Option 参数设为 acQuitSaveAll。
在 Visual Basic 中，DoCmd 对象的 Quit 方法执行 Quit 操作。
expression.Quit(Options)
expression 必需。返回一个 DoCmd 对象的表达式。
Options 可选 AcQuitOption。退出选项。
AcQuitOption 可以是下列 AcQuitOption 常量之一： |
acQuitPrompt 显示一个对话框，询问用户是否要保存已更改但尚未保存的任何数据库对象。 |
acQuitSaveAll 默认 保存所有对象而不显示对话框。 |
acQuitSaveNone 退出 Microsoft Access 而不保存任何对象。 |
说明
添加 DoCmd 对象的 Quit 方法是为了提供在 Microsoft Access for Windows 95 的 Visual Basic 代码中执行 Quit 操作的后向兼容性。建议使用 Application 对象的 Quit 方法来代替。
示例
下面的示例显示了名为 AppExit 的命令按钮的 Click 事件过程。在单击 AppExit 按钮之后，将显示一个对话框来提示用户保存更改，然后退出 Microsoft Access。
Private Sub AppExit_Click()
Application.Quit acQuitPrompt
End Sub
下面的示例显示一个或多个对话框，这些对话框在用户退出 Microsoft Access 时，询问其是否保存已更改的任何对象：
DoCmd.Quit acQuitPrompt