Constantes de comparación

En la siguiente tabla se muestran las constantes y su descripción:

Tabla 11-5 Constantes de comparación y descripciones

Constante	Valor	Descripción
`vbBinaryCompare`	0	Realiza una comparación binaria.
`vbTextCompare`	1	Realiza una comparación textual.

En el siguiente ejemplo se muestra el uso de las constantes de comparación:

Ejemplo 1:

Dim result
result = StrComp("Hello", "hello", vbBinaryCompare)
 
If result = 0 Then
    'Logic Strings are equal (Binary Comparison)
Else
    'Logic Strings are NOT equal (Binary Comparison)
End If
'Output -> Strings are Not equal (Binary Comparison) Logic

Ejemplo 2:

Dim result
result = StrComp("Hello", "hello", vbTextCompare)
 
If result = 0 Then
    'Logic Strings are equal (Text Comparison)
Else
    'Logic Strings are NOT equal (Text Comparison)
End If
 
'Output -> Strings are equal (Text Comparison) Logic

Ejemplo 3:

Dim str1, str2
 
str1 = "Apple"
str2 = "apple"
 
If StrComp(str1, str2, vbTextCompare) < 0 Then
    'Logic If
Else
    'Logic Else 
End If
 
'Output -> apple comes before Apple (Binary) ( Logic Else )