Page.DrawLine 方法 (Visio)

向页面的 Shapes 集合添加线条。

语法

expressionDrawLine( _xBegin_ , _yBegin_ , _xEnd_ , _yEnd_ )

表达 一个代表 Page 对象的变量。

参数

名称 必需/可选 数据类型 说明
xBegin 必需 Double 线条起点的 x 轴坐标值。
yBegin 必需 Double 线条起点的 y 轴坐标值。
xEnd 必需 Double 线条终点的 X 轴坐标值。
yEnd 必需 Double 线条终点的 Y 轴坐标值。

返回值

Shape

说明

使用 DrawLine 方法等效于使用 Microsoft Visio 中的“线条”工具。 参数以放置线条的页面、主控形状或组的坐标空间的内部绘图单位表示。

示例

以下示例显示如何在活动页上绘制线条形状。

 
Public Sub DrawLine_Example() 
 
 Dim vsoShape As Visio.Shape 
 
 Set vsoShape = ActivePage.DrawLine(5, 4, 7.5, 1) 
 
End Sub

支持和反馈

有关于 Office VBA 或本文档的疑问或反馈? 请参阅 Office VBA 支持和反馈,获取有关如何接收支持和提供反馈的指南。