在學(xué)習(xí)了VB.NET這門編程語言后，大家會慢慢的發(fā)現(xiàn)這門語言中隱藏的知識是很廣的，有很多功能值得我們?nèi)ド钊氲难芯?。比如VB.NET Override就是其中一個比較難掌握的知識點。在類或控件的繼承中，子類或子控件封裝了父類的所有函數(shù)，其中包括事件處理程序。本文將著重討論事件處理程序的VB.NET Override實現(xiàn)方法。

繼承事件處理程序

當(dāng)組件被繼承時，它的所有成員都被封裝到子類中。事件處理程序是響應(yīng)特定事件的方法，是組件成員之一，因而也被繼承。請看一個典型的事件處理程序：

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 (" This button
 has been clicked " & _   
Counter.ToString() & " times.")   
End Sub  

我們看到，宣告部分末尾的 Handles 子句把處理程序關(guān)聯(lián)到特定的事件上。具體而言，上述代碼將在 Button1.Click 事件發(fā)生時運行。這就是用于定義事件處理程序的典型語法。

為了實現(xiàn)VB.NET Override，你必須使用 Overridable 關(guān)鍵字，并且重新定義其可見性為 Protected 、 Protected Friend 或者 Public 。下面示范如何 override 事件處理程式：

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 (" This button 
has been clicked " & _   
Counter.ToString() & " times.")   
End Sub  

在組件中繼承事件處理程序

事件處理程序的VB.NET Override固然與其它方法的 override 大同小異，有一點卻不得不提：在 override 事件處理程序時必須除去 Handles 子句。

如何 override 組件的事件處理程序

1) 在事件處理程序的宣告部分加入 Overrides 關(guān)鍵字

請注意：不要附加 Handles 子句。因為父類的處理程序已經(jīng)關(guān)聯(lián)了特定事件，子類將繼承這一切。換句話說，父類所關(guān)聯(lián)的事件可以激活子類的處理程序，因而這里的 Handles 子句是多余的。

下面示范如何 override 前述事件處理程序：

Protected Overrides Sub 
Button1_Click(ByVal sender 
As System.Object, _   
ByVal e as System.EventArgs)   
Static Counter as Integer = 0   
Counter += 1   
MessageBox.Show (" This inherited 
button has been clicked " & _   
Counter.ToString() & " times.")   
End Sub  

2) 為什么不需要 Handles 子句

前面提到，我們沒有使用關(guān)聯(lián)事件的 Handles 子句并不是一個疏漏，而是由 .NET 框架的事件處理機制所決定的。父類中的 Handles 子句將事件處理程序關(guān)聯(lián)到特定事件上，這種關(guān)聯(lián)將被子類繼承。因此，即令子類中沒有 Handles 子句，父類所關(guān)聯(lián)的事件也能激活子類的事件處理程序。倘若此時加上 Handles 子句，則處理程序?qū)⒈辉俅侮P(guān)聯(lián)到事件上。重復(fù)關(guān)聯(lián)的后果是處理程序?qū)⒈贿B續(xù)激活兩次。例如：

' 錯誤的代碼   
Protected Overrides Sub 
Button1_Click(ByVal sender As 
System.Object, _   
ByVal e as System.EventArgs) Handles
 Button1.Click   
Static Counter as Integer = 0   
' 本例中使用了 Handles 子句，   
' 因而每當(dāng)按鈕 Button1 被點擊一次，   
' 變量 Counter 將會增加兩次 ；   
Counter += 1   
' 消息框也會彈出兩次，   
' 顯示的內(nèi)容也將違背設(shè)計意圖   
MessageBox.Show (" This inherited 
button has been clicked " & _   
Counter.ToString() & " times.")   
End Sub  

結(jié)論

在 Visual Basic .NET 中，事件處理程序的VB.NET Override可能造成難以偵錯的 bug 。例如在使用 Handles 子句關(guān)聯(lián)事件處理程序時就要格外小心，以免發(fā)生重復(fù)關(guān)聯(lián)。

【編輯推薦】

1. VB.NET基本數(shù)據(jù)類型實用經(jīng)驗總結(jié)
2. VB.NET用戶登錄頁面實現(xiàn)技巧分享
3. VB.NET加密文件實現(xiàn)技巧分享
4. VB.NET數(shù)組賦值怪異現(xiàn)象揭秘
5. VB.NET自定義屬性應(yīng)用方式解析