姜升润的外号:VB 如何获得数组a(N)的个数N?

来源:百度文库 编辑:高考问答 时间:2024/05/10 04:34:38
a(N)的长度为N 那么用什么方法可以知道N?
ubound(a)
错误类型:
Microsoft VBScript 运行时错误 (0x800A000D)
类型不匹配: 'ubound'
/test/1.asp, 第 55 行

msgbox "The lenth of a is" & Ubound(a)

用ubound()函数

你用的是vb脚本哈!
实际上ubound()对于从0开始的连续数组且填满的是可行的!
但vb可以不从0开始,就要 ubound()-Lbound()
但不是所有的数组元素都赋值
所以只能自己写函数解决问题,也就是循环遍历

例,给数组伏不等于0的值,找元素个数
dim nCount as integer, i as integer
nCount = 0
for i = lbound(arr) to ubound(arr)
if arr(i) <> 0 then nCount = nCount + 1
next

nCount里就是

使用 ubound() 时候先确保里里面放的是个数组:

Dim a(10) '先定义个长度为10的数组

msgbox ubound(a) '输出:9 ,因为是从0开始计算.

ubound() 返回的是数组的下标,上例中是9,想得到实际的长度应该再+1