共用方式為


Close Event

Occurs when the inspector associated with a Microsoft Outlook item or when an explorer is being closed.

Subobject**_Close**(Cancel As Boolean)

*object   * An expression that evaluates to an object in the Applies To list. In Microsoft Visual Basic Scripting Edition (VBScript), use the word Item.

Cancel Optional (not used in VBScript). False when the event occurs. If the event procedure sets this argument to True, the close operation is not completed and the inspector is left open.

Remarks

In Microsoft Visual Basic Scripting Edition (VBScript), if you set the return value of this function to False, the close operation isn't completed and the inspector is left open. This event cannot be cancelled for the Inspector and Explorer objects.

If you use the **Close**method to fire this event, it can only be canceled if the Close method uses the olPromptForSave argument.

Example

This Microsoft Visual Basic/Visual Basic for Applications (VBA) example tests for the Close event and if the item has not been Saved, it uses the Save method to save the item without prompting the user.

Public WithEvents myItem As Outlook.MailItem

Public Sub Initalize_Handler()
    Set myItem = Application.ActiveInspector.CurrentItem
End Sub

Private Sub myItem_Close(Cancel As Boolean)
    If Not myItem.Saved Then
       myItem.Save
       MsgBox " The item was saved."
    End If
End Sub

Applies to | AppointmentItem Object | ContactItem Object | DistListItem Object | DocumentItem Object | Explorer Object | Inspector Object | JournalItem Object | MailItem Object | MeetingItem Object | PostItem Object | RemoteItem Object | ReportItem Object | TaskItem Object | TaskRequestAcceptItem Object | TaskRequestDeclineItem Object | TaskRequestItem Object | TaskRequestUpdateItem Object