Viewer.OnViewChanged 事件 (Visio Viewer)

在 Microsoft Visio Viewer 中更改当前页视图时发生。

语法

表达式OnViewChanged (PageXAtViewCenterPageYAtViewCenterZoomFactor)

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

参数

名称 必需/可选 数据类型 说明
PageXAtViewCenter 必需 Double 页面中心的 x 坐标(以绘图单位为单位)。
PageYAtViewCenter 必需 Double 页面中心的 y 坐标(以绘图单位为单位)。
ZoomFactor 必需 Double 缩放 () 页面大小乘以的因素。

返回值

Nothing

注解

页面视图由页面的中心点(以 x-y 页坐标表示),坐标系统原点位于页面左下角,缩放因子(以数字百分比表示),范围从 1% 到 400%。

可以使用 GetPageView 方法在 Visio Viewer 中获取当前页视图,并且可以使用 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 支持和反馈,获取有关如何接收支持和提供反馈的指南。