VBA - strComp

La fonction StrComp renvoie une valeur entière après avoir comparé les deux chaînes données. Il peut renvoyer l'une des trois valeurs -1, 0 ou 1 en fonction des chaînes d'entrée à comparer.

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

Syntaxe

StrComp(string1,string2[,compare])

Description des paramètres

  • String1- Un paramètre obligatoire. La première expression de chaîne.

  • String2 - Un paramètre obligatoire. La deuxième expression de chaîne.

  • Compare- Un paramètre facultatif. Spécifie la comparaison de chaînes à utiliser. Il peut prendre les valeurs suivantes.

    • 0 = vbBinaryCompare - Effectue une comparaison binaire (par défaut)

    • 1 = vbTextCompare - Effectue une comparaison de texte

Exemple

Ajoutez un bouton et ajoutez la fonction suivante.

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

Lorsque vous exécutez la fonction ci-dessus, elle produit la sortie suivante.

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