mcs/mbas/Test/rerrors/IntegerLiteralTest1.vb

   1 Imports System
   2
   3 Module IntegerLiteralTest1
   4     Sub Main()
   5         Try
   6             Dim i As Integer
   7             i = System.Int32.MaxValue
   8             i = i + 1
   9         Catch e As Exception
  10             Console.WriteLine(e.Message)
  11         End Try
  12     End Sub
  13
  14 End Module