Region Info Table : RegionInfo « Internationalization I18N « VB.Net

1. VB.Net
2. Internationalization I18N
3. RegionInfo

Region Info Table

   

Imports System
Imports System.Globalization

Module Module1
   Sub Main()
      Dim AllCultures() As CultureInfo
      Dim ACulture As CultureInfo
      Dim Rg As RegionInfo
      Dim k As Integer

      AllCultures = CultureInfo.GetCultures(CultureTypes.SpecificCultures)
      For Each ACulture In AllCultures
         Rg = New RegionInfo(ACulture.LCID)
         Console.WriteLine(Rg.TwoLetterISORegionName.ToString().PadRight(5, " ") + _
                              "," + Rg.EnglishName.PadRight(40, " ") + _
                              "," + ACulture.LCID.ToString())
      Next
   End Sub
End Module

   
    
    
  

Related examples in the same category