VB.Net/Language Basics/Xor

Материал из VB Эксперт
Версия от 12:42, 26 мая 2010; Admin (обсуждение | вклад) (1 версия)
(разн.) ← Предыдущая | Текущая версия (разн.) | Следующая → (разн.)
Перейти к: навигация, поиск

Truth table for Xor

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


Xor Demo

Imports System
public class MainClass
   Shared Sub Main()
    Dim Var1 As Short
    
    Console.WriteLine( Var1 Xor 5 )
   End Sub
End Class