INSTRREV |
Dans la chaîne inversé |
|---|---|
| Visual Basic | |
Syntaxe
| Function InStrRev(s As String,t As String[,p As Integer[, Compare As VbCompareMethod]]) |
Paramètres
| Nom | Description | ||
|---|---|---|---|
| p | Ce paramètre permet d'indiquer la position en nombre de caractères de fin où commence la recherche | ||
| s | Ce paramètre permet d'indiquer la chaîne de caractères contenant la source dans lequel il faudra chercher | ||
| t | Ce paramètre permet d'indiquer la chaîne de caractères contenant la chaîne à rechercher | ||
| Compare | Ce paramètre permet d'indiquer la méthode comparaison : | ||
| Valeur | Constante | Description | |
| 0 | vbBinaryCompare | Cette valeur permet d'indiquer qu'il faut effectuer une comparaison binaire. C'est la valeur par défaut | |
| 1 | vbTextCompare | Cette valeur permet d'indiquer qu'il faut effectuer une comparaison texte. | |
Retour
La fonction InStrRev renvoie les valeurs suivantes :
| Si | Retourné par InStrRev | |
|---|---|---|
| s est de longueur 0 | 0 | |
| s est Null | Null | |
| t est de longueur 0 | Le paramètre p | |
| t est Null | Null | |
| t est introuvable | 0 | |
| t se trouve dans s | Position à laquelle la correspondance est trouvée | |
| p > Len(t) | 0 |
Description
Cette fonction retourne la dernière position d'une sous-chaîne de caractères contenu dans une chaîne de caractères et 0 si elle ne s'y trouve pas.
Remarques
- Les exemples suivants utilisent la fonction InStrRev pour rechercher une chaîne de caractères :
- Dim SearchString, SearchChar, MyPos
- SearchString ="XXpXXpXXPXXP" ' Chaîne de caractères à rechercher.
- SearchChar = "P" ' Recherchez "P".
- ' Une comparaison binaire commençant à la position 10. Renvoie 9.
- MyPos = InstrRev(SearchString, SearchChar, 10, 0)
- ' Une comparaison textuelle commençant à la dernière position. Renvoie 12.
- MyPos = InstrRev(SearchString, SearchChar, -1, 1)
- ' La comparaison est binaire par défaut (le dernier paramètre est omis). Renvoie 0.
- MyPos = InstrRev(SearchString, SearchChar, 8)
- La syntaxe de la fonction InStrRev n'est pas la même que la syntaxe de la fonction InStr.
Exemple
Voici un exemple d'une utilisation typique de cette fonction :
- Sub Main()
- MsgBox "InStrRev(""Sylvain Maltais"",""Mal"")= " & InStrRev("Sylvain Maltais","Mal") & vbCrLf & _
- "InStrRev(""Sylvain Maltais"",""a"") = " & InStrRev("Sylvain Maltais","a") & vbCrLf & _
- "InStrRev(""Sylvain Maltais"",""a"",1) = " & InStrRev("Sylvain Maltais","a",1) & vbCrLf & _
- "InStrRev(""Sylvain Maltais"",""a"",8) = " & InStrRev("Sylvain Maltais","a",8)
- End Sub
on obtiendra le résultat suivant :
InStrRev("Sylvain Maltais","Mal")= 9InStrRev("Sylvain Maltais","a") = 13
InStrRev("Sylvain Maltais","a",1) = 0
InStrRev("Sylvain Maltais","a",8) = 5
Dernière mise à jour : Lundi, le 19 novembre 2012