Quit 事件

当 Microsoft Outlook 开始关闭时发生。该事件在 VBScript 中不可用。

object  该表达式的值为 Application 对象。

示例

本示例在 Microsoft Outlook 退出时显示再见消息。示例代码必须放在类模块中，并且在 Microsoft Outlook 调用该事件过程前必须调用 Initialize_handler 例程。

Dim WithEvents myOlApp As Outlook.Application

Sub Initialize_handler()
    Set myOlApp = CreateObject("Outlook.application")
End Sub

Private Sub myOlApp_Quit()
    MsgBox "Goodbye, " & Application.GetNamespace("MAPI").CurrentUser
End Sub