VBA -InString Reverse

La fonction InStrRev renvoie la première occurrence d'une chaîne dans une autre chaîne. La recherche s'effectue de la droite vers la gauche.

Syntaxe

InStrRev(string1,string2[,start,[compare]])

Description des paramètres

  • String1- Un paramètre obligatoire. Chaîne à rechercher.

  • String2- Un paramètre obligatoire. Chaîne par rapport à laquelle String1 est recherché.

  • Start- Un paramètre facultatif. Spécifie la position de départ de la recherche. La recherche commence à la première position de la droite vers la gauche.

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

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

    • 1 = vbTextCompare - Effectue une comparaison de texte

Exemple

Ajoutez un bouton et placez la fonction suivante.

Private Sub Constant_demo_Click()
   var = "Microsoft VBScript"
   msgbox("Line 1 : " & InStrRev(var,"s",10))
   msgbox("Line 2 : " & InStrRev(var,"s",7))
   msgbox("Line 3 : " & InStrRev(var,"f",-1,1))
   msgbox("Line 4 : " & InStrRev(var,"t",5))
   msgbox("Line 5 : " & InStrRev(var,"i",7))
   msgbox("Line 6 : " & InStrRev(var,"i",7))
   msgbox("Line 7 : " & InStrRev(var,"VB",1))
End Sub

Lors de l'exécution du script ci-dessus, il produit le résultat suivant.

Line 1 : 6
Line 2 : 6
Line 3 : 8
Line 4 : 0
Line 5 : 2
Line 6 : 2
Line 7 : 0