Создание элемента управления ActiveX
В этом упражнении Вы сконструируете элемент управления ActiveX средствами
Visual Basic.
> Создание элемента управления ActiveX
- Запустите Visual Basic и создайте новый проект типа ActiveX Control.
- Переименуйте проект в Lab8Control.
- Измените имя UserControl1 на ChangeDateTime.
- Выберите в меню File пункт Save Project.
- Сохраните проект в папке WA\Practice\Ch08. В ответ на предложение Add this project to SourceSafe нажмите кнопку No.
- Измените свойство BackColor элемента управления ChangeDateTime на Window Background.
- Вставьте в форму элементы управления Label и Timer в ChangeDateTime, как показано рисунке.
- Установите следующие свойства:
- В событие Timer элемента управления Timeri добавьте следующий код:
Label1.Caption = Now()
- Сохраните изменения в проекте.
- В меню File выберите пункт Make Lab8Control.ocx.
Элемент управления | Значения свойств |
Timer1 |
Interval = 100 |
Label 1 |
Caption = " " |
Label 1 |
Font = Arial, кегль 12 |
Label 1 |
BackStyle = 0 - Transparent |
Label 1 |
Alignment = 2 - Center |
Когда на экране появится диалоговое окно Make Project, убедитесь, что в нем указана правильная папка — WA\Practice\Ch08.