Imports System
Imports System.Globalization
Imports System.Text
Imports Microsoft.VisualBasic
Class SamplesNumberFormatInfo
Public Shared Sub Main()
Dim myInv As NumberFormatInfo = NumberFormatInfo.InvariantInfo
Dim myUE As New UnicodeEncoding(True, False)
Dim myCodes() As Byte
Console.WriteLine(myInv.NaNSymbol)
Console.WriteLine(myInv.NegativeInfinitySymbol)
Console.WriteLine(myInv.NegativeSign)
Console.WriteLine(myInv.NumberDecimalDigits)
Console.WriteLine(myInv.NumberDecimalSeparator)
Console.WriteLine(myInv.NumberGroupSeparator)
Console.WriteLine(myInv.NumberGroupSizes(0))
Console.WriteLine(myInv.NumberNegativePattern)
End Sub
End Class