VB.NET動態事件具體處理方式詳解
VB.NET編程語言的推出為開發人員帶來了非常大的好處。在這里我們將會對VB.NET動態事件的一些使用技巧進行一個詳細的介紹，希望能夠對初學者在學習的過程有所幫助，提高大家對這項語言的理解程度。#t#
“大李哥，”我不免為自己問了如此多的問題而不好意思起來，“您剛才所說的事件的委托是怎么回事呀？”
大李顯然是明白我會提問的：“我所說過事件驅動設計中的三要素你還記得吧？”
“當然，就是指對象、事件和事件處理程序。”我流利地回答道。
“對象和事件處理程序我們已經分析過了。要想徹底了解VB.NET動態事件的驅動程序的來龍去脈，我們必須了解事件的構成。”見到我又一次茫然地搖頭，他就接著說，“事件功能是由三個互相聯系的元素提供的：提供事件數據的類、事件委托和引發事件的類。我說過，事件就是一個信號，它告知應用程序有重要情況要發生。那么我們可以想象一下，事件要發生，就會含有獨特的信息，比如，事件發送源是什么，會發生什么樣的事件。提供事件數據的類就是用于記錄這些信息的。
該類必須從 System.EventArgs 派生出，這個我們已經說過了；事件的委托，這其實我也說過了，就好比是指向事件接收方的一個指針，由于指定對象的事件是獨特的，所以它的委托也是事先定義好的，就比如MouseDown事件，它對應的委托就是MouseEventHandler。我們看一下你在代碼窗口選Label1對象的MouseDown方法，會自動生成這段空的事件處理程序：
- Friend WithEvents Label1 As
System.Windows.Forms.Label- Private Sub Label1_MouseDown
(ByVal sender As Object, ByVal e As _- System.Windows.Forms.Mouse
EventArgs) Handles Label1.MouseDown- End Sub
它其實就等同于：
- AddHandler Label1.MouseDown,
AddressOf Label1_MouseDown- Private Sub Label1_MouseDown
(ByVal sender As Object, ByVal e As _- System.Windows.Forms.MouseEventArgs)
- End Sub
隱含的意思，就是通過先前已經聲明為全局變量的VB.NET動態事件委托MouseEventHandler來實現事件處理程序參數的定義。對于MouseDown事件而言，為什么自動加上的事件數據類參量是MouseEventArgs類的，就是委托的作用了。
第三個要素是引發事件的類。該類必須提供事件的聲明和引發事件的方法。其中引發事件的方法必須命名為On加上事件名的形式，比如事件是EventHR，那么引發事件的方法就一定叫OnEventHR。”
一邊說著，大李開始修改起剛才用于標準事件處理程序的代碼來：
- Module Module1
- '事件數據類
- Public Class HenryEventArgs
- Inherits EventArgs
- End Class
- '聲明委托
- Public Delegate Sub HenryEvent
Handler(ByVal sender As Object, _- ByVal e As HenryEventArgs)
- Public Class CHenry
- ' 聲明一個事件
- Public Event EventHR As
HenryEventHandler- Protected Overridable Sub
OnEventHR(ByVal e As HenryEventArgs)- '調用委托
- RaiseEvent EventHR(Me, e)
- End Sub
- Public Sub start()
- Dim e As HenryEventArgs
- OnEventHR(e)
- End Sub
- End Class
- Dim obj As New CHenry()
- Sub obj_EventHR(ByVal
sender As Object, ByVal
e As HenryEventArgs)- MsgBox("事件處理器捕捉到了
事件.") '處理事件.- End Sub
- Sub Main()
- AddHandler obj.EventHR,
AddressOf obj_EventHR- obj.start()
- End Sub
- End Module
大李指著寫好的代碼對我說：“你看，這段代碼與先前的不同之處有不少。首先EventHR事件我定義為一個委托類型，不再是光禿禿的一個VB.NET動態事件了。這樣的話，EventHR事件就具有了承載事件信息的能力，事件發送源是Sender；事件數據是HenryEventArgs類的對象。其他的你應該都能很快就明白了，對吧？”
“嗯，還有一個問題，為什么引發事件的方法OnEventHR要用保護的方法呢？”我還是有些不解。
“這個問題問得好！”大李點了點頭，“這是為了讓派生類必須始終調用基類的OnEventHR方法以確保注冊的委托接收到事件。你只要試一下，繼承CHenry得到一個派生類進行事件處理，就會明白了。”
哦，一個VB.NET動態事件驅動程序設計方法的講述的確讓我大開眼界，打開了一扇了解VB.NET的廣闊天空的大門，繼續努力，我還得加油呀!
