Viewer.OnViewChanged 事件 (Visio 檢視器)
在 Microsoft Visio 檢視器 中變更目前頁面的檢視時發生。
語法
運算式。OnViewChanged (PageXAtViewCenter、 PageYAtViewCenter、 ZoomFactor)
表達 會傳回 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 支援與意見反應。