是否有VBScript数组类型类或类似的类,可以在其中两个项目之间添加项目?并且一旦添加,则其现有项目应转移到管理位置。我正在寻找的功能可用于从ArrayList or Dictionary objects中删除​​项目,在删除之后,这些项目也通过自己的努力使其成为连续的项目,我们不需要照顾这些事情。我也在寻找相同在方法之间添加项目(如果有)!

谢谢

最佳答案

令人惊讶的是:ArrayList.Insert

演示版2.0:

Option Explicit

Dim alA  : Set alA  = CreateObject("System.Collections.ArrayList")
Dim alB  : Set alB  = CreateObject("System.Collections.ArrayList")

alA.Add "A"
alA.Add "C"
alA.Insert 1, "B"

alB.Add "one"
alB.Add "two"

WScript.Echo "alA: ", Join(AlA.ToArray())

alA.InsertRange 1, (alB) ' Call By Value () needed!

WScript.Echo "alA: ", Join(AlA.ToArray())


输出:

alA:  A B C
alA:  A one two B C

09-12 04:01