AddHandler – příkaz

  • Článek
  • 2 min ke čtení

Přidruží událost k obslužné rutině události v době běhu.

Syntax

AddHandler event, AddressOf eventhandler

Součásti

Část Popis
event Název události, která má být zpracována.
eventhandler Název procedury, která zpracovává událost.

Poznámky

AddHandlerPříkazy a RemoveHandler umožňují kdykoli spustit a zastavit zpracování událostí během provádění programu.

Podpis eventhandler procedury se musí shodovat s signaturou události event .

HandlesKlíčové slovo a AddHandler příkaz umožňují určit, že konkrétní procedury budou zpracovávat konkrétní události, ale existují rozdíly. AddHandlerPříkaz propojuje procedury s událostmi v době běhu. HandlesPři definování procedury použijte klíčové slovo, které určuje, že zpracuje konkrétní událost. Další informace najdete v tématu obslužné rutiny.

Poznámka

Pro vlastní události AddHandler Vyvolá příkaz přístup k události AddHandler . Další informace o vlastních událostech naleznete v tématu příkaz Event.

Příklad

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

Viz také