使用 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 关键字，并将访问级别更改为 Protected、Protected Friend 或 Public。以下示例显示了一个可以被重载的事件处理程序：

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