日期:2009-04-16  浏览次数:20542 次

[TD]使用 Visual Basic .NET 重载事件处理程序
Matthew A. Stoecker
Visual Studio Team
Microsoft Corporation
2002 年 2 月

概要:本文介绍在 Visual Basic® .NET 中编程时,如何重载事件处理程序。同时还讨论如何使用 Handles 子句。

目录

  • 简介
  • 前提
  • 继承的事件处理程序
  • 组件中继承的事件处理程序
  • 总结

简介


在继承控件或组件时,将创建封装基类的所有功能的新控件或新组件。基类定义的所有事件处理程序都包含在继承的组件中。本文将分析与继承的事件处理程序相关的问题,并具体讨论如何使用 Visual Basic .NET 开发应用程序。

前提

  • 您应该非常了解继承和面向对象的编程。有关详细信息,请参阅 Polymorphism in Components(英文)。

继承的事件处理程序


在继承某个组件时,该组件的所有成员都被并入新类中。事件处理程序是在响应组件接收的特定事件时执行的方法,并且它是和其他组件成员一同被继承的。以下示例显示了一个典型的事件处理程序:
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e as _   System.EventArgs) Handles Button1.Click   Static Counter as Integer = 0   Counter += 1   MessageBox.Show (" 此按钮已被单击 " & _      Counter.ToString() & " 次。")End Sub

只要发生 Button1.Click 事件,就会执行以上方法。方法声明末尾的 Handles 子句将方法与事件进行关联。这是组件中事件处理程序的典型结构。
为了在继承类中重载此方法,必须添加 Overridable 关键字,并将访问级别更改为 ProtectedProtected FriendPublic。以下示例显示了一个可以被重载的事件处理程序:
Protected Overridable Sub Button1_Click(ByVal sender As System.Object, _   ByVal e as System.EventArgs) Handles Button1.Click   Static Counter as Integer = 0   Counter += 1   MessageBox.Show (" 此按钮已被单击 " & _      Counter.ToString() & " 次。")End Sub

组件中继承的事件处理程序


重载继承的事件处理程序与重载任何其他类型的继承方法基本相同,唯一不同之处在于:在重载继承的事件处理程序时,必须删除 Handles 子句。
重载继承组件中的方法
  • Overrides 关键字添加到方法声明中。
    注意:不要在方法中添加 Handles 子句。事件处理程序已经与基类中的事件相关联,并且此关联将传递到继承类中。也就是说,当引发事件时将执行此方法,而不再需要额外的 Handles 子句。

以下示例显示了如何重载前面示例中的事件处理程序:
Protected Overrides Sub Button1_Click(ByVal sender As System.Object, _   ByVal e as System.EventArgs)   Static Counter as Integer = 0   Counter += 1   MessageBox.Show (" 此继承的按钮已被单击 " & _      Counter.ToString() & " 次。")End Sub

为什么不需要 Handles 子句


Handles 子句不再与此方法相关联。这并不是疏忽,而是 .NET 框架处理事件的一项重要内容。事件处理程序已经与基类中的事件相关联,并且此关联将传递到继承类中。也就是说,当引发事件时将执行此方法,而不再需要额外的 Handles 子句。如下所示,如果添加 Handles 子句,将创建与事件的附加关联,这会使方法在每个事件中被执行两次。
' 不正确的代码Protected Overrides Sub Button1_Click(ByVal sender As System.Object, _   ByVal e as System.EventArgs) Handles Button1.Click   Static Counter as Integer = 0   ' 每次单击按钮时,此变量将递增   ' 两次。   Counter += 1   ' 每次单击按钮时,消息框将显示   ' 两次,并显示不准确的信息。   MessageBox.Show (" 此继承的按钮已被单击 " & _      Counter.ToString() & " 次。")End Sub

总结


重载事件处理程序可能造成一些不易察觉的问题,并导致难以查出的错误。因此,设置与事件处理程序的正确关联是非常重要的。请小心使用,并注意已经存在的事件关联。