| [TD]使用 Visual Basic .NET 重载事件处理程序 Matthew A. Stoecker Visual Studio Team Microsoft Corporation 2002 年 2 月 概要：本文介绍在 Visual Basic® .NET 中编程时，如何重载事件处理程序。同时还讨论如何使用 Handles 子句。 目录
简介在继承控件或组件时，将创建封装基类的所有功能的新控件或新组件。基类定义的所有事件处理程序都包含在继承的组件中。本文将分析与继承的事件处理程序相关的问题，并具体讨论如何使用 Visual Basic .NET 开发应用程序。 前提
继承的事件处理程序在继承某个组件时，该组件的所有成员都被并入新类中。事件处理程序是在响应组件接收的特定事件时执行的方法，并且它是和其他组件成员一同被继承的。以下示例显示了一个典型的事件处理程序： 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 子句。 重载继承组件中的方法
以下示例显示了如何重载前面示例中的事件处理程序： 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总结重载事件处理程序可能造成一些不易察觉的问题，并导致难以查出的错误。因此，设置与事件处理程序的正确关联是非常重要的。请小心使用，并注意 |
……