Imports System
Imports System.Collections
Namespace List
Class Program
Private Shared Sub Main(ByVal args As String())
Dim miLista As ArrayList = New ArrayList()
miLista.Add("Hola,")
miLista.Add("soy")
miLista.Add("yo")
For Each frase As String In miLista
Console.WriteLine(frase)
Next
miLista.Insert(1, "Como estas?")
End Sub
End Class
End Namespace