Mega Code Archive

 

Categories / VisualBasic Script / Data Type

 

Adding Items to a Custom Collection

Sub NewCollection()    Dim colSports As New Collection    colSports.Add "Basketball"    colSports.Add "Skiing"    colSports.Add "Skating", Before:=1    colSports.Add "Hockey", After:=2  End Sub