Cache a 2-dimensional array

[VBAHole22]

I can get my 2-dim array to Cache but then I can't get it out

Dim MyList(,) As String
For Each dr In dtClone.Rows
                    ReDim Preserve MyList(1, j)
                    'Load the array from the datareader
                    MyList(0, j) = CType(dr.Item("D"), String)
                    MyList(1, j) = CType(dr.Item("D_PATH"), String)
                    j += 1
                Next
Cache.Item("MyLIST") = DGNList

And then later on a different event I want to pull these values back out

Dim AList As Array
        Dim j As Integer

        'Cache Array to local 1-dim array
        AList = CType(Cache("MyLIST"), Array)


        For j = 0 To AList.GetUpperBound(1)
            Dim DName As String
            DName = AList(1, j)
        Next j

I'm getting late bind error on the AList(1,j) line
I have option strict On
I realize I am dimming a 1-dimensional array to receive the Cache object but that is the only thing that would work.
Any suggestions?
What am I missing here?

 

[PlausiblyDamp]

How about something like

Dim AList(,) As String
Dim j As Integer

'Cache Array to local 1-dim array
AList = CType(Cache("MyLIST"), String(,))