Imports System
Imports System.Text
Imports Microsoft.VisualBasic.Strings
Imports System.Numerics
Imports System.Globalization
Class MainClass
Public Shared Sub Main()
Dim negativeNumber As BigInteger = -100
Dim positiveNumber As BigInteger = 1111
Dim negativeHex As String = negativeNumber.ToString("X")
Dim positiveHex As string = positiveNumber.ToString("X")
Dim negativeNumber2, positiveNumber2 As BigInteger
negativeNumber2 = BigInteger.Parse(negativeHex, NumberStyles.HexNumber)
positiveNumber2 = BigInteger.Parse(positiveHex,NumberStyles.HexNumber)
Console.WriteLine(negativeNumber2)
Console.WriteLine(positiveNumber2)
End Sub
End Class