Crytage chaine en vb
Résolu
titou123
Messages postés
89
Statut
Membre
-
lermite222 Messages postés 9042 Statut Contributeur -
lermite222 Messages postés 9042 Statut Contributeur -
Bonjour tout le monde,je suis nouveau en vb.j'ai un exercice mais je trouve pas la solution:
" IL FERA BEAU DEMAIN " Cryptage
ASC("F")=70
Long("FERA")=4
CHR(70+4)="J"
" KN JIVE FIEY JKSGOT
Le caractère "F"
sera remplacé par "J"et merci d'avance
l'exercice consiste:
Le cryptage traite chaque bloc de caractères séparément selon son longueur et laisse
invariant les blocs d'espaces : on ajoute à chaque code "Unicode" d'un caractère le nombre
de caractères du bloc qui le contient.
" IL FERA BEAU DEMAIN " Cryptage
ASC("F")=70
Long("FERA")=4
CHR(70+4)="J"
" KN JIVE FIEY JKSGOT
Le caractère "F"
sera remplacé par "J"et merci d'avance
l'exercice consiste:
Le cryptage traite chaque bloc de caractères séparément selon son longueur et laisse
invariant les blocs d'espaces : on ajoute à chaque code "Unicode" d'un caractère le nombre
de caractères du bloc qui le contient.
2 réponses
-
-
Bonjour,
Suffit de réfléchir un tout petit peu...
ASC("F")=70 .. là tu l'a déjà.
Comment trouver le 4 .. Voir la fonction Len()
Long("FERA")=4 .. comment trouver F dans FERA.. Voir fonction Mid()
CHR(70+4)="J"
Parcourir chaque chaine tu a la réponse dans ton poste précédant.
Reste juste.. comment avoir chaque mots séparer... voir la fonction SPLIT()
et si ont récapitule
1°) Spliter la variable du texte initial
2°) Parcourir chaque mot séparémént, ajouter sa longeur à chaque lettre
3°) Rassembler chaque mots en les séparant par un espace..
Aller.. courrage.
A+
