mcs/mbas/Test/errors/ConditionalStatementsC4.vb

   1 REM LineNo: 14\r
   2 REM ExpectedError: BC30081\r
   3 REM ErrorMessage: 'If' must end with a matching 'End If'.\r
   4 \r
   5 Imports System\r
   6 \r
   7 Module ConditionalStatementsC4\r
   8 \r
   9     Sub Main()\r
  10         Dim i As Integer = 0\r
  11 \r
  12         if false then\r
  13                 i = 1\r
  14         elseif true\r
  15                 i = 2\r
  16                 \r
  17     End Sub\r
  18 \r
  19 End Module\r