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