王凌峰 編譯

介紹 在類或控件的繼承中，子類或子控件封裝了父類的所有函數(shù)，其中包括事件處理程序。 本文將著重討論在 Visual Basic .NET 應(yīng)用程序設(shè)計(jì)中如何正確對(duì)待事件處理程序的繼承。

讀者要求 本文假定讀者熟悉面向?qū)ο蟪绦蛟O(shè)計(jì)和類的繼承性。若您尚未熟悉它們，請(qǐng)參閱《組件 的多態(tài)性》 ("Polymorphism in Components")。

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

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ā)生時(shí)運(yùn)行。這就是用于定義事件處理程序的典型語法。

為了實(shí)現(xiàn) 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

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

事件處理程序的 override 固然與其它方法的 override 大同小異，有一點(diǎn)卻不得不提：在 override 事件處理程序時(shí)必須除去 Handles 子句。

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

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

請(qǐng)注意：不要附加 Handles 子句。因?yàn)楦割惖奶幚沓绦蛞呀?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 子句并不是一個(gè)疏漏，而是由 .NET 框架 的事件處理機(jī)制所決定的。父類中的 Handles 子句將事件處理程序關(guān)聯(lián)到特定事件上，這種 關(guān)聯(lián)將被子類繼承。因此，即令子類中沒有 Handles 子句，父類所關(guān)聯(lián)的事件也能激活子類 的事件處理程序。倘若此時(shí)加上 Handles 子句，則處理程序?qū)⒈辉俅侮P(guān)聯(lián)到事件上。重復(fù)關(guān) 聯(lián)的后果是處理程序?qū)⒈贿B續(xù)激活兩次。例如：

注釋： 錯(cuò)誤的代碼 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 被點(diǎn)擊一次， 注釋： 變量 Counter 將會(huì)增加兩次 ； Counter += 1 注釋： 消息框也會(huì)彈出兩次， 注釋： 顯示的內(nèi)容也將違背設(shè)計(jì)意圖 MessageBox.Show (" This inherited button has been clicked " & _ Counter.ToString() & " times.") End Sub

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