Метод Shapes.AddConnector (Издатель)

Добавляет новый объект Shape , представляющий соединитель, в указанную коллекцию Shapes .

Синтаксис

expression. AddConnector (Type, Beginx, Beginy, EndX, Endy)

выражение: переменная, представляющая объект Shapes.

Параметры

Имя Обязательный или необязательный Тип данных Описание
Тип Обязательный 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 и обратная связь.