mcs/btests/ExceptionHandlingC1.vb

   1 REM LineNo: 12
   2 REM ExpectedError: BC30441
   3 REM ErrorMessage: 'Catch' must end with a matching 'End Try'
   4
   5 Imports System
   6
   7 Module ExceptionHandlingC1
   8
   9     Sub Main()
  10         Try
  11             'Do something
  12         Catch e As Exception
  13             Console.WriteLine(e.Message)
  14
  15     End Sub
  16
  17 End Module
  18