Imports System
Public Class MainClass
Shared Sub Main(ByVal args As String())
' create truth table for OrElse
Console.Write("OrElse" & vbCrLf & "False OrElse False: " & _
(False OrElse False) & vbCrLf & "False OrElse True: " & _
(False OrElse True) & vbCrLf & "True OrElse False: " & _
(True OrElse False) & vbCrLf & "True OrElse True: " & _
(True OrElse True) & vbCrLf & vbCrLf)
End Sub
End Class