VBScript 动态 Array 的实现代码
记录一个小方法,关于VBScript中,动态Array的实现,也适用于VBA,
在很久以前,写VBA的时候,就觉得使用Array和不方便,因为大小固定,
当时想的是,要是Array可以像Python里的list一样好用该多好啊,
那么下面,就记录一个方法,能让Array变得动态,并且好用!
实现方法:
在下面的实例中,先设定一个空的Array出来,
然后用,下面的方法实现动态Array,
并且,把数字1到10,一个加到Array中去。
'动态Array实现
myArray=Array() Fori=1To10 ReDimPreservemyArray(UBound(myArray)+1) myArray(UBound(myArray))=i Next
那么动态Array就这么开心的实现啦,(^_−)☆
对比下和Pythonlist的代码吧,感觉是不是很像呢。
#Python中list的使用 myList=list() foriinrange(10): myList.append(i) print(myList)
数据输出:
然后,思考下一个问题,也是我之前写VBA时候考虑的问题,
就是,怎么一下子,看到Array中所有的数据,
之前的本方法,是使用ForLoop,把Array中的数据一个个Print出来,
但是现在发现了简单的方法,代码如下:
'最简单的方法:
MsgBoxJoin(myArray,vblf) '之前使用的笨方法: ForEachiInmyArray Debug.Printi Next
结束语:
上面的动态Array方法,在VBScript和VBA中都可用!
总结
到此这篇关于VBScript动态Array的实现代码的文章就介绍到这了,更多相关VBScript动态Array内容请搜索毛票票以前的文章或继续浏览下面的相关文章希望大家以后多多支持毛票票!