Discussion :

[petitours]

Bonjour

je souhaite détecter un appui sur les touches fleche du clavier quand je suis dans mon treeview (cad je souhaite faire quelquechose quand je change de noeud dans le treeview à l'aide du clavier)

j'ai donc mis en place la fonction

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
Private Sub tvwListeRessource_KeyDown(KeyCode As Integer, Shift As Integer)
'    MsgBox ("KeyCode")
'End If
End Sub

Mais d'une part quand j'ai ecris ca le projet semble perturbé puisque l'aide intuitive à la synthaxe (ce qui apparait aprés le . de ME....au moment de la frappe) ne fonctionne plus

d'autre part à l'execution on me dit que la fonction n'est pas reconnue

Cette fonction est pourtant bien dans l'explorateur d'objet.

Merci

[Invité]

Bonjour

KeyCode est une variable, pas de "".

Starec

[Domi2]

Bonjour,

Mais d'une part quand j'ai ecris ca le projet semble perturbé puisque l'aide intuitive à la synthaxe (ce qui apparait aprés le . de ME....au moment de la frappe) ne fonctionne plus

Ca, c'est normal ! spécial treeview.

Je viens de tester, ça fonctionne.

Dans l'éditeur, tu sélectionnes ton contrôle, puis à droite, tu cliques sur Keydown, qui devrait venir s'ajouter en fin de ton module.

Et tu essaies de compiler pour voir si tu as une erreur.

Domi2

[petitours]

non non, je n'utilise pas la variable, le msgbox est en commentaire
Il y a juste l'entete de la fonction.

une fois l'entete ainsi dans le code, je ne peux plus saisir quoi que ce soit comme il faut, tout code semble devenir inconnu, plus de saisie intuitive, plsu rien.

Au lancement du formulaire ca me marque ce qui est sur l'image

je comprends qu'il ne reconnait pas la fonction...

[petitours]

Yess !

Je connaissais pas ce truc en haut et...à droite pour retrouver composants et evenements ! super !

en fait c'est qu'elle n'est pas déclarée pareil que dans l'aide de l'explorateur d'objet (F2)

il faut mettre

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
Private Sub tvwListeRessource_KeyDown(KeyCode As Integer, ByVal Shift As Integer)
MsgBox (KeyCode)
End Sub

Merci !