共用方式為


Viewer.OnViewChanged 事件 (Visio 檢視器)

在 Microsoft Visio 檢視器 中變更目前頁面的檢視時發生。

語法

運算式OnViewChanged (PageXAtViewCenterPageYAtViewCenterZoomFactor)

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

參數

名稱 必要/選用 資料類型 描述
PageXAtViewCenter 必要 雙精確度 頁面中央的 X 座標,以繪圖單位表示。
PageYAtViewCenter 必要 雙精確度 以繪圖單位表示的 Y 座標,位於頁面中央。
ZoomFactor 必要 雙精確度 縮放 (頁面大小) 相乘的因數。

傳回值

註解

頁面檢視包含以 x-y 頁面座標表示的頁面中心點,以及頁面左下角座標系統的原點,以及以數值百分比表示的縮放因數,範圍從 1% 到 400%。

您可以使用GetPageView方法在Visio 檢視器中取得目前的頁面檢視,而且可以使用SetPageView方法以程式設計方式設定頁面檢視。

範例

下列程式碼示範如何使用 OnViewChanged 事件,在 [即時運算] 視窗中顯示新的頁面檢視資料。

Private Sub vsoViewer_OnViewChanged(ByVal PageXAtViewCenter As Double, ByVal PageYAtViewCenter As Double, ByVal ZoomFactor As Double)

    Dim dblXPoint As Double

    Dim dblYPoint As Double

    Dim dblZoomFactor As Double

    vsoViewer.GetPageView dblXPoint, dblYPoint, dblZoomFactor

    Debug.Print "New x-coordinate is:"; dblXPoint

    Debug.Print "New y-coordinate is:"; dblYPoint

    Debug.Print "New zoom factor is:"; dblZoomFactor

End Sub

支援和意見反應

有關於 Office VBA 或這份文件的問題或意見反應嗎? 如需取得支援服務並提供意見反應的相關指導,請參閱 Office VBA 支援與意見反應