Mega Code Archive
Type BaseType Property gets the type from which the current Type directly inherits
Imports System
Class TestType
Public Shared Sub Main()
Dim t As Type = GetType(Integer)
Console.WriteLine("{0} inherits from {1}.", t, t.BaseType)
End Sub
End Class