Velocemente farei una cosa del genere

codice:
   Public Class GruppoArray
        Private _maxitem As Integer
        Private _GruppoArray As New List(Of ArrayList)

        Public ReadOnly Property MaxItemPerArray As Integer
            Return _maxitem
        End Property

        Public ReadOnly Property ListaArray As ArrayList()
                Return _GruppoArray.ToArray()
        End Property

        Public Sub Add(ByVal wArray As ArrayList)
            _GruppoArray.add(wArray)
        End Sub
    End Class


    Private function pippo()
        Dim wReturnList As New List(Of String)
        Dim wContatore As Integer = 0
        Dim wStringa As String
        Dim wGruppo As GruppoArray = New GruppoArray()

        ''aggiungi array alla classe wGruppo 

        For wContatore to  wGruppo.MaxItemPerArray
            wStringa = ""
            For Each ItemArr In wGruppo.ListaArray
                If ItemArr.Count > wContatore + 1 Then
                    ''''Usa uno string builder
                    wStringa &= ItemArr(wContatore).ToString
                End If
            Next
            wReturnList.Add(wStringa)
            wContatore += 1
        Next
        Return wReturnList.ToArray()
    End function