VB.NET. Создание компонентов
Урок 6. Тестирование компонента в VB.NET

Для тестирования компонента создадим простое Windows приложение на VB.NET. Пусть для определенности его имя - test.

Теперь надо добавить наше компонент на панель Toolbox. Для этого щелкаем на панели Toolbox правой кнопкой мыши и выбираем пункт Add/RemoveItems:

В появивщемся окне Costomize Toolbox выбираем UserControl1 (именно такое имя по умолчанию получил наш компонент). Возможно, что для этого нам придется воспользоваться кнопкой Browse.

Нажимаем на OK. Новый компонент появися на панели ToolBox:

Переносим его двойным щелчком на форму. Добавим еще на форму кнопку для вызова метода нашего компонета. В обработчике щелчка на кнопке пишем следующий код:

    Private Sub Button1_Click(ByVal sender As System.Object, _
        ByVal e As System.EventArgs) Handles Button1.Click
        UserControl11.Rand()
    End Sub

Теперь добавит обработчик для события MaxNumber нашего компонента. Для этого в окне кода в левом combobox'е выбираем UserControl11, а в правом - MaxNumber:

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

    Private Sub UserControl11_MaxNumber() Handles UserControl11.MaxNumber
        MessageBox.Show("Event MaxNumber")
    End Sub

Последний штрих - выделяем на тестовой форме наш компонент и задаем в окне Properties значение его свойства N (напомним, что N - это максимально возможное случайное число):

Запускаем тестовую программу. При нажатии на кнопку на компоненте будет появляться случайное число от 1 до N, при это иногда будет возбуждаться событие и появляться соответствующий MessageBox. При щелчкеже на самой компонете цифры на нем будут получать случайный цвет.