Shapes.AddConnector 方法 (Publisher)

将表示连接线的新 Shape 对象添加到指定的 Shapes 集合。

语法

表达式。AddConnector (Type、 BeginX、 BeginY、 EndX、 EndY)

expression：一个表示 Shapes 对象的变量。

参数

名称	必需/可选	数据类型	说明
Type	必需	MsoConnectorType	要添加的连接符的类型。 可以是 MsoConnectorType 常量之一，但 msoConnectorTypeMixed 除外，后者不与此方法一起使用。
BeginX	必需	Variant	连接符的起点的 x 轴坐标值。
BeginY	必需	Variant	连接符的起点的 y 轴坐标值。
EndX	必需	Variant	连接符的终点的 x 轴坐标值。
EndY	必需	Variant	连接符的终点的 y 轴坐标值。

返回值

Shape

说明

对于 BeginX、 BeginY、 EndX 和 EndY 参数，数值以 磅为单位计算：字符串可以位于 Microsoft Publisher (支持的任何单元中，例如，“2.5 in”) 。

新的连接器未连接到任何其他形状;使用 BeginConnect 和 EndConnect 方法将新的连接器连接到另一个形状。

示例

以下示例将新的直线连接符添加到当前出版物的第一页。

Dim shpConnect As Shape 
 
Set shpConnect = ActiveDocument.Pages(1).Shapes.AddConnector _ 
 (Type:=msoConnectorStraight, _ 
 BeginX:=144, BeginY:=144, _ 
 EndX:=180, EndY:=72)

支持和反馈

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