Remove element and clear the collection
Imports System Imports System.Collections.Generic Imports System.Collections.ObjectModel Public Class Demo Public Shared Sub Main() Dim numbers As New Collection(Of String) numbers.Add("One") numbers.Add("Two") numbers.Add("Five") numbers.Add("Three") numbers.Remove("One") Display(numbers) numbers.RemoveAt(0) Display(numbers) numbers.Clear() Console.WriteLine("Count: {0}", numbers.Count) End Sub Private Shared Sub Display(ByVal cs As Collection(Of String)) Console.WriteLine() For Each item As String In cs Console.WriteLine(item) Next item End Sub End Class