XOR Operator

Kombinas du esprimojn per logika ekskluziva disjunkcio.

Sintakso:

Result = Expression1 XOR Expression2

Parametroj:

Result: Numera variablo kiu enhavas la rezulton de la kombino.

Esprimo1, Esprimo2: Numeraj esprimoj kombinotaj.

Logika ekskluziva disjunkcio de du buleaj esprimoj liveras la valoron True nur se ambaŭ esprimoj malsamas unu de la alia.

Laŭbita ekskluziva disjunkcio liveras biton se la koresponda bito estas ŝaltita en nur unu el la du esprimoj.

Ekzemplo:

Sub ExampleXOR
Dim vA As Variant, vB As Variant, vC As Variant, vD As Variant
Dim vOut As Variant
    vA = 10: vB = 8: vC = 6: vD = Null
    vOut = vA > vB XOR vB > vC ' returns 0
    vOut = vB > vA XOR vB > vC ' returns -1
    vOut = vA > vB XOR vB > vD ' returns -1
    vOut = (vB > vD XOR vB > vA) ' returns 0
    vOut = vB XOR vA ' returns 2
End Sub