Arrays 如何测试多维数组?

Arrays 如何测试多维数组?,arrays,testing,vbscript,multidimensional-array,Arrays,Testing,Vbscript,Multidimensional Array,我正在尝试测试vbscript函数中是否存在多维数组,但在找到最佳解决方案时遇到问题 在我的函数中,除了一个字符串值或一个值数组,该数组可以是单个dim或多维数组 我遇到的问题是尝试测试阵列是单维还是多维。是否有一种预定义的方法来执行此操作 任何帮助都会很好。不,没有预先确定的方法;也就是说:没有内置函数可以返回维度的数量。但是,您可以构建自己的 ' Returns the amount of dimensions of an array. ' Returns 0 when it is no a

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

在我的函数中,除了一个字符串值或一个值数组,该数组可以是单个dim或多维数组

我遇到的问题是尝试测试阵列是单维还是多维。是否有一种预定义的方法来执行此操作


任何帮助都会很好。

不,没有预先确定的方法;也就是说:没有内置函数可以返回维度的数量。但是,您可以构建自己的

' 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.
”返回数组的维数。
'当它不是数组时返回0
函数GetDimensions(arr)
尺寸标注,上界
出错时继续下一步
对于尺寸=1到255
上限=ubound(arr,尺寸)
如果错误号为0,则退出
下一个
错误转到0
GetDimensions=dimensions-1
端函数
Dim myArray(41、42、43)
MsgBox GetDimensions(myArray)“”将返回3。