SyncEnd 事件

在 Microsoft Outlook 使用指定的同步配置文件完成同步处理用户文件夹后立刻发生。该事件在 VBScript 中不可用。

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

示例

本示例更新窗体中的标签来显示同步结束，并更改窗体中按钮的启用状态。示例代码必须放在类模块中，并且在 Microsoft Outlook 调用该事件过程前必须调用 Initialize_handler 例程。

Dim myOlApp As New Outlook.Application
Dim WithEvents mySync As Outlook.SyncObject
Dim myForm As New Form1

Sub Initialize_handler()
    Set mySync = myOlApp.Session.SyncObjects.Item(1)
End Sub

Private Sub mySync_SyncEnd()
    Form1.Label1.Caption = "Synchronization complete."
    Form1.Command1.Enabled = True
    Form1.Command2.Enabled = False
End Sub