将表示连接线的新 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 支持和反馈，获取有关如何接收支持和提供反馈的指南。