Imports System
Imports System.Collections.Generic
Public Class Example
Public Shared Sub Main()
Dim input() As String = { "One","Two","Three" }
Dim numbers As New List(Of String)(input)
Console.WriteLine("Capacity: {0}", numbers.Capacity)
For Each num As String In numbers
Console.WriteLine(num)
Next
input = New String() { "One","Four","Three" }
Console.WriteLine("InsertRange(3, input)")
numbers.InsertRange(3, input)
For Each num As String In numbers
Console.WriteLine(num)
Next
End Sub
End Class