Operator AND（合取）

• 来源: https://www.freebasic.net/wiki/wikka.php?wakka=KeyPgOpAnd
• 最后更新: 2016-03-13

---

返回两个数值的按位与（合取）。

语法

declare operator And ( byref lhs as T1, byref rhs as T2 ) as Ret

用法

result = lhs And rhs

参数

lhs

左侧表达式。

T1

任何数值或布尔类型。

rhs

右侧表达式。

T2

任何数值或布尔类型。

Ret

数值或布尔类型（随 T1 和 T2 变化）。

返回值

返回两个操作数的按位与（合取）。

描述

此运算符返回其操作数的按位与，这是一种逻辑运算，根据操作数的位设置结果中的位（对于布尔值转换为整数，false 或 true 的布尔值变为 0 或 -1 的整数值）。

下面的真值表演示了布尔与运算的所有组合：

左操作数位	右操作数位	结果
0	0	0
1	0	0
0	1	0
1	1	1

不进行短路求值——两个表达式始终都会被求值。

返回类型取决于传入值的类型。Byte、Ubyte 和浮点类型的值首先转换为 Integer。如果左右操作数类型仅在有符号性上不同，则返回类型与左操作数类型（T1）相同，否则返回两种类型中较大的那个。只有当左右操作数类型都是 Boolean 时，返回类型才也是 Boolean。

此运算符可以为用户定义类型重载。

示例

start GeSHi

' Using the AND operator on two numeric values
Dim As UByte numeric_value1, numeric_value2
numeric_value1 = 15 '00001111
numeric_value2 = 30 '00011110

'Result =  14  =     00001110
Print numeric_value1 And numeric_value2
Sleep

end GeSHi

start GeSHi

' Using the AND operator on two conditional expressions
Dim As UByte numeric_value1, numeric_value2
numeric_value1 = 15
numeric_value2 = 25

If numeric_value1 > 10 And numeric_value1 < 20 Then Print "Numeric_Value1 is between 10 and 20"
If numeric_value2 > 10 And numeric_value2 < 20 Then Print "Numeric_Value2 is between 10 and 20"
Sleep

' This will output "Numeric_Value1 is between 10 and 20" because
' both conditions of the IF statement is true
' It will not output the result of the second IF statement because the first
' condition is true and the second is false.

end GeSHi

方言差异

• 在 -lang qb 方言中，此运算符不能被重载。

与 QB 的差异

• 无

参见

• AndAlso
• 运算符真值表

返回 目录