Imports System
Imports System.Text
Imports Microsoft.VisualBasic.Strings
Imports System.Numerics
Class MainClass
Public Shared Sub Main()
Dim longs() As Long = { Int64.MinValue, -1,Int64.MaxValue }
Dim constructed, assigned As BigInteger
For Each number As Long In longs
constructed = New BigInteger(number)
assigned = number
Console.WriteLine(constructed)
Console.WriteLine(assigned)
Next
End Sub
End Class