Pernyataan RemoveHandler

Menghapus hubungan antara peristiwa dan penanganan peristiwa.

Sintaks

RemoveHandler event, AddressOf eventhandler  

Generator

Term Definisi
event Nama peristiwa yang sedang ditangani.
eventhandler Nama prosedur saat ini menangani peristiwa tersebut.

Keterangan

Pernyataan AddHandler dan RemoveHandler mengizinkan Anda memulai dan menghentikan penanganan peristiwa kapan saja selama eksekusi program.

Catatan

Untuk peristiwa kustom, RemoveHandler pernyataan memanggil pengakses peristiwa tersebutRemoveHandler. Untuk informasi selengkapnya tentang peristiwa kustom, lihat Pernyataan Peristiwa.

Contoh

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()
    ' Associate an event handler with an event, using a lambda.
    ' This handler cannot be removed.
    AddHandler Obj.Ev_Event, Sub ()
        MsgBox("Lambda caught event.")
    End Sub
    ' This event will be handled by the lambda above.
    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

Lihat juga