VBS基础篇 - vbscript动态数组

脚本文件：b.vbs，包含动态数组的添加元素、删除元素、遍历、统计元素个数、清空

实例代码

'建立动态数组
Dim Arrl : Set Arrl = CreateObject("System.Collections.ArrayList")

'添加元素
Arrl.Add "Element3"
Arrl.http://www.devze.comAdd "Element2"
Arrl.Add "Element1"

'查看动态数组中的元素数
WScript.Echo "动态数组中现有元素数量: " & Arrl.Count
WScript.Echo "动态数组容量: " & Arrl.Capacity

WScript.Echo

'遍编程客栈历动态数组
Sub编程客栈 TraverseArrl
 Dim C编程客栈ounter
 For Counter = 0 To Arrl.Count - 1
  WScript.Echo Arrl(Counter)
 Next
End Sub
TraverseArrl

WScript.Echo

'动态数组排序
Arrl.Sort
TraverseArrl

WScript.Echo

'删除指定元素
Arrl.Remove("Element1")
TraverseArrl

WScript.Echo

'清空全部元素
Arrl.Clear
WScript.Echo www.devze.com"动态数组中现有元素数量: " & Arrl.Count
WScript.Echo "动态数开发者_Js入门组容量: " & Arrl.Capacity

调用方法：通过双击b.bat调用，b.bat代码如下：

cscript b.vbs

pause

运行结果截图：