Renvoie une variante (entier) indiquant le résultat d’une expression de chaîne.
Syntaxe
StrComp(chaîne1, chaîne2 [, comparer ] )
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 l’argument de comparaisonest Null, une erreur se produit. Si comparer est omis, le paramètre Comparaison d’options 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 | Retours StrComp |
|---|---|
| chaîne1 est inférieure à chaîne2 | -1 |
| chaîne1 est égal à chaîne2 | 0 |
| chaîne1 est supérieur à chaîne2 | 1 |
| string1 ou string2 est Null | Null |
Exemple de requête
| Expression | Résultats |
|---|---|
| SELECT ProductSales.ProductID, StrComp(ProductID,"PRO_XYZ10 ») AS ComparisonResult FROM ProductSales ; | Renvoie les valeurs du champ « ProductID », compare les valeurs de « ProductID » avec « PRO_XYZ1 » et renvoie les résultats dans la colonne ComparisonResult. « ProductID » est égal à « PRO_XYZ10 », la fonction StrComp renverra 0. Si « ProductID » est inférieur à « PRO_XYZ10 », la fonction StrComp renvoie -1. Si « ProductID » est supérieur à « PRO_XYZ10 », la fonction StrComp renvoie 1. Si « ProductID » ou « PRO_XYZ10 » est NULL, la fonction StrComp renvoie NULL. |
Exemple de 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 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 égal à 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.