mcs/btests/LogicalOperatorsC1.vb

   1 REM LineNo: 15
   2 REM ExpectedError: BC30512
   3 REM ErrorMessage: Option Strict On disallows implicit conversions from 'Boolean' to 'Long'.
   4
   5
   6 Option Strict On
   7
   8 Imports System
   9
  10 Module LogicalOperatorsC1
  11     Sub main()
  12
  13         Dim a1 As Boolean = True
  14         Dim b1 As Long = 10S
  15         If a1 And b1 Then
  16             a1 = False
  17         End If
  18     End Sub
  19 End Module