9 lines
343 B
VB.net
9 lines
343 B
VB.net
|
Function Test(ByVal a As Boolean, ByVal b As Boolean)
|
||
|
|
Console.WriteLine("And " & a And b)
|
||
|
|
Console.WriteLine("Or " & a Or b)
|
||
|
|
Console.WriteLine("Not " & Not a)
|
||
|
|
Console.WriteLine("Xor " & a Xor b)
|
||
|
|
Console.WriteLine("And, short-circuited " & a AndAlso b)
|
||
|
|
Console.WriteLine("Or, short-circuited " & a OrElse b)
|
||
|
|
End Function
|