デフォルトプロパティ
public class StringList dim ObjectList as new List(Of String) default public property Item(byval index as integer) as string get return ObjectList(index) end get set(byval value as string) ObjectList(index) = value end set end property end class