Data Types VB.Net

Imports System.Numerics
Module Example
   Public Sub Main()
      Dim numbers() As BigInteger = { Int64.MaxValue * BigInteger.MinusOne, 
                                      BigInteger.MinusOne, 
                                      9999999, 
                                      BigInteger.Pow(9999999, 2),
                                      BigInteger.Multiply(Int32.MaxValue, Int16.MaxValue), 
                                      BigInteger.Add(BigInteger.Pow(Int64.MaxValue, 2), 
                                                     BigInteger.Pow(Int32.MaxValue, 2)),
                                      BigInteger.Zero }
      Dim smallest As BigInteger = numbers(numbers.GetLowerBound(0))
      For ctr As Integer = numbers.GetLowerBound(0) + 1 To numbers.GetUpperBound(0)
         smallest = BigInteger.Min(smallest, numbers(ctr))
      Next
      For Each number As BigInteger In numbers
         Console.WriteLine("{0,55:N0}", number)
      Next   
      Console.WriteLine("   {0:N0}", smallest)   
   End Sub
End Module