Retourne un Variant (Integer) indiquant le résultat d’un expression de chaîne.
Syntaxe
StrComp ( string1, string2 [, compare ] )
La syntaxe de la fonction StrComp contient les arguments suivants :
|
Argument |
Description |
|---|---|
|
chaîne1 |
Obligatoire. Toute expression de chaîne valide. |
|
chaîne2 |
Obligatoire. Toute expression de chaîne valide. |
|
comparaison |
Facultatif. Spécifie le type de comparaison de chaînes. Si leargumentde comparaison a la valeur Null, une erreur se produit. Si compare est omis, le paramètre Option Compare détermine le type de comparaison. |
Paramètres
Les paramètres d’argument de comparaison sont les suivants :
|
Constante |
Valeur |
Description |
|---|---|---|
|
vbBinaryCompare |
0 |
Effectue une comparaison binaire. |
|
vbTextCompare |
1 |
Effectue une comparaison textuelle. |
Valeurs de retour
La fonction StrComp a les valeurs de retour suivantes :
|
Si |
StrComp retourne |
|---|---|
|
string1 est inférieur à string2 |
-1 |
|
string1 est égal à string2 |
0 |
|
string1 est supérieur à string2 |
1 |
|
string1 ou string2 a la valeur Null |
Null |
Exemple de requête
|
Expression |
Résultats |
|---|---|
|
SELECT ProductSales.ProductID, StrComp(ProductID,"PRO_XYZ10 ») AS ComparisonResult FROM ProductSales ; |
Retourne les valeurs du champ « ProductID », compare les valeurs de « ProductID » à « PRO_XYZ1 » et retourne les résultats dans la colonne ComparisonResult. « ProductID » est égal à « PRO_XYZ10 », la fonction StrComp retourne 0. Si « ProductID » est inférieur à « PRO_XYZ10 », la fonction StrComp retourne -1. Si « ProductID » est supérieur à « PRO_XYZ10 », la fonction StrComp retourne 1. Si « ProductID » ou « PRO_XYZ10 » a la valeur NULL, la fonction StrComp retourne NULL. |
Exemple VBA
Remarque : Les exemples suivants illustrent l’utilisation de cette fonction dans un module Visual Basic pour Applications (VBA).
Cet exemple utilise la fonction StrComp pour retourner 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.
Dim MyStr1, MyStr2, MyComp
MyStr1 = "ABCD": MyStr2 = "abcd" ' Define variables.
MyComp = StrComp(MyStr1, MyStr2, 1) ' Returns 0.
MyComp = StrComp(MyStr1, MyStr2, 0) ' Returns -1.
MyComp = StrComp(MyStr2, MyStr1) ' Returns 1.
