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