操作符 Xor= (Exclusive Disjunction And Assign)
执行一个bitwise-xor（独占分离），并将结果赋值给一个变量
lhs Xor= rhs
lhs
该运算符执行按位或赋值结果到一个变量。它在功能上等同于：
Xor=比较其操作数lhs 和rhs 的每个位，如果两个位都相同（均为1或两者都为0），则第一个操作数lhs 中的相应位设置为0 ，否则设置为1。
对于用户定义的类型，此运算符可能会重载。
语法
用法
lhs Xor= rhs
参数
lhs
要赋值的变量。
T1 任何数字类型。
rhs 使用lhs 执行按位xor（exclusive或）的值。
T2 任何数字类型。
说明
该运算符执行按位或赋值结果到一个变量。它在功能上等同于：
lhs = lhs Xor rhs
Xor=比较其操作数lhs 和rhs 的每个位，如果两个位都相同（均为1或两者都为0），则第一个操作数lhs 中的相应位设置为0 ，否则设置为1。
对于用户定义的类型，此运算符可能会重载。
例子
Dim As UByte a = &b00110011
Dim As UByte b = &b01010101
a Xor= b
''结果a = &b01100110
Print Bin(a)
Dim As UByte b = &b01010101
a Xor= b
''结果a = &b01100110
Print Bin(a)
方言差异
- 在-lang qb 方言中，此运算符无法重载。
与QB差别
- 新的FreeBASIC
参考