VBS_动态数组详解

本人用C系语言比较多，像C,C++,JAVA,PHP,Javascript之类的用的比较顺手。偶尔写个脚本，在window下还是vbs方便，这话也就说到这了= =！

vbs用的不熟，写起来各种不愉快。

首先动态数组定义

Dim n    '定义赋值不能一块写 有点醉
n=10     '写一块会报错 “语句未结束”
Dim Myarray(n)    '然后想动态的定义一个数组 你猜怎么着

显然不认可，报的错是“缺少整型常量”，貌似只能是常量，不知道vbs有没有常变量这种东西，嗯，这么好的东西一定没有！

然后呢，我脑洞打开既然只能用常量，那是不是可以用switch case模拟！就是:

javascript

switch(n){

case 1:var Myarray(1);break;

case 2:var Myarray(2);break;...

}

貌似穿越了，且不说能不能成，实用性肯定不过关，1000大小的数组写一千行，还只是定义数组，会这样写也就只有山里来的程序猿了吧。。。

难道就没有其他招？

别急方法还是有的：

Dim n,myarray()
n=10
ReDim myarray(n)

上面的myarray()定义的是动态数组:

运行脚本时大小发生变化的数组，可以使用Dim或ReDim语句，但括号中不包含任何数字。

要使用动态数组，必须随后使用ReDim确定维数和每一维的大小。

若同时使用Preserve关键字，则在重新调整大小时保留数组的内容。

msgbox ubound(myarray)

结果为10