Рисование прямоугольника в VBA

Весь MS Office, программирование на Visual Basic for Applications и MS VB

Модератор: Naeel Maqsudov

Ответить
Jonnik
Сообщения: 4
Зарегистрирован: 09 дек 2007, 16:22

Подскажите как нарисовать на форме програмно в VBA прямоугольник?
Если можно приведите готовый примерчик.
Буду очень благодарен.
Teslenko_EA
Сообщения: 526
Зарегистрирован: 04 фев 2007, 18:37
Откуда: Сургут
Контактная информация:

Здравствуйте Jonnik.
Возможно в качестве прямоугольника подойдет рамка группы - Frame
Его свойства можно задать заранее, или по событию

Код: Выделить всё

Me.Frame1.Visible = True
Me.Frame1.Move 20, 20, 200, 200
Me.Frame1.BackColor = &H808000
Евгений.
Jonnik
Сообщения: 4
Зарегистрирован: 09 дек 2007, 16:22

Таких прямоугольникоа надо нарисовать не одну сотню и они должны быть закрашены.
Teslenko_EA
Сообщения: 526
Зарегистрирован: 04 фев 2007, 18:37
Откуда: Сургут
Контактная информация:

Jonnik, Me.Frame1.BackColor - это и есть "закраска" :)
Jonnik
Сообщения: 4
Зарегистрирован: 09 дек 2007, 16:22

Это то понятно. Но мне их тогда надо динамически создавать
Jonnik
Сообщения: 4
Зарегистрирован: 09 дек 2007, 16:22

А я незнаю как их создавать динамически
Аватара пользователя
Aent
Сообщения: 1129
Зарегистрирован: 01 окт 2006, 14:52
Откуда: Saratov,Russia
Контактная информация:

Jonnik, Посмотрите подробный пример здесь
http://www.andypope.info/vba/userformdraw.htm
Ответить