Метод 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 и обратная связь.