VB.NET ArrayList Ajouter et Parcourir

Dim array As New ArrayList()
array.Add("abc")
array.Add("d")
Debug.Print(array.Item(1))
Dim s As String
For Each s In array
Debug.Print(s)
Next s