VBA - Operatori logici

I seguenti operatori logici sono supportati da VBA.

Supponiamo che la variabile A contenga 10 e la variabile B contenga 0, quindi -

Operatore Descrizione Esempio
E Chiamato operatore AND logico. Se entrambe le condizioni sono vere, allora l'espressione è vera. a <> 0 AND b <> 0 è False.
O Chiamato Operatore OR logico. Se una delle due condizioni è vera, la condizione è vera. a <> 0 OPPURE b <> 0 è vero.
NON Chiamato operatore NOT logico. Utilizzato per invertire lo stato logico del suo operando. Se una condizione è vera, l'operatore NOT logico la renderà falsa. NOT (a <> 0 OR b <> 0) è falso.
XOR Chiamata esclusione logica. È la combinazione di NOT e OR Operator. Se una e solo una delle espressioni restituisce True, il risultato è True. (a <> 0 XOR b <> 0) è vero.

Esempio

Prova il seguente esempio per comprendere tutti gli operatori logici disponibili in VBA creando un pulsante e aggiungendo la seguente funzione.

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

Quando lo salvi come .html e lo esegui in Internet Explorer, lo script sopra produrrà il seguente risultato.

AND Operator Result is : False

OR Operator Result is : True

NOT Operator Result is : False

XOR Operator Result is : True