PropertyInfo.PropertyType Property
Imports System Imports System.Reflection Imports Microsoft.VisualBasic Namespace MyNamespace Public Class Example Public ReadOnly Property Answer As Integer Get Return 42 End Get End Property Public Shared Sub Main() Dim t As Type = GetType(MyNamespace.Example) Dim pi As PropertyInfo = t.GetProperty("Answer") Console.WriteLine(t.Name) Console.WriteLine(pi.Name) Console.WriteLine(pi.PropertyType) End Sub End Class End Namespace