Microsoft Outlook 使用指定的 Send\Receive 组同步用户的文件夹时定期发生。
语法
expression。
Progress( _State_ , _Description_ , _Value_ , _Max_ )
表达 一个代表 SyncObject 对象的变量。
参数
| 名称 | 必需/可选 | 数据类型 | 说明 |
|---|---|---|---|
| 状态 | 必需 | OlSyncState | 标识同步进程的当前状态的值。 |
| Description | 必需 | String | 有关同步进程的当前状态的文字说明。 |
| 值 | 必需 | Long | 指定同步进程的当前值（如已同步处理的项目数目）。 |
| Max | 必需 | Long | Value 可以达到的最大值。 Value 与 Max 的比率表示同步过程的完成百分比。 |
备注
该事件在 Microsoft Visual Basic Scripting Edition (VBScript) 中不可用。
示例
此Microsoft Visual Basic for Applications (VBA) 示例显示同步进度。 示例代码必须置于类模块中，并可以通过 Outlook 调用事件过程之前，必须调用 Initialize_handler例程。
Public WithEvents mySync As Outlook.SyncObject
Sub Initialize_handler()
Set mySync = Application.Session.SyncObjects.Item(1)
mySync.Start
End Sub
Private Sub mySync_Progress(ByVal State As Outlook.OlSyncState, ByVal Description As String, ByVal Value As Long, ByVal Max As Long)
If Not Description = "" Then
MsgBox Description
End If
End Sub
另请参阅
支持和反馈
有关于 Office VBA 或本文档的疑问或反馈？ 请参阅 Office VBA 支持和反馈，获取有关如何接收支持和提供反馈的指南。