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

lhs And= rhs

lhs
T1
rhs
T2

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

lhs = lhs And rhs

And= сравнивает каждый бит операндов lhs и rhs, и если оба бита равны 1, то соответствующий бит в первом операнде lhs, устанавливается в 1, в противном случае он устанавливается в 0.

And= не может быть использован в условных выражениях.

Этот оператор может быть перегружен для пользовательских типов.

' Использование оператора AND= с двумя числовыми выражениями
Dim As UByte numeric_value1, numeric_value2
numeric_value1 = 15 '' 00001111
numeric_value2 = 30 '' 00011110

numeric_value1 And= numeric_value2

'' Результат =  14  =     00001110
Print numeric_value1
Sleep

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

• Новое в FreeBASIC
  
  

• And