mcs/mbas/Test/errors/LogicalOperatorsC4.vb

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