Reflection VB.Net Tutorial

Imports System
Imports System.Reflection
Public Class MyPropertyClass
    Private myPropertyArray(9, 9) As Integer
    Default Public Property Item(ByVal i As Integer, ByVal j As Integer) As Integer
        Get
            Return myPropertyArray(i, j)
        End Get
        Set(ByVal Value As Integer)
            myPropertyArray(i, j) = Value
        End Set
    End Property
End Class 'MyPropertyClass
Public Class MyTypeClass
    Public Shared Sub Main()
        Dim myType As Type = GetType(MyPropertyClass)
        Dim myTypeArray(1) As Type
        Dim myPropertyInfo As PropertyInfo = myType.GetProperty("Item",GetType(Integer), myTypeArray, Nothing)
        Console.WriteLine(myType.FullName + "." + myPropertyInfo.Name + " has a property  type of " + myPropertyInfo.PropertyType.ToString())
    End Sub
End Class