1.获取或设置窗口中页面的当前显示大小(缩放系数)
Window.Zoom Dim dZoom As Double dZoom = m_Visio.Window.Zoom‘获取显示比例 m_Visio.Window.Zoom = 1‘设置显示比例
此设置相当于visio中设置缩放比例。默认返回值是1(即100%),最小为0.1,最大为2.915。
2.确定是否在窗口中显示形状连接点。可读写。
Window.ShowConnectPoints m_Visio.Window.Application.ActiveWindow.ShowConnectPoints = True ‘显示连接点
时间: 2024-12-30 03:26:37