Declare Operator Not ( ByRef rhs As Byte ) As Integer
Declare Operator Not ( ByRef rhs As UByte ) As Integer
Declare Operator Not ( ByRef rhs As Single ) As Integer
Declare Operator Not ( ByRef rhs As Double ) As Integer

Declare Operator Not ( ByRef rhs As T ) As T

result = Not rhs

rhs
T

返回其操作数的逐位补码。

该运算符返回其操作数的逐位补码，这是一个逻辑运算，其结果是根据操作数的位来设置位。

下面的真值表显示了布尔互补运算的所有组合：



对于用户定义的类型，此运算符可能会重载。

'对数值使用NOT运算符

Dim numeric_value As Byte
numeric_value = 15 '00001111

'结果= -16 = 11110000
Print Not numeric_value

'在条件表达式上使用NOT运算符
Dim As UByte numeric_value1, numeric_value2
numeric_value1 = 15
numeric_value2 = 25

If Not numeric_value1 = 10 Then Print "Numeric_Value1不等于10"
If Not numeric_value2 = 25 Then Print "Numeric_Value2不等于25"

'这将输出“Numeric_Value1不等于10”，因为
'第一个IF语句是false。
'它不会输出第二个IF语句的结果，因为
'条件是真实的。

• 在-lang qb 方言中，此运算符无法重载。
  
  

• 没有
  
  

• 操作符真值表