Vb.Net程序设计：不带事件参数的事件。

Private Event aa As EventHandler

'系统默认事件处理。不带事件参数的事件。
RaiseEvent aa(sender, e)

 

Public Delegate Sub ChangedTextEvent(ByVal sender As Object, ByVal e As EventArgs)
Public Event SelectTextChanged As ChangedTextEvent

 

这里我们可以直接定义：

Public Event SelectTextChanged As EventHandler

因为ChangedTextEvent的委托名称和EventHandler的委托名定义格式一样。也就是说：签名一样。

 

EventHandler 是一个预定义的委托，专用于表示不生成数据的事件的事件处理程序方法。如果事件生成数据，则必须提供自己的自定义事件数据类型，并且必须要么创建一个委托，其中第二个参数的类型为自定义类型，要么使用泛型 EventHandler 委托类并用自定义类型替代泛型类型参数。

 

 

Visual Basic（声明）

<SerializableAttribute> _
<ComVisibleAttribute( True)> _
Public Delegate Sub EventHandler(ByVal  sender As Object,   ByVal  e As EventArgs)

Visual Basic（用法）

Dim instance As New EventHandler( AddressOf HandlerMethod)