[VB.NET] matrice o tipo di dato personalizzato

Private Class Canzone
        Dim _titolo As String = ""
        Property Titolo() As String
            Get
                Return _titolo
            End Get
            Set(ByVal value As String)
                _titolo = value
            End Set
        End Property

        Dim _autore As String = ""
        Property Autore() As String
            Get
                Return _autore
            End Get
            Set(ByVal value As String)
                _autore = value
            End Set
        End Property

        Dim _artista As String = ""
        Property Artista() As String
            Get
                Return _artista
            End Get
            Set(ByVal value As String)
                _artista = value
            End Set
        End Property

        Public Sub New()
        End Sub
        Public Sub New(ByVal tt As String, ByVal art As String, ByVal aut As String)
            Me.Titolo = tt
            Me.Artista = art
            Me.Autore = aut
        End Sub
    End Class


    Private ListaCanzioni As Generic.List(Of Canzone) = New Generic.List(Of Canzone)

    Private Sub LeggiDatiXML()
        ''per ogni dato letto
        ListaCanzioni.Add(New Canzone("Titolo", "Artista", "Autore"))
    End Sub

    Private Sub scorriCanzoni()
        Dim i As Integer
        For i = 0 To ListaCanzioni.Count - 1
            MsgBox(ListaCanzioni.Item(i).Titolo & " - " & ListaCanzioni.Item(i).Artista)
        Next
    End Sub

Private ListaCanzioni As Generic.List(Of Canzone) = New Generic.List(Of Canzone)

ListaCanzioni.Add(New Canzone("Titolo", "Artista", "Autore")) 

Dim i As Integer
        For i = 0 To ListaCanzioni.Count - 1
            MsgBox(ListaCanzioni.Item(i).Titolo & " - " & ListaCanzioni.Item(i).Artista)
        Next