如何获取数组的维数
2010-03-30 10:41
113 查看
在Excel VBA编程中,我们知道可以利用UBound函数来获取数组各纬度的上标。但是当超过该数组的上标时就会发生错误,所以可以利用Excel的出错来获取数组的维数。代码如下:
用以下代码测试一下:
Function DofArray(arr) As Integer On Error Resume Next '判断是否数组 If Not IsArray(arr) Then DofArray = -1 Exit Function End If '利用出错来判断 For i = 1 To 60 aa = UBound(arr, i) If Err.Number <> 0 Then DofArray = i - 1 Exit Function End If Next End Function
用以下代码测试一下:
Sub Test() Dim A(5, 5, 4, 3, 6) MsgBox DofArray(A) End Sub
相关文章推荐
- python numpy 如何获取和更改数组(array)的形状、维数-shape&reshape
- 请问如何获取字符串在数组中的位置
- 如何获取两个数组中相同的字段
- VBS中如何获取一个数组中最大值的位置?
- js中如何快速获取数组中的最大值最小值以及取整
- C/C++中如何获取数组的长度?
- php中如何搜索相关联数组键值及获取之
- 异步 如何用数组获取元素的值
- 传递到函数 中的数组如何获取长度
- 面试题:给定一个有序的数组,如果往该数组中存储一个元素,并保证这个数组还是有序的,那么元素的存储的角标位如何获取。
- 如何在模板中获取数组长度?
- 如何判断数组是否已初始化,定义了维数
- PHP的数组中如何根据某一个value值获取其key值
- 如何在js中获取从action传来的数组
- PHP如何快速的按照字符串获取数组中的值?
- 请问如何获取字符串在数组中的位置
- Android 数组资源如何获取
- 如何获取定义在res中的String数组
- C/C++中如何获取数组的长度?
- C/C++中如何获取数组的长度?