Метод Shape.DrawRectangle (Visio)

Статья
04/07/2023

Добавляет прямоугольник в коллекцию Фигуры страницы , образца или группы.

Синтаксис

выражение. DrawRectangle( _x1_ , _y1_ , _x2_ , _y2_ )

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

Параметры

Имя	Обязательный или необязательный	Тип данных	Описание
x1	Обязательный	Double	Координата x одного угла прямоугольника ширины и высоты.
y1	Обязательный	Double	Координата по оси Y одного угла прямоугольника ширины и высоты.
x2	Обязательный	Double	Координата x другого угла прямоугольника ширины и высоты.
y2	Обязательный	Double	Координата y другого угла прямоугольника ширины и высоты.

Возвращаемое значение

Shape

Примечания

Использование метода DrawRectangle эквивалентно использованию средства "Прямоугольник" в приложении. Аргументы находятся во внутренних единицах рисования по отношению к координатам страницы, образца или группы, где размещается прямоугольник.

Пример

В следующем примере показано, как нарисовать прямоугольник на активной странице.

 
Public Sub DrawRectangle_Example() 
 
 Dim vsoShape As Visio.Shape 
 
 Set vsoShape = ActivePage.DrawRectangle(1, 4, 4, 1) 
 
End Sub

Поддержка и обратная связь

Есть вопросы или отзывы, касающиеся Office VBA или этой статьи? Руководство по другим способам получения поддержки и отправки отзывов см. в статье Поддержка Office VBA и обратная связь.

Share via