- 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
【转】VBNET-运行时处理对象事件(AddHandler和RemoveHandler)
最新推荐文章于 2021-11-06 10:37:41 发布