Share via


Viewer.OnReviewerChanged 事件 (Visio 檢視器)

發生于特定檢閱者的標記 (批註在Microsoft Visio 檢視器中變更時) 。

語法

運算式OnReviewerChanged (ReviewerIndexReviewerVisible)

表達 會傳回 Viewer 物件的 運算式。

參數

名稱 必要/選用 資料類型 描述
ReviewerIndex 必要 Long 檢閱者的索引。
ReviewerVisible 必要 布林值 指出檢閱者的標記是否顯示在使用者介面中。

傳回值

註解

檢視器中檢閱者的集合是以一為基底,因此集合中第一個檢閱者的索引是 1。

您可以藉由設定ReviewerMarkupVisible屬性,指定Visio 檢視器使用者介面中是否顯示檢閱者的標記。

當特定檢閱者的標記重迭設定為可見或不可見時,就會發生 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 支援與意見反應