Aprenda o básico sobre como funciona os operadores Lógicos da VBA: E, OU, NÃO e XOR. Você pode ter mais de uma condição na mesma linha de suas declarações If e ElseIf. Para testar mais de uma condição, você precisa dos Operadores Lógicos. Digamos que você deseja processar uma ordem de cliente. Para isso, você deseja verificar primeiro se o produto solicitado existe ou não.
Operadores Lógicos da VBA: E, OU, NÃO e XOR
Se o fizer, você também deseja verificar se a quantidade disponível é suficiente. Os operadores lógicos são úteis em tais casos. Os operadores lógicos são usados para avaliar mais de uma condição.
Operadores lógicos comparam Booleanexpressões e retornam um Booleanresultado. A And, Or, AndAlso, OrElse, e Xoros operadores estão binário , porque eles usam dois operandos, enquanto o Notoperador está unário , porque leva um único operando. Alguns desses operadores também podem executar operações lógicas em bits em valores integrais.
| Operador | Descrição | Exemplo |
|---|---|---|
| E | No operador Lógico AND, se ambas as condições forem verdadeiras, a Expressão é verdadeira. | um <> 0 AND b <> 0 é False. |
| OR | No operador Lógico OR, se qualquer uma das condições for verdadeira, o resultado então exibirá a condição verdadeira. | um <> 0 OU b <> 0 é verdadeiro. |
| NOT | No operador Lógico NOT, é usado para reverter o estado lógico do seu operando. Se uma condição for verdadeira, o operador Lógico NÃO retornará falso. | NOT (a <> 0 OU b <> 0) é falso. |
| XOR | Este operador é chamado Exclusão Lógica. É a combinação de operadores NOT e OR. Se apenas uma das expressões for avaliar como verdadeira, o resultado é Verdadeiro. | (um <> 0 XOR b <> 0) é verdadeiro. |
Tabela verdadeira para operador lógico AND.
Condition1 Condition2 Condition1 AND Condition2 True True True True False False False True False False False False
Exemplo de operador lógico AND:
Esta é uma definição bem básica para o operador AND.
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 IfEnd Sub
Tabela Verdadeira para o Operador lógico OR:
Condition1 Condition2 Condition1 OR Condition2 True True True True False True False True True False False False
Exemplo de operador lógico OR:
Uma expressão simples do operador OR.
Private Sub Constant_demo_Click() Dim a As Integer a = 10 Dim b As Integer b = 0 If a <> 0 Or b <> 0 Then MsgBox ("OR Operator Result is : True") Else MsgBox ("OR Operator Result is : False") End If End Sub
Tabela Verdadeira para o Operador NOT:
Condition1 NOT Condition1 True False False True
Exemplo de Operador lógico NOT:
Private Sub Constant_demo_Click() Dim a As Integer a = 10 Dim b As Integer b = 0 If Not (a <> 0 Or b <> 0) Then MsgBox ("NOT Operator Result is : True") Else MsgBox ("NOT Operator Result is : False") End If End Sub
Exemplo de operador XOR:
Teste se um e um único valor for verdadeiro, o exemplo abaixo ilustra o valor de XOR.
Private Sub Constant_demo_Click() Dim a As Integer a = 10 Dim b As Integer b = 0 If (a <> 0 Xor b <> 0) Then MsgBox ("XOR Operator Result is : True") Else MsgBox ("XOR Operator Result is : False") End If End Sub
Espero ter conseguido explicar e você tenha entendido os valores básicos dos operadores VBA.
