VBA - Opérateurs logiques

Les opérateurs logiques suivants sont pris en charge par VBA.

Supposons que la variable A vaut 10 et la variable B vaut 0, alors -

Opérateur	La description	Exemple
ET	Opérateur logique ET appelé. Si les deux conditions sont vraies, alors l'expression est vraie.	a <> 0 ET b <> 0 est faux.
OU	Opérateur OU logique appelé. Si l'une des deux conditions est vraie, la condition est vraie.	a <> 0 OU b <> 0 est vrai.
NE PAS	Opérateur PAS logique appelé. Utilisé pour inverser l'état logique de son opérande. Si une condition est vraie, alors l'opérateur logique NOT rendra faux.	NOT (a <> 0 OU b <> 0) est faux.
XOR	Exclusion logique appelée. C'est la combinaison de l'opérateur NOT et OR. Si une, et une seule, des expressions a la valeur True, le résultat est True.	(a <> 0 XOR b <> 0) est vrai.

Exemple

Essayez l'exemple suivant pour comprendre tous les opérateurs logiques disponibles dans VBA en créant un bouton et en ajoutant la fonction suivante.

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

Lorsque vous l'enregistrez au format .html et que vous l'exécutez dans Internet Explorer, le script ci-dessus produira le résultat suivant.

AND Operator Result is : False

OR Operator Result is : True

NOT Operator Result is : False

XOR Operator Result is : True