This function returns the dimensions of an array.

The dimensions are returned in a second array.

For Example:

Dim a(0)

Dim b$(3,5,9,10,11)

a() = GetDim(b$())

For i=0 to a(0)

Print i,a(i)

Next i

0 5

1 3

2 5

3 9

4 10

5 11

Notice a() is redimensioned to fit the number of dimensions of b$(). a(0) contains the number of dimensions. a(1) through a(n) contain the dimensions of b$().

Become a Patron