VBS基础篇 - vbscript动态数组

2019-10-26 18:08:14

字体：大中小

来源：转载

供稿：网友

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

实例代码

'建立动态数组Dim Arrl : Set Arrl = CreateObject("System.Collections.ArrayList")'添加元素Arrl.Add "Element3"Arrl.Add "Element2"Arrl.Add "Element1"'查看动态数组中的元素数WScript.Echo "动态数组中现有元素数量: " & Arrl.CountWScript.Echo "动态数组容量: " & Arrl.CapacityWScript.Echo'遍历动态数组Sub TraverseArrl Dim Counter For Counter = 0 To Arrl.Count - 1 WScript.Echo Arrl(Counter) NextEnd SubTraverseArrlWScript.Echo'动态数组排序Arrl.SortTraverseArrlWScript.Echo'删除指定元素Arrl.Remove("Element1")TraverseArrlWScript.Echo'清空全部元素Arrl.ClearWScript.Echo "动态数组中现有元素数量: " & Arrl.CountWScript.Echo "动态数组容量: " & Arrl.Capacity

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