Code ASCII
Résolu/Fermé
Utilisateur anonyme
-
Modifié par Anthoitalia le 24/10/2011 à 14:33
LeJumeauAngélique - 12 oct. 2011 à 09:50
LeJumeauAngélique - 12 oct. 2011 à 09:50
Bonjour,
J'aurai aimé savoir si quelqu'un aurait pu m'aider pour un exercice que je sèche complet.
Merci d'avance
J'aurai aimé savoir si quelqu'un aurait pu m'aider pour un exercice que je sèche complet.
Merci d'avance
A voir également:
- Code ASCII
- Le code ascii - Guide
- Code puk bloqué - Guide
- Code telephone oublié - Guide
- Code activation windows 10 - Guide
- Code gta 4 ps4 - Guide
4 réponses
Reivax962
Messages postés
3672
Date d'inscription
jeudi 16 juin 2005
Statut
Membre
Dernière intervention
11 février 2021
1 011
11 oct. 2011 à 11:43
11 oct. 2011 à 11:43
Bonjour,
C'est on ne peut plus simple :
Soit i = 0
Pour chaque i de 0 à 255
Afficher Chr(i)
Afficher =
Afficher i
Afficher Retour à la ligne
Fin Pour
Xavier
C'est on ne peut plus simple :
Soit i = 0
Pour chaque i de 0 à 255
Afficher Chr(i)
Afficher =
Afficher i
Afficher Retour à la ligne
Fin Pour
Xavier
Module Module1
Sub Main()
Console.WriteLine("Affichage de l'alphabet CODE ASCII" & vbNewLine)
Dim valeur As Byte = 0
While valeur <= 255
Console.Write(Chr(valeur))
valeur = valeur + 1
End While
Console.Read()
End Sub
End Module
Sub Main()
Console.WriteLine("Affichage de l'alphabet CODE ASCII" & vbNewLine)
Dim valeur As Byte = 0
While valeur <= 255
Console.Write(Chr(valeur))
valeur = valeur + 1
End While
Console.Read()
End Sub
End Module
Utilisateur anonyme
11 oct. 2011 à 22:21
11 oct. 2011 à 22:21
Merci bien a vous deux et oui c'était bien pour du VB. Peut être, a très bientôt ^_^
