Page 1 sur 1
[R] Vérifier les dernières lettres de sa variable
Posté : dim. 09 janv. 2011 13:59
par Xtroyer
Salut à tous, j'ai une variable qui se modifie en fonction de ce que fait l'utilisateur, et j'aimerais savoir comment connaitre les deux dernières lettres (ou chiffre) de la variable.
Merci =)
Re: [..] Vérifier les dernières lettres de sa variable
Posté : dim. 09 janv. 2011 14:19
par timmalos
Re: [R] Vérifier les dernières lettres de sa variable
Posté : lun. 10 janv. 2011 11:57
par Xtroyer
Merci bien de ton aide, mais je me suis mal exprimé ^^'
Comment savoir si par exemple, l'avant dernière lettre (ou chiffre) est un a ou autre, sans prendre en compte la dernière ?
EDIT : Je retire, j'ai trouvé une autre solution, merci =)
Re: [..] Vérifier les dernières lettres de sa variable
Posté : lun. 10 janv. 2011 12:04
par softwater
Code : Tout sélectionner
$text = "abcdeftrefdfgfvfbvgv1x"
$long = StringLen($text) ;détermine la longeur de la chaîne
$avantdernier = StringMid($text, $long - 1, 1) ;met le pointeur sur l'avant dernier et etrait un seul caractère
If $avantdernier = "a" Then
MsgBox(0, "L'Avant dernier caractère est un ""a""", $avantdernier)
Else
MsgBox(0, "L'Avant dernier caractère est un ", $avantdernier)
EndIf
Re: [R] Vérifier les dernières lettres de sa variable
Posté : lun. 10 janv. 2011 12:14
par Xtroyer
Impec' =D Merci

Re: [R] Vérifier les dernières lettres de sa variable
Posté : lun. 10 janv. 2011 22:32
par bloodwolff
Ou encore
Code : Tout sélectionner
$carac = "a"
$text = "abcdeftrefdfgfvfbvgv1x"
Switch StringRegExp($text, $carac & ".\z")
Case 1
MsgBox(0, $text, "L'avant dernier caractère est un " & $carac)
Case 0
MsgBox(0, $text, "L'avant dernier caractère n'est pas un " & $carac)
EndSwitch
Re: [R] Vérifier les dernières lettres de sa variable
Posté : lun. 10 janv. 2011 22:51
par zeshrek
Allez, moi aussi je participe au concours d'extraction de l'avant dernière lettre
Code : Tout sélectionner
$text = "abcdeftrefdfgfvfbvgv1x"
$avantdernier = StringRight(StringTrimRight($text,1),1) ; on coupe a droite et on prend le dernier
If $avantdernier = "a" Then
MsgBox(0, "L'Avant dernier caractère est un ""a""", $avantdernier)
Else
MsgBox(0, "L'Avant dernier caractère est un ", $avantdernier)
EndIf