Mega Code Archive

 

Categories / VB.Net / Internationalization

 

Whether the current CultureInfo represents a neutral culture

Imports System Imports System.Globalization Module Module1    Public Sub Main()       Dim ci As CultureInfo       For Each ci In CultureInfo.GetCultures(CultureTypes.AllCultures)          If ci.TwoLetterISOLanguageName = "zh" Then             Console.Write("{0,-7} {1,-40}", ci.Name, ci.EnglishName)             If ci.IsNeutralCulture Then                Console.WriteLine(": neutral")             Else                Console.WriteLine(": specific")             End If          End If       Next ci    End Sub 'Main  End Module