【转】VBNET-运行时处理对象事件(AddHandler和RemoveHandler)

最新推荐文章于 2025-06-17 13:54:50 发布

Strawberry0924

最新推荐文章于 2025-06-17 13:54:50 发布

阅读量4.1k

点赞数

文章标签：测试

本文介绍了一种使用AddHandler和RemoveHandler进行事件绑定和解绑的方法，并通过实例代码演示了如何在自定义类中定义和触发事件，以及如何关联和取消关联事件处理程序。

摘要生成于 C知道，由 DeepSeek-R1 满血版支持，前往体验 >

AddHandler用于在运行时将事件与事件处理程序相关联
RemoveHandler用于移除事件与事件处理程序之间的关联
Handles关键字用于定义过程时,指定它处理的特定事件

签名式:

AddHandler event, AddressOf eventhandler

RemoveHandler event, AddressOf eventhandler

代码演示

     1 Sub TestEvents()    '测试事件的过程

     2     Dim Obj As New Class1    ' Associate an event handler with an event.

     3     AddHandler Obj.Ev_Event, AddressOf EventHandler    ' 关联事件和其处理

     4     Obj.CauseSomeEvent()    ' 引发事件

     5     RemoveHandler Obj.Ev_Event, AddressOf EventHandler    ' 移除关联.

     6     Obj.CauseSomeEvent()    ' 引发事件

     7 End Sub

     8 

     9 Sub EventHandler()    ' 事件处理过程

    10     MsgBox("EventHandler caught event.")

    11 End Sub

    12 

    13 Public Class Class1    ' 包含事件的自定义类.

    14     Public Event Ev_Event()      'Event语句-自定义事件过程

    15     Sub CauseSomeEvent()        ' 激活事件的过程.

    16         RaiseEvent Ev_Event()     '用RaiseEvent语句激活事件

    17     End Sub

    18 End Class