Access VBA教程:Quit方法

应用于 Application对象的 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。

应用于 DoCmd对象的 Quit方法。

DoCmd对象的 Quit方法在 Visual Basic 中执行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方法来代替。

示例

应用于 Application 对象。

下面的示例显示了名为 AppExit 的命令按钮的 Click事件过程。在单击 AppExit 按钮之后,将显示一个对话框来提示用户保存更改,然后退出 Microsoft Access。


Private Sub AppExit_Click()
    Application.Quit acQuitPrompt
End Sub

应用于 DoCmd对象。

下面的示例显示一个或多个对话框,在退出 Microsoft Access 之前,询问用户是否保存任何已更改的对象:


DoCmd.Quit acQuitPrompt

上页:Access VBA教程:PSet方法 下页:Access VBA教程:Recalc方法

Access VBA教程:Quit方法

Access VBA教程:Recalc方法 Access VBA教程:Refresh方法
Access VBA教程:RefreshDatabaseWindow方法 Access VBA教程:DefaultWorkspaceClone方法
Access VBA教程:Remove方法 Access VBA教程:RemoveItem方法
Access VBA教程:Repaint方法 Access VBA教程:ReplaceLine方法
Access VBA教程:Requery方法 Access VBA教程:Run方法
Access VBA教程:RunCommand方法 Access VBA教程:Scale方法
Access VBA教程:导出报表快照 (Snapshot Viewer) Access VBA教程:SetDefaultWorkgroupFile方法
Access VBA教程:SetFocus方法 Access VBA教程:SetHiddenAttribute方法
Access VBA教程:SetOption方法 Access VBA教程:SizeToFit方法
Access VBA教程:StringFromGUID方法 Access VBA教程:SysCmd方法
版权所有 © 中山市飞娥软件工作室 证书:粤ICP备09170368号