Assign value by index
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(2) = "New Value" Display(numbers) 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