VB.net是怎樣做到的（三）——Handles和WithEvents

VB除了可以用C#那樣的方法來處理事件響應(yīng)以外，還有從VB5繼承下來的獨(dú)特的事件處理方式——WithEvents。

我喜歡稱這種事件處理方式為靜態(tài)的事件處理，書寫響應(yīng)事件的方法時(shí)就已經(jīng)決定該方法響應(yīng)的是哪一個(gè)事件，而C#則是在代碼中綁定事件的。比如下面這個(gè)最簡(jiǎn)單的例子：

Public Class HandlerClass
Public WithEvents MyObj As EventClass


Private Sub MyObj_MyEvent(ByVal sender As Object, ByVal e As System.EventArgs) Handles MyObj.MyEvent
MsgBox("hello")
End Sub

Public Sub New()
MyObj = New EventClass
End Sub
End Class

代碼中用到的EventClass是這樣的：

Public Class EventClass
Public Event MyEvent As EventHandler

Protected Overridable Sub OnMyEvent(ByVal e As EventArgs)
RaiseEvent MyEvent(Me, e)
End Sub

Public Sub Test()
OnMyEvent(New EventArgs)
End Sub
End Class

我們來復(fù)習(xí)一下，這段代碼隱式地給EventClass編寫了兩個(gè)方法——Add_MyEvent(EventHandler)和Remove_MyEvent(EventHandler)，實(shí)際上任何使用事件的上下文都是通過調(diào)用這兩個(gè)方法來綁定事件和解除綁定的。C#還允許你書寫自己的事件綁定/解除綁定的代碼。

那么WithEvents是怎么工作的呢？VB.net的編譯器在編譯時(shí)自動(dòng)將

Public WithEvents MyObj As EventClass

翻譯成下面這個(gè)過程：

Private _MyObj As EventClass

Public Property MyObj() As EventClass
Get
Return _MyObj
End Get
Set(ByVal Value As EventClass)

If Not (Me._MyObj Is Nothing) Then
RemoveHandler _MyObj.MyEvent, New EventHandler(AddressOf MyObj_MyEvent)
End If

Me._MyObj = Value

If Me._MyObj Is Nothing Then Exit Property

AddHandler _MyObj.MyEvent, New EventHandler(AddressOf MyObj_MyEvent)

End Set
End Property

由此可見，當(dāng)對(duì)WithEvents變量賦值的時(shí)候，會(huì)自動(dòng)觸發(fā)這個(gè)屬性以綁定事件。我們所用的大部分事件響應(yīng)都是1對(duì)1的，即一個(gè)過程響應(yīng)一個(gè)事件，所以這種WithEvents靜態(tài)方法是非常有用的，它可以顯著增強(qiáng)代碼可讀性，同時(shí)也讓VB.net中的事件處理非常方便，不像C#那樣離開了窗體設(shè)計(jì)器就必須手工綁定事件。

不過在分析這段IL的時(shí)候，我也發(fā)現(xiàn)了VB.net在翻譯時(shí)小小的問題，就是ldarg.0出現(xiàn)得過多，這是頻繁使用Me或this的表現(xiàn)，所以我們?cè)诰幋a過程中一定要注意，除了使用到Me/this本身引用以外，使用它的成員時(shí)不要帶上Me/this，比如Me.MyInt = 1就改成MyInt = 1，這樣的小習(xí)慣會(huì)為你帶來很大的性能收益。


VB.net是怎樣做到的（四）——類型轉(zhuǎn)換


今天在www.aspx.cn看到了一篇帖子，看到wyhw大俠真的希望dotnet blog成為.NET的精品技術(shù)Blog。所以我也不能偷懶了，趕快學(xué)習(xí)，并且多發(fā)技術(shù)帖子。
回到正題來，我今天在Visual Basic社區(qū)上看到在Visual Basic 2005中將加入一個(gè)新的運(yùn)算符——TryCast，相當(dāng)于C#的as運(yùn)算符。我一直希望VB有這樣一個(gè)運(yùn)算符，既然今天看到了，就順便研究一下VB和C#的類型轉(zhuǎn)換。先說VB，類型轉(zhuǎn)換運(yùn)算符主要有CType和DirectCast。他們的用法幾乎一樣。我詳細(xì)比較了一下這兩個(gè)運(yùn)算符，得出以下結(jié)論：

1、在轉(zhuǎn)換成引用類型時(shí)，兩者沒有什么區(qū)別，都是直接調(diào)用castclass指令，除非重載了類型轉(zhuǎn)換運(yùn)算符（當(dāng)然VB.NET還不行，但我沒有VB 2005，所以沒法試驗(yàn)）。

2、轉(zhuǎn)換成值類型時(shí)，CType會(huì)調(diào)用VB指定的類型轉(zhuǎn)換函數(shù)（如果有的話），比如將String轉(zhuǎn)換為Int32時(shí)，就會(huì)自動(dòng)調(diào)用VisualBasic.CompilerServices.IntegerType.FromString，而將Object轉(zhuǎn)換為Int32則會(huì)調(diào)用FromObject。其他數(shù)值類型轉(zhuǎn)換為Int32時(shí)，CType也會(huì)調(diào)用類型本身的轉(zhuǎn)換方法實(shí)施轉(zhuǎn)換。DirectCast運(yùn)算符則很簡(jiǎn)單，直接將對(duì)象拆箱成所需類型。

所以在用于值類型時(shí)，CType沒有DirectCast快速但可以支持更多的轉(zhuǎn)換。在C#中，類型轉(zhuǎn)換則為（type)運(yùn)算符和as運(yùn)算符。(type)運(yùn)算符的工作方式與VB的DirectCast很相似，也是直接拆箱或castclass的，但是如果遇到支持的類型轉(zhuǎn)換（如long到int），(type)運(yùn)算符也會(huì)調(diào)用相應(yīng)的轉(zhuǎn)換方法，但不支持從String到int的轉(zhuǎn)換。C#另一個(gè)運(yùn)算符as則更加智能，它只要判斷對(duì)象的運(yùn)行實(shí)例能否轉(zhuǎn)成目標(biāo)類型，然后就可以省略castclass指令，直接按已知類型進(jìn)行操作，而且編譯器還可以自動(dòng)對(duì)as進(jìn)行優(yōu)化，比如節(jié)省一個(gè)對(duì)象引用等。所以在將Object轉(zhuǎn)換成所需的類型時(shí)，as是最佳選擇。

由于as有很多優(yōu)點(diǎn)，Visual Basic 2005將這一特性吸收了過來，用TryCast運(yùn)算符就可以獲得和as一樣的效果，而且語法與DirectCast或CType一樣。