VB.NET是由微软开发的一款面向对象语言。其应用范围也是比较广泛。其中一个比较重要的操作就是重载。我们可以利用VB.NET重载事件处理实现许多特定功能，帮助我们提高实际开发效率。
前提
您应该非常了解继承和面向对象的编程。有关详细信息，请参阅 Polymorphism in Components（英文）。
继承的VB.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
组件中继承的VB.NET重载事件处理程序#t#
重载继承的事件处理程序与重载任何其他类型的继承方法基本相同，***不同之处在于：在重载继承的事件处理程序时，必须删除 Handles 子句。
重载继承组件中的方法
将 Overrides 关键字添加到方法声明中。
注意：不要在方法中添加 Handles 子句。VB.NET重载事件处理程序已经与基类中的事件相关联，并且此关联将传递到继承类中。也就是说，当引发事件时将执行此方法，而不再需要额外的 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 框架处理事件的一项重要内容。VB.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
总结
VB.NET重载事件处理程序可能造成一些不易察觉的问题，并导致难以查出的错误。因此，设置与事件处理程序的正确关联是非常重要的。请小心使用，并注意已经存在的事件关联。
