Imports System.Collections
Dim ObjectsInMyBackpack as New Hashtable()
ObjectsInMyBackpack.Add("Item1","Binder")
ObjectsInMyBackpack.Add("Item2","Folder")
ObjectsInMyBackpack.Add("Item3","Pencils")
ObjectsInMyBackpack.Add("Item4","Calculator")
Console.WriteLine("Objects in my backpack are:")
For each ObjItem as String in ObjectsInMyBackpack.values
Console.WriteLine(ObjItem)
ObjectsInMyBackpack.Remove("Item1")
Console.WriteLine("Binder removed from collection, now the objects in my backpack are:")
For each ObjItem as String in ObjectsInMyBackpack.values
Console.WriteLine(ObjItem)