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