Imports System
Imports System.Linq
Imports System.Collections.Generic
Module Program
Sub Main()
Dim countries As String() = {"US", "UK", "Australia", "New Zealand"}
Dim result As List(Of String) = countries.ToList()
For Each s As String In result
Console.WriteLine(s)
Next
End Sub
End Module
' run:
'
' US
' UK
' Australia
' New Zealand
'