Konverter object array med string arrays, til dobbel string array

arrayList.ToArray returnerer ikke et to dimensionelt array men derimod
et array af arrays

foelgende kode virker:

Imports System
Imports System.Collections

Module Main
    Sub Main()
        Dim arrayList As New ArrayList
        Dim i As Integer
        Dim astrTmp(1, 1) As String
        astrTmp(0, 0) = "0"
        astrTmp(0, 1) = "1"
        astrTmp(1, 0) = "2"
        astrTmp(1, 1) = "3"
        For i = 0 To astrTmp.GetUpperBound(0)
            Dim arr(1) As String
            arr(0) = astrTmp(i, 0)
            arr(1) = astrTmp(i, 1)
            arrayList.Add(arr)
        Next
        Dim arr1(1) As String
        Dim objectArray() As Object = arrayList.ToArray(arr1.GetType())
        'Dim dobbeltArr(,) As String = CType(objectArray, String(,))
        Dim jigsawArray()() As String = CType(objectArray, String()())
        Console.WriteLine(jigsawArray(0)(0))
        Console.WriteLine(jigsawArray(0)(1))
        Console.WriteLine(jigsawArray(1)(0))
        Console.WriteLine(jigsawArray(1)(1))
    End Sub
End Module

Fremragende. giver jo også mening hvis man tænker over det. hvis du sender et svar får du pointene.

kommer her