关于VB.NET的事件(event)(一)

VB.NET事件处理与委托

最新推荐文章于 2024-03-21 17:03:05 发布

原创最新推荐文章于 2024-03-21 17:03:05 发布 · 1.2k 阅读

1 ·

CC 4.0 BY-SA版权

文章标签：

#vb.net #class

本文介绍了VB.NET中如何定义和处理事件，包括通过实例化类来触发事件的方法及使用委托进行事件处理的过程。此外，还讲解了如何通过AddHandler添加事件处理程序以及通过RemoveHandler撤销事件处理。

先来看一段代码:

Public Class car Public Event star() '声明一个事件 Sub eventstar() MsgBox("引发事件过程") RaiseEvent star() '引发事件 End Sub End Class

在这个类中实现了一个star的事件.事件过程为eventstar.

如果想调用这个事件必须将类实例化成对象.

在模块级别写上.

WithEvents Obj As New car() '模块或类级别的声明 Sub Obj_EventHR() Handles Obj.star '在Handles之后声明事件 MsgBox("事件处理器捕捉到了事件.") '处理事件. End Sub Sub Main() Obj.eventstar() '调用事件 End Sub

在Handles中声明了一个对象的事件.

VB.NET很有意思,它还提供了一种委托的方式来触发事件

Dim obj As New car'模块级别声明了一个Obj的对象 Sub Obj_EventHR() '在Handles之后声明事件 MsgBox("事件处理器捕捉到了事件.") '处理事件. End Sub Sub Main() AddHandler Obj.star, AddressOf Obj_EventHR '使用了委托触发Obj_EventHR过程 Obj.eventstar() '调用事件 End Sub

我们不仅可以用委托的方式,还可以用解除委托的方式来撤消事件过程的关联.

通过在过程中添加RemoveHandler Obj.star, AddressOf Obj_EventHR

这样就可以取消委托.