mcs/mbas/Test/errors/ConditionalStatementsC10.vb

   1 REM LineNo: 14
   2 REM ExpectedError: BC30095
   3 REM ErrorMessage: 'Select Case' must end with a matching 'End Select'.
   4
   5 Imports System
   6
   7 Module ConditionalStatementsC10
   8
   9     Sub Main()
  10
  11         Dim i As Integer = 0
  12
  13         Select case i
  14                 case 0 To 1
  15                         Console.WriteLine("i is either 0 or 1")
  16
  17     End Sub
  18
  19 End Module