Imports System.Numerics
Class Sample
Public Shared Sub Main()
Dim bigNumber As BigInteger = 2010
Try
Dim number3 As Integer = CInt(bigNumber)
Console.WriteLine(number3)
Catch e As OverflowException
Console.WriteLine("{0} is out of range of an Int32.", bigNumber)
End Try
End Sub
End Class