назад | содержание | вперед

Доработка программного кода элемента ActiveX

При проверке нового элемента управления могут быть выявлены недостатки, которые необходимо устранить. Например, если в режиме проектирования попробовать поменять размеры созданной вами кнопки в форме, растягивая ее за край, то будут изменяться размеры контейнера, а не кнопки. Чтобы устранить этот недостаток, необходимо привязать края кнопки к краям контейнера. Это можно сделать с помощью события Resize контейнера, возникающего при изменении размеров последнего, введя следующий код:

Private Sub UserControl Resize()

cbCalculate.Height = UserControl.ScaleHeight

cbCalculate.Width = UserControl.Width

End Sub

В тексте этого кода при каждом изменении размеров контейнера соответственно изменяется размер кнопки до максимальных размеров контейнера.

назад | содержание | вперед