arrays - 如何测试多维数组？

Question

我正在尝试测试我的 vbscript 函数中是否存在多维数组，但我在寻找最佳解决方案时遇到了问题。

在我的函数中，我要么排除字符串值，要么排除值数组，该数组可以是单个暗淡或多维。

我遇到的问题是尝试测试阵列是单暗还是多暗。有预定义的方法吗？

任何帮助都会很棒。

Answer 1

不，没有预定义的方式；也就是说：没有内置函数可以返回维度的数量。但是，您可以自己构建。

' Returns the amount of dimensions of an array.
' Returns 0 when it is no array
Function GetDimensions(arr)

    Dim dimension, upperBound

    On error resume next
    For dimension = 1 to 255
        upperBound = ubound(arr, dimension)
        If err.Number <> 0 Then Exit for
    Next
    On error goto 0
    GetDimensions = dimension-1
End Function

Dim myArray(41, 42, 43)
MsgBox GetDimensions(myArray) ' Will return 3.