mcs/btests/ConditionalStatementsC3.vb

   1 REM LineNo: 12\r
   2 REM ExpectedError: BC30205\r
   3 REM ErrorMessage: End if statement expected\r
   4 \r
   5 Imports System\r
   6 \r
   7 Module ConditionalStatementsC3\r
   8 \r
   9     Sub Main()\r
  10         Dim i As Integer = 0\r
  11 \r
  12         if true then i = 1 else i = 2 end if\r
  13 \r
  14     End Sub\r
  15 \r
  16 End Module\r