Dim d '创建一个变量
'创建Array外部对象,将对象实例置变量d中
Set d = CreateObject("Stock.Array")
'创建完Array对象后往其内部插入两个数据
d.AddBack(3.25)
d.AddBack(4.33)
d.AddBack(2.02)
application.MsgOut "第一次"
For i = 0 To d.count-1
application.MsgOut d.GetAt(i)
Next
d.RemoveAt(1)
application.MsgOut "第二次"
For i = 0 To d.count-1
application.MsgOut d.GetAt(i)
Next
你运行下就知道remove是移除了第一个元素的