mcs/btests/ExceptionHandlingC1.vb

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