Share via

Shape.DrawLine 方法 (Visio)

  • 项目

将线条添加到组合形状的 Shapes 集合。

语法

expression。 DrawLine( _xBegin_ , _yBegin_ , _xEnd_ , _yEnd_ )

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

参数

名称 必需/可选 数据类型 说明
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 支持和反馈，获取有关如何接收支持和提供反馈的指南。