mcs/btests/ConditionalStatementsC9.vb

   1 REM LineNo: 15
   2 REM ExpectedError: BC30088
   3 REM ErrorMessage: 'End Select' must be preceded by a matching 'Select Case'.
   4
   5 Imports System
   6
   7 Module ConditionalStatementsC9
   8
   9     Sub Main()
  10
  11         Dim i As Integer = 0
  12
  13         Select i
  14         End Select
  15         End Select
  16
  17     End Sub
  18
  19 End Module