mcs/btests/ConditionalStatementsC12.vb

   1 REM LineNo: 16\r
   2 REM ExpectedError: BC30072\r
   3 REM ErrorMessage: 'Case' can only appear inside a 'Select Case' statement.\r
   4 \r
   5 REM LineNo: 18\r
   6 REM ExpectedError: BC30088\r
   7 REM ErrorMessage: 'End Select' must be preceded by a matching 'Select Case'.\r
   8 \r
   9 \r
  10 Imports System\r
  11 \r
  12 Module ConditionalStatementsC12\r
  13 \r
  14     Sub Main()\r
  15 \r
  16                 Case 0\r
  17                      Console.WriteLine("Hello World")\r
  18         End Select   \r
  19 \r
  20     End Sub\r
  21 \r
  22 End Module