mcs/mbas/Test/errors/ExceptionHandlingC11.vb

   1 REM LineNo: 13
   2 REM ExpectedError: BC30544
   3 REM ErrorMessage: Method cannot contain both a 'Try' statement and an 'On Error'
   4 REM               or 'Resume' statement.
   5
   6 Imports System
   7
   8 Module ExceptionHandlingC11
   9
  10     Sub Main()
  11         Resume Next
  12         Dim i As Integer
  13         Try
  14             i = 1 / i
  15             Console.WriteLine(i)
  16         Catch e As Exception
  17             Console.WriteLine(e.Message)
  18         End Try
  19     End Sub
  20
  21 End Module
  22