mcs/mbas/Test/rerrors/Test/AssignmentStatements3.vb

   1 'Expected: System.OverflowException: Arithmetic operation resulted in an overflow.
   2
   3 Imports System
   4 Imports Nunit.Framework
   5
   6 <TestFixture> _
   7 Public Class AssignmentStatements3
   8
   9                 <Test, ExpectedException (GetType (System.OverflowException))> _
  10                 Public Sub TestOverFlow ()
  11                         Dim b As Integer = 0
  12                         b += 1000
  13                 End Sub
  14 End Class
  15