COMMENT INVERSER UNE CHAINE DE CARACTÈRES EN 5 LIGNES.

Signaler
Messages postés
171
Date d'inscription
jeudi 30 janvier 2003
Statut
Membre
Dernière intervention
20 juillet 2008
-
Messages postés
1247
Date d'inscription
mardi 7 mai 2002
Statut
Membre
Dernière intervention
18 février 2019
-
Cette discussion concerne un article du site. Pour la consulter dans son contexte d'origine, cliquez sur le lien ci-dessous.

https://codes-sources.commentcamarche.net/source/8406-comment-inverser-une-chaine-de-caracteres-en-5-lignes

Messages postés
1247
Date d'inscription
mardi 7 mai 2002
Statut
Membre
Dernière intervention
18 février 2019
4
D'accord avec DarkVader !!!
Text1 = StrReverse(Text1)

c'est si simple lol
Messages postés
51
Date d'inscription
samedi 21 octobre 2000
Statut
Membre
Dernière intervention
10 octobre 2011

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.
Messages postés
9
Date d'inscription
vendredi 21 décembre 2001
Statut
Membre
Dernière intervention
19 avril 2004

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

Ca fait 3 Lignes et tu ne déclare rien
Messages postés
30
Date d'inscription
dimanche 20 juillet 2003
Statut
Membre
Dernière intervention
26 janvier 2019

Ouais je sais ;) Mais par principe, j'évite d'utiliser des boucles FOR.
Merci pour la p'tite source ;)
Messages postés
171
Date d'inscription
jeudi 30 janvier 2003
Statut
Membre
Dernière intervention
20 juillet 2008

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.

C'est effectivement très basic comme code...