[AYUDA VB .NET] Separa Cadena de cuatro en cuatro

[ErCaZa]

Buenas resulta que tengo una cadena del tipo
85,83,69,95,84,83,101,93,71,114,68,111,88,98,116,1 12,88,98,76
un array de bytes

Y me gustaria poder separarla en bloques de 4 caracteres y guardar cada bloque en un array del tipo string de tal manera que quedase asi

String(0) = 85,83,69,95,
String(1) = 84,83,101,93,
String(2) = 71,114,68,111,
String(3) = 88,98,116,112,
String(4) = 88,98,76

Quiero destacar que la cadena de bytes puede variar de longitud
He intentado pensar variar formas pero no caigo con ninguna :S

[Peterpay]

usa mejor tucadena.Split con la ',' como parametro y eso te devolvera tu array de N strings con cada representacion string de tu byte, y de ahi solo recorre el array de strings por bloques de 4 o que se yo.

[pkj]

Yo en VB6 haría algo como esto:
Suponiendo que tu cadena de numeros se llama cadena
y quieres crear una matriz de cadenas llamada matriz()

contador=0
nuevacadena=""
for f=1 to len(cadena)
nuevacadena=nuevacadena & mid$(cadena,f,1)
if mid$(cadena,f,1)="," then
contador=contador+1
if contador=4 then
nuevacadena=nuevacadena & "/"
contador=0
end if
end if
next f
matriz=split(nuevacadena,"/")

no debe ser muy dificil de adaptar a .net

[ErCaZa]

Ya esta, ya lo tengo, dejo la solución:

Código:

        Dim Bloques() As String = New String(50) {}
        Dim Count As Short = 1
        Dim Array As Short = 0

        For i = 0 To Value.Length - 1
            Bloques(Array) &= Value(i) & ","
            If Count = 4 Then
                Count = 1
                Array += 1
            Else
                Count += 1
            End If
        Next

Si encontrais que se puede mejorar de alguna parte decidmelo

[David]

Aquí otra opción:

Código vb.net:

Dim Bloques() As String = New String(50) {}
 
For i = 0 To Partes.Length \ 4 - 1
    Bloques(i) = String.Join(",", Value, i * 4, 4)
Next i
Bloques(i) = String.Join(",", Value, i * 4, Value.Length - i * 4)