Fonction StrComp

Renvoie une valeur indiquant le résultat d'une comparaison de chaînes.

Syntaxe

StrComp(string1, string2[, compare])

Arguments :

  • string1 : requis. Toute expression de chaîne valide.
  • string2 : requis. Toute expression de chaîne valide.
  • compare : facultatif. Valeur numérique indiquant le type de comparaison à utiliser lors de l'évaluation des chaînes. Si l'argument est omis, une comparaison binaire est effectuée. Pour connaître les valeurs, reportez-vous à la section Paramètres.
  • Paramètres : l'argument compare peut avoir les valeurs suivantes.

    Tableau 11-21 Constantes de comparaison et descriptions

    Constante Valeur Description
    vbBinaryCompare 0 Permet d'effectuer une comparaison binaire
    vbTextCompare 1 Permet d'effectuer une comparaison textuelle

Valeur renvoyée

La fonction StrComp renvoie les valeurs suivantes :

Tableau 11-22 Valeurs renvoyées par la fonction StrComp

Si StrComp renvoie
string1 est inférieur à string2 -1
string1 est égal à string2 0
string1 est supérieur à string2 1

Remarques

Les exemples suivants utilisent la fonction StrComp pour renvoyer les résultats d'une comparaison de chaînes. Si le troisième argument est 1, une comparaison textuelle est effectuée. Si le troisième argument est 0 ou omis, une comparaison binaire est effectuée. Si le troisième argument est omis, la comparaison par défaut du système est effectuée.

Les exemples suivants illustrent l'utilisation de la fonction StrComp :

Exemple 1 :

Dim MyStr1, MyStr2, MyComp
MyStr1 = "ABCD": MyStr2 = "abcd"   ' Define variables.
MyComp = StrComp(MyStr2, MyStr1)   
' Output: 1

MyComp = StrComp(MyStr1, MyStr2, 1)   
' Output: 0
MyComp = StrComp(MyStr1, MyStr2, 0)   
' Output: -1

Exemple 2 :

Dim MyStr1, MyStr2, MyComp
MyStr1 = "ABCD"
MyStr2 = "XYZ"
MyComp = StrComp(MyStr1, MyStr2)   
' Output: -1

Exemple 3 :

Dim MyStr1, MyStr2, MyComp
MyStr1 = "XYZ"
MyStr2 = "ABCD"
MyComp = StrComp(MyStr1, MyStr2)   
' Output: 1