Lire des labels créées dynamiquement

Réponse acceptée !
    Private Sub Button1_Click_1(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click

        Dim xml_fichier As New GabXML(TextBox1.Text)
        Dim nb_elts As Integer = xml_fichier.countElements("/INI/PARAMETRE")

        Dim groupe As New GroupBox

        groupe.Name = "groupevp"
        groupe.Text = xml_fichier.getAttribute("/INI/PARAMETRE", "module")
        groupe.Top = 50
        groupe.Left = 16
        groupe.Height = 20
        groupe.Width = 330
        TabPage2.Controls.Add(groupe)

        For i As Integer = 0 To nb_elts - 1

            Dim libelle As New Label
            Dim valeurs As New TextBox

            libelle.Name = "Newlibelle" + (i).ToString() 'defini le nom du text
            libelle.Text = xml_fichier.getElementValue("/INI/PARAMETRE/LIBELLE", i)
            libelle.Width = 150 'on defini la taille horizontale
            libelle.Height = 25 'on defini la taille verticale
            libelle.Top = 20 + i * libelle.Height
            libelle.Left = 10

            groupe.Controls.Add(libelle)

            valeurs.Name = "Newvaleurs" + (i).ToString() 'defini le nom du text
            valeurs.Text = xml_fichier.getElementValue("/INI/PARAMETRE/VALEUR", i)
            valeurs.Width = 140 'on defini la taille horizontale
            valeurs.Height = 25 'on defini la taille verticale
            valeurs.Top = libelle.Top - 3
            valeurs.Left = libelle.Left + libelle.Width + 10
            valeurs.Tag = libelle

            groupe.Controls.Add(valeurs)

            groupe.Height = groupe.Height + libelle.Height

        Next
        groupe.Height = groupe.Height + 10
        TabControl1.Height = groupe.Height + 90
        Me.Height = TabControl1.Height + TabControl1.Top * 2 + 35

        'MsgBox(groupe.Controls("Newlibelle2").Text)
    End Sub

    Private Sub Button2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button2.Click
        Dim l_controls As Control
        Dim l_controls2 As Control
        Dim i As Integer = 0

        For Each l_controls In Me.TabPage2.Controls
            If (l_controls.GetType Is GetType(GroupBox)) Then

                Dim leslibelles(l_controls.Controls.Count / 2) As String
                Dim lesvaleurs(l_controls.Controls.Count / 2) As String

                For Each l_controls2 In l_controls.Controls
                    If (l_controls2.Name = "Newvaleurs" & (i).ToString()) Then
                        lesvaleurs(i) = l_controls2.Text
                        leslibelles(i) = l_controls2.Tag.Text

                        i = i + 1
                    End If
                Next
            End If
        Next
    End Sub