Internationalization VB.Net

Imports System
Imports System.Globalization
Imports System.Threading
Class Sample
    Public Shared Sub Main() 
        Dim currentCI As CultureInfo = Thread.CurrentThread.CurrentCulture
        Dim nfi As NumberFormatInfo = currentCI.NumberFormat
        Dim nativeDigitList As String() = nfi.NativeDigits
        Console.WriteLine(currentCI.Name)
        Dim s As String
        For Each s In  nativeDigitList
            Console.WriteLine(s)
        Next s
    End Sub 
End Class