VBA - strComp

La función StrComp devuelve un valor entero después de comparar las dos cadenas dadas. Puede devolver cualquiera de los tres valores -1, 0 o 1 según las cadenas de entrada que se van a comparar.

• Si String 1 <String 2, StrComp devuelve -1
• Si String 1 = String 2, StrComp devuelve 0
• Si String 1> String 2, StrComp devuelve 1

Sintaxis

StrComp(string1,string2[,compare])

Descripción de parámetros

• String1- Un parámetro obligatorio. La primera expresión de cadena.

• String2 - Un parámetro obligatorio. La segunda expresión de cadena.

• Compare- Un parámetro opcional. Especifica la comparación de cadenas que se utilizará. Puede tomar los siguientes valores.

  • 0 = vbBinaryCompare: realiza una comparación binaria (predeterminado)

  • 1 = vbTextCompare - Realiza una comparación de texto

Ejemplo

Agregue un botón y agregue la siguiente función.

Private Sub Constant_demo_Click()
   Dim var1 as Variant
   msgbox("Line 1 :" & StrComp("Microsoft","Microsoft"))
   msgbox("Line 2 :" &StrComp("Microsoft","MICROSOFT"))
   msgbox("Line 3 :" &StrComp("Microsoft","MiCrOsOfT"))
   msgbox("Line 4 :" &StrComp("Microsoft","MiCrOsOfT",1))
   msgbox("Line 5 :" &StrComp("Microsoft","MiCrOsOfT",0))
End Sub

Cuando ejecuta la función anterior, produce la siguiente salida.

Line 1 :0
Line 2 :1
Line 3 :1
Line 4 :0
Line 5 :1