2 つの式の排他的論理和を求めます。
expr1 Xor expr2
expr1、expr2
任意の式。式の値は Long 型の値の範囲内になければなりません。
次の表は、Xor 演算の結果が LotusScript® でどのように決定されるかを示しています。
expr1 |
expr2 |
結果 |
---|---|---|
TRUE |
TRUE |
FALSE |
TRUE |
FALSE |
TRUE |
FALSE |
TRUE |
TRUE |
FALSE |
FALSE |
FALSE |
TRUE |
NULL |
NULL |
NULL |
TRUE |
NULL |
FALSE |
NULL |
NULL |
NULL |
FALSE |
NULL |
NULL |
NULL |
NULL |
排他的論理和の演算に加え、Xor 演算子は 2 つの数式の同一位置にあるビットを比較し (ビット位置比較)、次の表に従って結果の対応するビットを設定します。
expr1 のビット n |
expr2 のビット n |
結果のビット n |
---|---|---|
1 |
1 |
0 |
1 |
0 |
1 |
0 |
1 |
1 |
0 |
0 |
0 |
' Boolean usage
Dim johnIsHere As Boolean, jimIsHere As Boolean
Dim oneButNotBothIsHere As Boolean
johnIsHere = TRUE
jimIsHere = FALSE
oneButNotBothIsHere = johnIsHere Xor jimIsHere
Print oneButNotBothIsHere ' Prints True
' Bit-wise usage
Dim z As Integer, y As Integer
z% = &b11110000
y% = &b11001100
Print Bin$(z% Xor y%) ' Prints 111100