VB.NET. Создание компонентов
Урок 4. Добавление события

Напомним, что событие у нашего компонента должно возникать тогда, когда метод Rand возвратит максимально возможное случайное число.

Сначала мы должны объявить наше событие в классе компонента:

Public Event MaxNumber()

Событие с именем MaxNumber мы тут объявляем без параметра.

Далее наше событие надо где-то возбудить. Естественно, делаем это в методе Rand. Для этого в этод метод добавляем следующий код:

    Public Function Rand() As Int32
        ...
        k = rnd.Next(1, _N)
        'Возбуждаем событие.
        If k = _N Then
            RaiseEvent MaxNumber()
        End If
        Invalidate()
        ...
    End Function

Что мы тут делали для добавления события? Все очень просто - сначала мы должны объявить в классе наше событие (используя ключевое слово Event), потом - вызвать его в нужном месте (используя ключевое слово RaiseEvent). Возбуждение события означает что в программе, в которой наш компонент будет использоваться, программист может написать любой код, который будет выполняться при возникновении этого события (или не написать никакого). Это похоже на существующие события для, например, формы - напишет программист обработчик для, скажем, правого щелчка мыши, так этот код и будет выполняться, а ничего не напишет - так и программа будет игнорировать щелчки правой кнопкой мыши.