pcpunch
Messages postés1243Date d'inscriptionmardi 7 mai 2002StatutMembreDernière intervention18 février 20195 25 févr. 2004 à 14:19
D'accord avec DarkVader !!!
Text1 = StrReverse(Text1)
c'est si simple lol
cs_DarkVader
Messages postés51Date d'inscriptionsamedi 21 octobre 2000StatutMembreDernière intervention10 octobre 2011 2 sept. 2003 à 10:13
3 lignes c'est mieux qu'en 5/7
ou comment se fendre le c.. pour dire des aneries -
je vois mal ce que ça apporte à un débutant
sinon lui apprendre à faire n'importe quoi. %(
StrReverse(machaine) ne vous convient pas ?
Trop simple, trop rapide - A moins que ce soit
parce que c'est déjà tout fait !
1, parce que 0 n'est pas possible.
cs_Scytale
Messages postés9Date d'inscriptionvendredi 21 décembre 2001StatutMembreDernière intervention19 avril 2004 2 sept. 2003 à 08:55
Si tu veux tu peux aussi utiliser la récursive (plus court encore)
if len(chaine)<>0 then
InverseStr = Right(Chaine,1) + InverseStr(Left(Chaine),Len(Chaine)-1)
end if
Ouais je sais ;) Mais par principe, j'évite d'utiliser des boucles FOR.
Merci pour la p'tite source ;)
JoePatent
Messages postés171Date d'inscriptionjeudi 30 janvier 2003StatutMembreDernière intervention20 juillet 2008 1 sept. 2003 à 06:46
Dim NbCar As Integer
for nbcar = len(chaine) to 1 step -1> 0 dans
InverseStr += Mid(Chaine, NbCar, 1)
next
Quand le nombre d'itération peut etre connu et qu'il faut accomplir toutes les itérations, la boucle de type FOR généralement s'applique.
25 févr. 2004 à 14:19
Text1 = StrReverse(Text1)
c'est si simple lol
2 sept. 2003 à 10:13
ou comment se fendre le c.. pour dire des aneries -
je vois mal ce que ça apporte à un débutant
sinon lui apprendre à faire n'importe quoi. %(
StrReverse(machaine) ne vous convient pas ?
Trop simple, trop rapide - A moins que ce soit
parce que c'est déjà tout fait !
1, parce que 0 n'est pas possible.
2 sept. 2003 à 08:55
if len(chaine)<>0 then
InverseStr = Right(Chaine,1) + InverseStr(Left(Chaine),Len(Chaine)-1)
end if
Ca fait 3 Lignes et tu ne déclare rien
1 sept. 2003 à 17:19
Merci pour la p'tite source ;)
1 sept. 2003 à 06:46
for nbcar = len(chaine) to 1 step -1> 0 dans
InverseStr += Mid(Chaine, NbCar, 1)
next
Quand le nombre d'itération peut etre connu et qu'il faut accomplir toutes les itérations, la boucle de type FOR généralement s'applique.
C'est effectivement très basic comme code...