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