Imports System
Public Module Program
Public Sub Main(args() As string)
Dim b As Boolean
b = True
If (b) Then
Console.WriteLine("True")
End If
b = False
If (b) Then
Console.WriteLine("True")
Else
Console.WriteLine("False")
End If
If (Not b) Then
Console.WriteLine("True")
End If
End Sub
End Module
' run:
'
' True
' False
' True
'