Imports System
Imports System.Reflection
Class Example
Public Shared Sub Main()
Dim a As Type = GetType(System.String)
Dim b As Type = GetType(System.Int32)
a = GetType(Example)
b = New Example().GetType()
Console.WriteLine(a.Equals(b))
b = GetType(Type)
Console.WriteLine(a.Equals(b))
End Sub
End Class