Determining how many dimensions an array has???

[ojosVerdes]

Is there a way to determine how many dimensions an array has?

Thanks in advance.


Ed

 

[DrJavaJoe]

Try this:

http://vbnet.mvps.org/index.html?code/helpers/getarraydims.htm

"Two strings walk into a bar. The first string says to the bartender: 'Bartender, I'll have a beer. u.5n$x5t?*&4ru!2[sACC~ErJ'. The second string says: 'Pardon my friend, he isn't NULL terminated'."

 

[ojosVerdes]

Thanks DrJavaJoe.

Ed

 

[strongm]

If only I hadn't hacked my code down to a minimalist form in thread222-836312...

 

[Gila47ac]

Minimalist? I seem to recall coding it something like this...

Function NumberOfDimensions(ivntArray As Variant) As Integer
    Dim dintDimension   As Integer
    Dim dlngUpperBound  As Long
    On Error Resume Next
    For dintDimension = 1 To 65
        dlngUpperBound = UBound(ivntArray, dintDimension)
        If Err.Number <> 0 Then Exit For
    Next
    NumberOfDimensions = dintDimension - 1
End Function