了解C#的人对typeof这个关键字再熟悉不过了。它是获得对象的类别，返回值是type。
在VB2005中和typeof对位的是GetType。可是，GetType的使用却充满着魅惑性。先看看下面的代码。
Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles _
MyBase.Load
Debug.Print(IsSame(New SolidBrush(Color.AliceBlue)))
End Sub
Private Function IsSame(ByVal Brush As Brush) As Boolean
Dim T1 As Type = GetType(Brush)
Dim T2 As Type = Brush.GetType
Return T1 Is T2
End Function
这段代码执行完后，会在“即时窗口”里显示什么？
是False，你想到了吗？
笔者在移植一段C#代码到VB2005代码时就碰到了如上的陷阱，使得代码在C#中运行正常，而在VB2005中就一直报错。后来才明白其中的奥妙。
先仔细分析IsSame中的两句代码。
Dim T1 As Type = GetType(Brush)
GetType是关键字，获得指定类的Type。这里的Brush表示的是类Brush，T1得到的值是类Brush
Dim T2 As Type = Brush.GetType
GetType是对象的方法，返回该对象的Type。这里的Brush表示的传递进来的参数，T2得到的是参数Brush的类型，是类SolidBrush（应该是结构）
很显然T1和T2不表示同一种类，故返回值是False。
其实，上面这段代码如果改写成容易识别的就一点问题都没有了。如下：
Private Function IsSame(ByVal B As Brush) As Boolean
Dim T1 As Type = GetType(Brush)
Dim T2 As Type = B.GetType
Return T1 Is T2
End Function
要熟悉GetType的两种用法，才能明白其中的奥妙，在移植代码的时候才不易出错。
本文转自万仓一黍博客园博客，原文链接：http://www.cnblogs.com/grenet/archive/2010/04/19/1715588.html，如需转载请自行联系原作者
