Viewer.OnReviewerChanged 事件 (Visio Viewer)

当特定审阅者的标记 (注释) 的可见性在Microsoft Visio Viewer中更改时发生。

语法

表达式。OnReviewerChanged (ReviewerIndex、 ReviewerVisible)

表达 返回 Viewer 对象的表达式。

参数

名称	必需/可选	数据类型	说明
ReviewerIndex	必需	Long	审阅者的索引。
审阅者可见	必需	Boolean	指示审阅者的标记在用户界面中是否可见。

返回值

Nothing

注解

查看器中的审阅者集合从 1 开始，因此集合中第一个审阅者的索引为 1。

可以通过设置 ReviewerMarkupVisible 属性来指定审阅者的标记在Visio Viewer用户界面中是否可见。

当特定审阅者的标记覆盖设置为可见或不可见时，将发生 OnReviewerChanged 事件。

当绘图中所有审阅者的标记覆盖设置为可见或不可见时， 将发生 OnMarkupOverlaysVisibleChanged 事件。

示例

以下代码演示如何使用 OnReviewerChanged 事件在“即时”窗口中打印一条消息，标识审阅者并声明审阅者标记的可见性状态。

Private Sub vsoViewer_OnReviewerChanged(ByVal ReviewerIndex As Long, ByVal ReviewerVisible As Boolean)

    If ReviewerVisible Then

        Debug.Print "Reviewer "; vsoViewer.ReviewerName(ReviewerIndex); " markup is visible."

    Else

        Debug.Print "Reviewer "; vsoViewer.ReviewerName(ReviewerIndex); " markup is not visible."

    End If

End Sub

支持和反馈

有关于 Office VBA 或本文档的疑问或反馈？ 请参阅 Office VBA 支持和反馈，获取有关如何接收支持和提供反馈的指南。