Internationalization VB.Net

Imports System.Globalization
Imports System.Text
Public Module Example
   Public Sub Main()
      Dim sb As New StringBuilder()
      Dim cultureNames() As String = {"en", "en-AU", "en-BZ", "en-CA", "en-029", _ 
                                      "en-TT", "en-GB", "en-US", "en-ZW" }
      For Each cultureName As String In cultureNames
         Dim ci As New CultureInfo(cultureName)
         Dim nfi As NumberFormatInfo = ci.NumberFormat
         Console.WriteLine(ci.DisplayName)
         Console.WriteLine(nfi.CurrencySymbol)
      Next
   End Sub
End Module