Visual Basic 6. Руководство разработчика
Тестирование нового элемента управления - часть 2
Теперь выполните двойной щелчок на элементе управления
FLEXLabel на форме, чтобы увидеть события, обрабатываемые элементом. Новый элемент управления имеет свои собственные события, которые можно программировать, как и события обычных объектов VB. Введите следующий код для события Click:
Private Sub Label3Dl_Click()
MsgBox "My properties are" & vbCrLf & _
"Caption = " & Label3Dl.Caption & Chr$(13) & _
"TextAlignment = " & Label3Dl.TextAlignment & Chr$(13) & _
"Effect = " & Label3Dl.Effect
End Sub
Нажмите клавишу F5, чтобы запустить приложение, и щелкните на элементе управления. Появится окно сообщения с отображенными в нем свойствами элемента управления, как показано на рис. 16.5. (На данный момент код, отображающий надпись, еще не введен.).
Рис. 16.5. Некоторые свойства элемента управления, отображенные им самим
Можно программировать также и другие события. Ничего специфического в программировании элемента управления нет. Для разработчика — это обыкновенный элемент управления VB сделал довольно много. Он сгенерировал работающий элемент управления ActiveX. Конечно, нужно все еще добавить код, который сделает элемент полезным в использовании. Создание чего-то, что выглядит и ведет себя подобно элементам с управлением типа "указать и щелкнуть" — немалое достижение, но конечная цель состоит в том, чтобы разработать кое-что практическое и полезное.
