Imports System.Globalization
Module Example
Public Sub Main()
Dim numbers() As Integer = { -9999, 0, 169, 9999 }
For Each number As Integer In numbers
Console.WriteLine("{0,14:X8}", number)
Next
End Sub
End Module