Associates an event with an event handler.
AddHandler event, AddressOf eventhandler
The AddHandler and RemoveHandler statements allow you to start and stop event handling at any time during program execution.
Sub TestEvents() Dim Obj As New Class1() ' Associate an event handler with an event. AddHandler Obj.Ev_Event, AddressOf EventHandler Obj.CauseSomeEvent() ' Ask the object to raise an event. End Sub Sub EventHandler() ' This procedure handles events raised by the object Obj. MsgBox("EventHandler caught event.") ' Handle the event. End Sub Public Class Class1 Public Event Ev_Event() ' Declare an event. Sub CauseSomeEvent() RaiseEvent Ev_Event() ' Raise an event. End Sub End Class
RemoveHandler Statement | Handles |