Option Strict On Option Explicit On Module ExpressionsDemo Sub Main() Dim i as Integer = 2, r as Integer = 1 If i = 3 AndAlso r = 1 Then ' Writes OK Console.WriteLine("Wrong") Else Console.WriteLine("OK") End If If i = 3 OrElse r = 1 Then ' Writes OK Console.WriteLine("OK") Else Console.WriteLine("Wrong") End If End Sub End Module