Show the values returned by each method for different types of characters. : CharUnicodeInfo « I18N Internationlization « VB.Net Tutorial

1. VB.Net Tutorial
2. I18N Internationlization
3. CharUnicodeInfo

Imports System
Imports System.Globalization

Public Class MainClass
   Public Shared Sub Main()
      Dim s As [String] = "a9\u0393\u00B2\u00BC"
      Console.WriteLine("String: {0}", s)

      Console.WriteLine("index c  Num   Dig   Dec   UnicodeCategory")
      Dim i As Integer
      For i = 0 To s.Length - 1
         Console.Write("{0,-5} {1,-3}", i, s(i))
         Console.Write(" {0,-5}", CharUnicodeInfo.GetNumericValue(s, i))
         Console.Write(" {0,-5}", CharUnicodeInfo.GetDigitValue(s, i))
         Console.Write(" {0,-5}", CharUnicodeInfo.GetDecimalDigitValue(s, i))
         Console.WriteLine("{0}", CharUnicodeInfo.GetUnicodeCategory(s, i))
      Next i

   End Sub

End Class