' This example demonstrates the CultureTypes enumeration 
' and the CultureInfo.CultureTypes property.

Imports System
Imports System.Globalization

Class Sample
    Public Shared Sub Main() 
        ' Create a table of most culture types. 
        Dim mostCultureTypes() As CultureTypes = { _
                CultureTypes.NeutralCultures, _
                CultureTypes.SpecificCultures, _
                CultureTypes.InstalledWin32Cultures, _
                CultureTypes.UserCustomCulture, _
                CultureTypes.ReplacementCultures, _
                CultureTypes.FrameworkCultures, _
                CultureTypes.WindowsOnlyCultures }
        Dim allCultures() As CultureInfo
        Dim combo As CultureTypes

        ' Get and enumerate all cultures.
        allCultures = CultureInfo.GetCultures(CultureTypes.AllCultures)
        Dim ci As CultureInfo
        For Each ci In  allCultures
            ' Display the name of each culture.
            Console.WriteLine("Culture: {0}", ci.Name)

            ' Get the culture types of each culture. 
            combo = ci.CultureTypes

            ' Display the name of each culture type flag that is set.
            Console.Write("  ")
            Dim ct As CultureTypes
            For Each ct In  mostCultureTypes
                If 0 <> (ct And combo) Then
                    Console.Write("{0} ", ct)
                End If
            Next ct
            Console.WriteLine()
        Next ci
    End Sub 'Main
End Class 'Sample

'The following is a portion of the results produced by this code example.
'.
'.
'.
'Culture: syr
'  NeutralCultures FrameworkCultures
'Culture: dv
'  NeutralCultures FrameworkCultures
'Culture:
'  SpecificCultures FrameworkCultures
'Culture: ar-SA
'  SpecificCultures FrameworkCultures
'Culture: bg-BG
'  SpecificCultures InstalledWin32Cultures FrameworkCultures
'Culture: ca-ES
'  SpecificCultures InstalledWin32Cultures FrameworkCultures
'Culture: zh-TW
'  SpecificCultures FrameworkCultures
'.
'.
'.

// This example demonstrates the CultureTypes enumeration 
// and the CultureInfo.CultureTypes property.

using System;
using System.Globalization;

class Sample 
{
    public static void Main() 
    {
// Create a table of most culture types. 
    CultureTypes[] mostCultureTypes = new CultureTypes[] {
                        CultureTypes.NeutralCultures, 
                        CultureTypes.SpecificCultures, 
                        CultureTypes.InstalledWin32Cultures, 
                        CultureTypes.UserCustomCulture, 
                        CultureTypes.ReplacementCultures, 
                        CultureTypes.FrameworkCultures,
                        CultureTypes.WindowsOnlyCultures
                        };
    CultureInfo[] allCultures;
    CultureTypes combo;

// Get and enumerate all cultures.
    allCultures = CultureInfo.GetCultures(CultureTypes.AllCultures);
    foreach (CultureInfo ci in allCultures)
        {
// Display the name of each culture.
        Console.WriteLine("Culture: {0}", ci.Name);

// Get the culture types of each culture. 
        combo = ci.CultureTypes;

// Display the name of each culture type flag that is set.
        Console.Write("  ");
        foreach (CultureTypes ct in mostCultureTypes)
            if (0 != (ct & combo))
                Console.Write("{0} ", ct);
        Console.WriteLine();
        }
    }
}

/*
The following is a portion of the results produced by this code example.
.
.
.
Culture: syr
  NeutralCultures FrameworkCultures
Culture: dv
  NeutralCultures FrameworkCultures
Culture:
  SpecificCultures FrameworkCultures
Culture: ar-SA
  SpecificCultures FrameworkCultures
Culture: bg-BG
  SpecificCultures InstalledWin32Cultures FrameworkCultures
Culture: ca-ES
  SpecificCultures InstalledWin32Cultures FrameworkCultures
Culture: zh-TW
  SpecificCultures FrameworkCultures
.
.
.
*/