Оператор AddHandlerAddHandler Statement

Связывает событие с обработчиком событий во время выполнения.Associates an event with an event handler at run time.

СинтаксисSyntax

AddHandler event, AddressOf eventhandler  

ЧастиParts

eventevent Имя обрабатываемого события.The name of the event to handle.
eventhandler Имя процедуры, которая обрабатывает событие.The name of a procedure that handles the event.

ПримечанияRemarks

Инструкции AddHandler иRemoveHandler позволяют запускать и прекращать обработку событий в любое время во время выполнения программы.The AddHandler and RemoveHandler statements allow you to start and stop event handling at any time during program execution.

Сигнатура eventhandler процедуры должна соответствовать сигнатуре события event.The signature of the eventhandler procedure must match the signature of the event event.

Как ключевое слово Handles так и оператор AddHandler позволяют задать обработку определенных событий конкретными процедурами, но между ними существуют различия.The Handles keyword and the AddHandler statement both allow you to specify that particular procedures handle particular events, but there are differences. Оператор AddHandler подключает процедуры к событиям во время выполнения.The AddHandler statement connects procedures to events at run time. Используйте ключевое слово Handles при определении процедуры, чтобы указать, что она обрабатывает определенное событие.Use the Handles keyword when defining a procedure to specify that it handles a particular event. Дополнительные сведения см. в разделе Handles.For more information, see Handles.

Примечание

Для пользовательских событий AddHandler оператор вызывает AddHandler метод доступа события.For custom events, the AddHandler statement invokes the event's AddHandler accessor. Дополнительные сведения о пользовательских событиях см. в разделе оператор Event.For more information on custom events, see Event Statement.

ПримерExample

Sub TestEvents()
    Dim Obj As New Class1
    ' Associate an event handler with an event.
    AddHandler Obj.Ev_Event, AddressOf EventHandler
    ' Call the method to raise the event.
    Obj.CauseSomeEvent()
    ' Stop handling events.
    RemoveHandler Obj.Ev_Event, AddressOf EventHandler
    ' This event will not be handled.
    Obj.CauseSomeEvent()
End Sub

Sub EventHandler()
    ' Handle the event.
    MsgBox("EventHandler caught event.")
End Sub

Public Class Class1
    ' Declare an event.
    Public Event Ev_Event()
    Sub CauseSomeEvent()
        ' Raise an event.
        RaiseEvent Ev_Event()
    End Sub
End Class

См. такжеSee also