CanvasShapes.AddConnector 方法 (Word)

返回一个 Shape 对象,该对象代表画布上两个形状间的连线。

语法

表达式AddConnector (TypeBeginXBeginYEndXEndY)

expression 是必需的。 一个代表 CanvasShapes 对象的变量。

参数

名称 必需/可选 数据类型 说明
Type 必需 MsoConnectorType 连接符的类型。
BeginX 必需 Single 标记连接符的起点的水平位置。
BeginY 必需 Single 标记连接符的起点的垂直位置。
EndX 必需 Single 标记连接符的终点的水平位置。
EndY 必需 Single 标记连接符的终点的垂直位置。

示例

本示例在新文档的新画布上添加一个直接连接符。

Sub AddCanvasConnector() 
 
 Dim docNew As Document 
 Dim shpCanvas As Shape 
 
 Set docNew = Documents.Add 
 
 'Add drawing canvas to new document 
 Set shpCanvas = docNew.Shapes.AddCanvas( _ 
 Left:=150, Top:=150, Width:=200, Height:=300) 
 
 'Add connector to the drawing canvas 
 shpCanvas.CanvasItems.AddConnector _ 
 Type:=msoConnectorStraight, BeginX:=150, _ 
 BeginY:=150, EndX:=200, EndY:=200 
 
End Sub

另请参阅

CanvasShapes 集合

支持和反馈

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