[VB8] concatenare stringe in un'unica stringa

[kerberos5]

Allora una parte del problema sono riuscito a risolverlo in maniera semplice:

 arr = RT1.Text.Split(ControlChars.CrLf.ToCharArray)
strModified = String.Format("{0}{1}{2}", arr)
LBL1.Text = strModified

In questo modo ottengo il risultato sperato! ma solo di 3 segmenti in questo caso!
ora se io utilizzo un ciclo per contare le righe e inserire in valore nella funzione format ottengo un errore!
come faccio a fargli prendere il numero di righe corretto?

il mio approccio NON funzionante:

            arr = RT1.Text.Split(ControlChars.CrLf.ToCharArray)

            For itx = 0 To UBound(arr)
                strModified = String.Format("{itx}", arr)
                LBL1.Text = strModified
            Next itx