Dim coll As New Collection
coll.Add "apple"
coll.Add "banana"