Dim oAList As Object
Set oAList = CreateObject("System.Collections.ArrayList")
oAList.Add "Foo"
oAList.Add "BAR"
MsgBox oAList(0)
Dim oAList As Object
Set oAList = CreateObject("System.Collections.ArrayList")
oAList.Add "Foo"
oAList.Add "BAR"
MsgBox oAList(0)