kukulsz 发表于 2010-9-19 10:17:07

请教一个关于数组的问题

代码如下:
Dim Arr()
For a=0 to 10
Arr(a)=a
Next
运行时报错提示Subscript out of range
由于不能确定数组个数,要定义一个空数组,再循环往里面加数据,请问该如何正确使用?求指点

ppppp1990 发表于 2010-9-25 00:44:44

你错误理解定长数组了,按照你的本意,第一行应该是
Dim Arr(10),
输出结果是Arr(0)=0
Arr(1)=1....
Arr(10)=10

feiyunkai 发表于 2010-9-25 17:17:48

代码如下:

Dim Arr()
For a=0 to 10
redim Arr(a)
Arr(a)=a
Next

TIB 发表于 2010-9-26 12:05:48

要用一下redim
页: [1]
查看完整版本: 请教一个关于数组的问题