VB.Net/Development/RegionInfo — различия между версиями
Admin (обсуждение | вклад) м (1 версия) |
Admin (обсуждение | вклад) м (1 версия) |
(нет различий)
|
Текущая версия на 15:45, 26 мая 2010
Region Info Table
<source lang="vbnet"> 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
</source>