Imports System.Numerics
Imports System
Module Example
Public Sub Main()
Dim number1 As BigInteger = CType(Double.MaxValue, BigInteger)
Dim number2 As BigInteger = number1
number2 = number2 + 9.999e291
Console.WriteLine("BigIntegers equal: {0}", number2.Equals(number1))
End Sub
End Module