Оператор Xor= (Эксклюзивная дизъюнкция и присваивание)
 
Выполняет битовое-XOR (эксклюзивная дизъюнкция) и присваивает результат переменной

Синтаксис

Declare Operator Xor= ( ByRef lhs As T1, ByRef rhs As T2 )

Использование

lhs Xor= rhs

Параметры

lhs
Переменная куда присваивается результат.
T1
Любой числовой тип.
rhs
Значение для выполнения битового XOR (эксклюзивная дизъюнкция) с lhs.
T2
Любой числовой тип.

Описание

Этот оператор выполняет битовую операцию XOR и присваивает результат переменной. Это функционально эквивалентно:

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)


Различия диалектов

  • В диалекте -lang qb, этот оператор не может быть перегружен.

Отличия от QB

  • Новое в FreeBASIC

См. также