' Je ne crois pas que le codage est trop difficile pour qu'il soit nécessaire d'expliquer... Private Sub Form_KeyDown(KeyCode As Integer, Shift As Integer) EtiTouche1.Caption = "" EtiCode1.Caption = "" EtiTouche2.Caption = "" EtiCode2.Caption = "" EtiTouche1.Caption = Chr(KeyCode) EtiCode1.Caption = KeyCode End Sub Private Sub Form_KeyPress(KeyAscii As Integer) EtiTouche2.Caption = Chr(KeyAscii) EtiCode2.Caption = KeyAscii If KeyAscii = vbKeyReturn Then Unload Me End End If End Sub
Télécharger le zip
Yahoo!! tu es un bon programmeur, tu es donc un rival pour moi lol, je n'ose pas imaginer comment tu programmeras dans 10ans...lolà+!
Je comprend l'entousiasme géreré lors de l'ajout d'une source mé reste à savoir kel interet elle apporte à la communauté.Tu comprendra facilement donc, je pense, ke l'ilustation d'une fonction aussi simple se révèle sans intérêt majeur, surtout kan on peut la trouver sur le site.
Bonsoir à vous français (car ici, il est 17h35 ^^)Miko500: Il ne faut pas exagérer...:P héhé merci quand même !Alan71: Je comprends bien que l'ajout d'une source certainement existante n'est pas nécessaire, mais je crois que mon codage est clair.. et je vois plusieurs sources qui ne sont pas claires et de toute façon... plus il y a de sources différentes pour effectuer la même chose, c'es toujours mieux non ? je veux dire par là que les programmeurs ont un plus vaste choix... bref, je m'excuse si l'ajout de cette source aurait causé un certain désagrément chez vous.Bonsoir !Yawa
moi aussi j'ai fais un convertisseur ASCII, bon le code est bcp, bcp bcp, plus long, puisque j'ai entre toutes les données, mais il n'est pas mal non plus. A essayer :http://www.vbfrance.com/article.aspx?Val=5015
Se souvenir du profil
Mot de passe oublié ? / Activation de compteCréer un compte
1 873 545 membres 72 nouveaux aujourd'hui 16 151 membres club