Android Question Need help with structures

Sub Globals
    'These global variables will be redeclared each time the activity is created.

    ' A Type is like a Structure in VS; add as many members as needed; members can also be
    ' complex variables like Lists, Maps, Types, or views like Labels, Buttons, ...
    Type PersonDefinition(Name As String, Address As String, City As String, Age As Int)
    Dim PersonsList As List ' Forget arrays, use Lists ! You don't need to declare a dimension for Lists.

End Sub

Sub Activity_Create(FirstTime As Boolean)

    Dim i As Int
    Dim j As Int

    'Activity.LoadLayout("Layout")

    PersonsList.Initialize

    ' Create PersonsList with 5 items.
    ' You could also use a Map instead of a List; the Map's keys
    ' would be e.g. 1 through 5, and the values would be lists
    ' containing variables of type 'PersonDefinition'.
    For i = 0 To 4
        ' Initialise PersonsListSub
        Dim personsListSub As List
        personsListSub.Initialize
        ' Create PersonsListSub with 20 items
        For j = 0 To 19
            Dim person As PersonDefinition = CreatePersonDefinition(j, j, j, j) ' Pass the real values here
            personsListSub.add(person)
        Next
        ' Sort PersonsListSub by 'Name', case-insensitive
        personsListSub.SortTypeCaseInsensitive("Name", True)
        ' Alternatively, sort PersonsListSub by 'Age'
        'personsListSub.SortType("Age", True)
        ' Add PersonsListSub to PersonsList
        PersonsList.Add(personsListSub)
    Next

    ' Fetch the 'PersonsListSub' for the 2nd round
    Dim secondRound As List = PersonsList.Get(1) ' The first item has index zero

    ' Fetch the Persons from list 'SecondRound'
    For i = 0 To (secondRound.Size - 1)
        Dim onePerson As PersonDefinition = secondRound.Get(i)
        Log(i & ": " & onePerson.Name)
    Next

End Sub

' This sub is generated by hovering the mouse over PersonDefinition in
' sub Globals, and then clicking the "Generate 'Create Type' Sub" link.
Public Sub CreatePersonDefinition (Name As String, Address As String, City As String, Age As Int) As PersonDefinition

    Dim t1 As PersonDefinition
    t1.Initialize
    t1.Name = Name
    t1.Address = Address
    t1.City = City
    t1.Age = Age
    Return t1

End Sub