Imports System
Imports System.Globalization
Class Sample
Public Shared Sub Main()
Dim bytes() As Byte = {0, 1, 14, 168, 255}
Dim providers() As CultureInfo = {New CultureInfo("en-us"), _
New CultureInfo("fr-fr"), _
New CultureInfo("de-de"), _
New CultureInfo("es-es")}
For Each byteValue As Byte In bytes
For Each provider As CultureInfo In providers
Console.Write("{0,3} ({1}) ", byteValue.ToString(provider), provider.Name)
Next
Next
End Sub
End Class