Visual basic convertir "a" en "b" par exemple
jean-flavien
Messages postés
1
Date d'inscription
Statut
Membre
Dernière intervention
-
Nabla's Messages postés 18203 Date d'inscription Statut Contributeur Dernière intervention -
Nabla's Messages postés 18203 Date d'inscription Statut Contributeur Dernière intervention -
Bonjour,
J'aimerai pouvoir crypter du texte dan smon programme, je voudrai que
par exemple vous me donniez le code pour convertir a en b b en c d en e donnez lmoi que sa je continurai. Sachant Que je veux cionvertir le texte de textbox1 vers textbox2 en basic
Merci beaucoup d'avance
VISUALBASIC 2008
J'aimerai pouvoir crypter du texte dan smon programme, je voudrai que
par exemple vous me donniez le code pour convertir a en b b en c d en e donnez lmoi que sa je continurai. Sachant Que je veux cionvertir le texte de textbox1 vers textbox2 en basic
Merci beaucoup d'avance
VISUALBASIC 2008
A voir également:
- Visual basic convertir "a" en "b" par exemple
- Visual basic - Télécharger - Langages
- Url exemple - Guide
- Telecharger macro convertir chiffre en lettre excel - Télécharger - Tableur
- Microsoft 365 basic - Accueil - Microsoft Office
- Exemple de code ascii - Guide
1 réponse
tu peux faire uen recherche sur le site vbfrance sur le "cryptage de cesar"
en gros, je ferai:
for i = 1 to strlen(textbox1.text)
monchar = mid(textbox1.text,i,1)
code_ascii = asc(monchar)
code_code = code_ascii + 1
if code_code > asc('z') then code_code = code_code - 26
text2.text = text2.text + chr(code_code)
end.
voila, en gros comment je ferai ...
il y a surement des erreurs, je l'ai fait sans rien tester, mais l'idée est la
en gros, je ferai:
for i = 1 to strlen(textbox1.text)
monchar = mid(textbox1.text,i,1)
code_ascii = asc(monchar)
code_code = code_ascii + 1
if code_code > asc('z') then code_code = code_code - 26
text2.text = text2.text + chr(code_code)
end.
voila, en gros comment je ferai ...
il y a surement des erreurs, je l'ai fait sans rien tester, mais l'idée est la