Imports System.Numerics
Imports System
Module Example
Public Sub Main()
Dim goodLong As BigInteger = 2000000000
Dim longFromBigInteger As Long
' Convert using CType function.
longFromBigInteger = CType(goodLong, Long)
Console.WriteLine(longFromBigInteger)
' Convert using CLng function.
longFromBigInteger = CLng(goodLong)
Console.WriteLine(longFromBigInteger)
End Sub
End Module