'建立動態(tài)數(shù)組Dim Arrl : Set Arrl = CreateObject("System.Collections.ArrayList")'添加元素Arrl.Add "Element3"Arrl.Add "Element2"Arrl.Add "Element1"'查看動態(tài)數(shù)組中的元素數(shù)WScript.Echo "動態(tài)數(shù)組中現(xiàn)有元素數(shù)量: " & Arrl.CountWScript.Echo "動態(tài)數(shù)組容量: " & Arrl.CapacityWScript.Echo'遍歷動態(tài)數(shù)組Sub TraverseArrl Dim Counter For Counter = 0 To Arrl.Count - 1  WScript.Echo Arrl(Counter) NextEnd SubTraverseArrlWScript.Echo'動態(tài)數(shù)組排序Arrl.SortTraverseArrlWScript.Echo'刪除指定元素Arrl.Remove("Element1")TraverseArrlWScript.Echo'清空全部元素Arrl.ClearWScript.Echo "動態(tài)數(shù)組中現(xiàn)有元素數(shù)量: " & Arrl.CountWScript.Echo "動態(tài)數(shù)組容量: " & Arrl.Capacity