Imports System
Module GetUnicodeCategorySample
Sub Main()
Console.WriteLine(Char.GetUnicodeCategory("a"c))
Console.WriteLine(Char.GetUnicodeCategory("2"c))
Console.WriteLine(Char.GetUnicodeCategory("Upper Case", 6))
End Sub
End Module