Bonjour, j'ai un problème avec keyascii.
Sur une appli, je l'utilise nickel, sur une autre appli il ne reconnait pas la variable.. Savez vous pourquoi?
Version imprimable
Bonjour, j'ai un problème avec keyascii.
Sur une appli, je l'utilise nickel, sur une autre appli il ne reconnait pas la variable.. Savez vous pourquoi?
Bonjour Escape,
Sans plus d'informations tu n'auras pas beaucoup de réponses... ;)
Montre-nous ton code !
http://vb.developpez.com/faq/?page=C...s#flex_ou_data
j'utilise ce code.
Mais déjà quand je tape keyascii, dans un programme ca me met automatiquement KeyAscii alors que dans l'autre ca reste en mini
code :
Code:
1
2
3
4
5
6
7
8
9 Dim strTexte strTexte = MSFlexGrid1.Text If KeyAscii = 8 Then 'Touche d'effacement If Len(strTexte) > 0 Then MSFlexGrid1.Text = Left(strTexte, Len(strTexte) - 1) ElseIf KeyAscii <> 13 Then MSFlexGrid1.Text = strTexte & Chr(KeyAscii) End If
Désolé, mais je ne comprends pas :oops:Citation:
Envoyé par escape
De plus, pourrais-tu nous montrer TON code "complet" ? Là tu indique du code sorti de son contexte. Dans quel événement as-tu mis ce code? Quels sont les controles mis en jeux ? ... ?
le problème c'est que dans un si je tape keyascii il me reconnais KeyAscii
et dans l'autre il me reconnait pas.. il le laisse en mini et il me dit que c'est pas défini
le code c'est celui de
http://vb.developpez.com/faq/?page=C...aisie_flexgrid
Code:
1
2
3
4
5
6
7
8
9 Dim strTexte strTexte = MSFlexGrid1.Text If KeyAscii = 8 Then 'Touche d'effacement If Len(strTexte) > 0 Then MSFlexGrid1.Text = Left(strTexte, Len(strTexte) - 1) ElseIf KeyAscii <> 13 Then MSFlexGrid1.Text = strTexte & Chr(KeyAscii) End If
Ca veut dire quoi ?Citation:
Envoyé par escape
C'est quoi le message d'erreur ?Citation:
Envoyé par escape
Le code que tu montre ne peut pas fonctionner seul, il doit être mis dans un événement, probablement KeyPress.
oui je suis un ane, dans un j'ai oublié les evenements... :p
Désolé.. Je me prenais la tete pour rien
C'est de début de la sagesse de le reconnaître ;)Citation:
Envoyé par escape