mick1819
Messages postés24Date d'inscriptionmercredi 21 janvier 2004StatutMembreDernière intervention26 avril 2005
-
17 sept. 2004 à 10:10
mick1819
Messages postés24Date d'inscriptionmercredi 21 janvier 2004StatutMembreDernière intervention26 avril 2005
-
17 sept. 2004 à 13:29
J'aimerai faire un petit programme qui lorsque on appuie sur "start" les lettres de l'alphabet défilent dans un text box.
Seul bémol je doi faire cela avec une conversion ascii. C'est à dire que je dois convertir les chiffres hexadémal du code ASCII en lettre de l'alphabet. L'ensemble du code ne me pose pas de problème si ce n'est la conversion ASCII
par exemple je met : 65 et dans mon text box ça doit s'afficher "A"...
je ne sais pas comment faire la conversion
si quelqu'un peu m'aider ça serait bien.
cs_starfighter
Messages postés90Date d'inscriptionmardi 18 mars 2003StatutMembreDernière intervention28 février 2005 17 sept. 2004 à 10:56
il faut faire :
Option Explicit
Dim Compteur As Integer
Private Sub Form_Load()
Compteur = 65
End Sub
Private Sub tiTimer_Timer()
edAffiche.Text = chr(Compteur)
Compteur =Compteur +1
IF Compteur = 91 then Compteur=65 'Lorsque tu atteint Le caractere après Z tu reprend A
End Sub
mick1819
Messages postés24Date d'inscriptionmercredi 21 janvier 2004StatutMembreDernière intervention26 avril 2005 17 sept. 2004 à 13:29
Merci c'est cool
ouai j'ai pas pensé a faire directement sur le TxtBox ... moi j'avé essayé dans le timer en faisant compteur = chr(compteur)
enfin c'est sympa