VBA - Operadores Lógicos

Os seguintes operadores lógicos são suportados pelo VBA.

Suponha que a variável A tenha 10 e a variável B tenha 0, então -

Operador Descrição Exemplo
E Operador lógico chamado AND. Se ambas as condições forem Verdadeiras, a Expressão será verdadeira. a <> 0 AND b <> 0 é falso.
OU Operador lógico ou chamado. Se qualquer uma das duas condições for verdadeira, a condição é verdadeira. a <> 0 OU b <> 0 é verdadeiro.
NÃO Operador lógico chamado NOT. Usado para reverter o estado lógico de seu operando. Se uma condição for verdadeira, o operador lógico NOT tornará falso. NÃO (a <> 0 OU b <> 0) é falso.
XOR Exclusão lógica chamada. É a combinação de NOT e OR Operator. Se uma, e apenas uma, das expressões for avaliada como True, o resultado será True. (a <> 0 XOR b <> 0) é verdadeiro.

Exemplo

Tente o exemplo a seguir para entender todos os operadores lógicos disponíveis no VBA criando um botão e adicionando a seguinte função.

Private Sub Constant_demo_Click()
   Dim a As Integer
   a = 10
   Dim b As Integer
   b = 0
      
   If a <> 0 And b <> 0 Then
      MsgBox ("AND Operator Result is : True")
   Else
      MsgBox ("AND Operator Result is : False")
   End If

   If a <> 0 Or b <> 0 Then
      MsgBox ("OR Operator Result is : True")
   Else
      MsgBox ("OR Operator Result is : False")
   End If

   If Not (a <> 0 Or b <> 0) Then
      MsgBox ("NOT Operator Result is : True")
   Else
      MsgBox ("NOT Operator Result is : False")
   End If

   If (a <> 0 Xor b <> 0) Then
      MsgBox ("XOR Operator Result is : True")
   Else
      MsgBox ("XOR Operator Result is : False")
   End If
End Sub

Ao salvá-lo como .html e executá-lo no Internet Explorer, o script acima produzirá o seguinte resultado.

AND Operator Result is : False

OR Operator Result is : True

NOT Operator Result is : False

XOR Operator Result is : True