mcs/mbas/Test/errors/LogicalOperatorsC2.vb

   1 REM LineNo: 19
   2 REM ExpectedError: BC30201
   3 REM ErrorMessage: Expression expected.
   4
   5 REM LineNo: 20
   6 REM ExpectedError: BC30201
   7 REM ErrorMessage: Expression expected.
   8
   9 'BC30201: Expression expected
  10
  11 Imports System
  12
  13 Module LogicalOperatorsC2
  14     Sub main()
  15
  16         Dim a As Boolean = True
  17         Dim b As Boolean = False
  18         Dim c As Boolean
  19         c = a And
  20         c =  And b
  21         If a And b Then
  22             a = False
  23         End If
  24     End Sub
  25 End Module