NumberFormatInfo Class

Imports System.Globalization
Imports System.Text

Public Module Example
   Public Sub Demo(outputBlock As System.Windows.Controls.TextBlock)
      Dim sb As New StringBuilder()

      ' Create an array of English-speaking culture names.
      Dim cultureNames() As String = {"en", "en-AU", "en-BZ", "en-CA", "en-029", _ 
                                      "en-IE", "en-JM", "en-NZ", "en-PH", "en-ZA", _ 
                                      "en-TT", "en-GB", "en-US", "en-ZW" }

      ' Loop through all the culture names.
      For Each cultureName As String In cultureNames
         Dim ci As New CultureInfo(cultureName)
         ' Display the culture name and currency symbol.
         Dim nfi As NumberFormatInfo = ci.NumberFormat
         sb.AppendFormat("The currency symbol for '{0}' is '{1}'", _
                         ci.DisplayName, nfi.CurrencySymbol)
         sb.AppendLine()
      Next
      outputBlock.Text &= sb.ToString() & vbCrLf
   End Sub
End Module
' This example produces the following output.
'    The currency symbol for 'English (United States)' is '$'
'    The currency symbol for 'English (Australia)' is '$'
'    The currency symbol for 'English (Belize)' is 'BZ$'
'    The currency symbol for 'English (Canada)' is '$'
'    The currency symbol for 'English (Caribbean)' is '$'
'    The currency symbol for 'English (Ireland)' is '€'
'    The currency symbol for 'English (Jamaica)' is 'J$'
'    The currency symbol for 'English (New Zealand)' is '$'
'    The currency symbol for 'English (RePublic of the Philippines)' is 'Php'
'    The currency symbol for 'English (South Africa)' is 'R'
'    The currency symbol for 'English (Trinidad and Tobago)' is 'TT$'
'    The currency symbol for 'English (United Kingdom)' is '£'
'    The currency symbol for 'English (United States)' is '$'
'    The currency symbol for 'English (Zimbabwe)' is 'Z$'

using System;
using System.Globalization;
using System.Text;

public sealed class Example
{
   public static void Demo(System.Windows.Controls.TextBlock outputBlock)
   {
      StringBuilder sb = new StringBuilder();

      // Create an array of English-speaking culture names.
      string[] cultureNames = {"en", "en-AU", "en-BZ", "en-CA", "en-029", 
                               "en-IE", "en-JM", "en-NZ", "en-PH", "en-ZA", 
                               "en-TT", "en-GB", "en-US", "en-ZW" };

      // Loop through all the culture names.
      foreach (string cultureName in cultureNames)
      {
         CultureInfo ci = new CultureInfo(cultureName);

         // Display the culture name and currency symbol.
         NumberFormatInfo nfi = ci.NumberFormat;
         sb.AppendFormat("The currency symbol for '{0}' is '{1}'",
             ci.DisplayName, nfi.CurrencySymbol);
         sb.AppendLine();
      }
      outputBlock.Text += sb.ToString() + "\n";
   }
}
// This example produces the following output.
//    The currency symbol for 'English (United States)' is '$'
//    The currency symbol for 'English (Australia)' is '$'
//    The currency symbol for 'English (Belize)' is 'BZ$'
//    The currency symbol for 'English (Canada)' is '$'
//    The currency symbol for 'English (Caribbean)' is '$'
//    The currency symbol for 'English (Ireland)' is '�'
//    The currency symbol for 'English (Jamaica)' is 'J$'
//    The currency symbol for 'English (New Zealand)' is '$'
//    The currency symbol for 'English (Republic of the Philippines)' is 'Php'
//    The currency symbol for 'English (South Africa)' is 'R'
//    The currency symbol for 'English (Trinidad and Tobago)' is 'TT$'
//    The currency symbol for 'English (United Kingdom)' is '�'
//    The currency symbol for 'English (United States)' is '$'
//    The currency symbol for 'English (Zimbabwe)' is 'Z$'