脚本专栏 发布日期:2024/12/28 浏览次数:1
脚本文件:b.vbs,包含动态数组的添加元素、删除元素、遍历、统计元素个数、清空
实例代码
'建立动态数组 Dim Arrl : Set Arrl = CreateObject("System.Collections.ArrayList") '添加元素 Arrl.Add "Element3" Arrl.Add "Element2" Arrl.Add "Element1" '查看动态数组中的元素数 WScript.Echo "动态数组中现有元素数量: " & Arrl.Count WScript.Echo "动态数组容量: " & Arrl.Capacity WScript.Echo '遍历动态数组 Sub TraverseArrl Dim Counter 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 "动态数组中现有元素数量: " & Arrl.Count WScript.Echo "动态数组容量: " & Arrl.Capacity
调用方法:通过双击b.bat调用,b.bat代码如下:
cscript b.vbs
pause
运行结果截图: