Hola buenas tardes chicos

Soy nuevo por aqui y tengo una duda que me esta volviendo loco.

Tengo un Array en la parte de cliente que debo pasar a la parte servidor, el problema es que ese array tiene una length de 60000, con lo que pretendo cortar el array en trozos en otro array, para ello utilizo system.array.contrainedcopy, pero no me esta respetando el codigo.

Podeis ayudarme a realizar este proceso??

mi codigo es este:

PrivateSub Cortaarray(ByVal arr() AsString, OptionalByVal length AsInteger = -1)
Dim indice AsDouble = 0
Dim i AsLong
Dim n AsInteger
Try
'If length = -1 Then length = arr.Length
n = 10
Dim tmparr(arr.Length - 1) AsString

'arr.CopyTo(tmparr2, 0)
For i = 0 To arr.Length
If (i + n < arr.Length) Then
System.Array.ConstrainedCopy(arr, i, tmparr, 0, n)
mInicio.CliArea.Proyecto.ImportarExcel(tmparr)
i = i + n
Else
n = arr.Length - i
System.Array.ConstrainedCopy(arr, i, tmparr, 0, n)
mInicio.CliArea.Proyecto.ImportarExcel(tmparr)
i = i + n
EndIf
Next
Catch ex As Exception
EndTry
EndSub

Lo veis correcto???

Saludos