51Testing软件测试论坛

标题: 请教一个关于数组的问题 [打印本页]

作者: kukulsz    时间: 2010-9-19 10:17
标题: 请教一个关于数组的问题
代码如下:
Dim Arr()
For a=0 to 10
Arr(a)=a
Next
运行时报错提示Subscript out of range
由于不能确定数组个数,要定义一个空数组,再循环往里面加数据,请问该如何正确使用?求指点
作者: ppppp1990    时间: 2010-9-25 00:44
你错误理解定长数组了,按照你的本意,第一行应该是
Dim Arr(10),
输出结果是Arr(0)=0
Arr(1)=1....
Arr(10)=10
作者: feiyunkai    时间: 2010-9-25 17:17
标题: 代码如下:
Dim Arr()
For a=0 to 10
redim Arr(a)
Arr(a)=a
Next
作者: TIB    时间: 2010-9-26 12:05
要用一下redim




欢迎光临 51Testing软件测试论坛 (http://bbs.51testing.com/) Powered by Discuz! X3.2