VBA - Operadores de comparación

Existen los siguientes operadores de comparación compatibles con VBA.

Suponga que la variable A tiene 10 y la variable B tiene 20, entonces -

Operador	Descripción	Ejemplo
=	Comprueba si el valor de los dos operandos es igual o no. Si es así, entonces la condición es verdadera.	(A = B) es falso.
<>	Comprueba si el valor de los dos operandos es igual o no. Si los valores no son iguales, entonces la condición es verdadera.	(A <> B) es verdadero.
>	Comprueba si el valor del operando izquierdo es mayor que el valor del operando derecho. Si es así, entonces la condición es verdadera.	(A> B) es falso.
<	Comprueba si el valor del operando izquierdo es menor que el valor del operando derecho. Si es así, entonces la condición es verdadera.	(A <B) es verdadero.
> =	Comprueba si el valor del operando izquierdo es mayor o igual que el valor del operando derecho. Si es así, entonces la condición es verdadera.	(A> = B) es falso.
<=	Comprueba si el valor del operando izquierdo es menor o igual que el valor del operando derecho. Si es así, entonces la condición es verdadera.	(A <= B) es verdadero.

Ejemplo

Pruebe el siguiente ejemplo para comprender todos los operadores de comparación disponibles en VBA.

Private Sub Constant_demo_Click()
   Dim a: a = 10
   Dim b: b = 20
   Dim c

   If a = b Then
      MsgBox ("Operator Line 1 : True")
   Else
      MsgBox ("Operator Line 1 : False")
   End If

   If a<>b Then
      MsgBox ("Operator Line 2 : True")    
   Else
      MsgBox ("Operator Line 2 : False")    
   End If

   If a>b Then
      MsgBox ("Operator Line 3 : True")    
   Else
      MsgBox ("Operator Line 3 : False")    
   End If

   If a<b Then
      MsgBox ("Operator Line 4 : True")    
   Else
      MsgBox ("Operator Line 4 : False")    
   End If

   If a>=b Then
      MsgBox ("Operator Line 5 : True")    
   Else
      MsgBox ("Operator Line 5 : False")    
   End If

   If a<=b Then
      MsgBox ("Operator Line 6 : True")
   Else
      MsgBox ("Operator Line 6 : False")
   End If

End Sub

Cuando ejecute el script anterior, producirá el siguiente resultado.

Operator Line 1 : False

Operator Line 2 : True

Operator Line 3 : False

Operator Line 4 : True

Operator Line 5 : False

Operator Line 6 : True

↰ Previous page