Discussion :

[khany]

Bonjour !

Je sais, ce sont souvent les choses les plus simples sur lesquelles on bute

J'ai une liste dans laquelle l'utilisateur fait un choix et il peut valider ce choix soit par ENTER, soit par TAB soit par le Click souris.

Code :

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

1
2
3
4
5
6
7
 
 Private Sub ObjLstType_KeyPress(ByVal sender As Object, ByVal e As System.Windows.Forms.KeyPressEventArgs) Handles ObjLstType.KeyPress
        Select Case e.KeyChar
            '--- Touche ENTER et TAB
            Case Is = Microsoft.VisualBasic.ChrW(Keys.Tab), Microsoft.VisualBasic.ChrW(Keys.Enter)
                EnregExamen.ExamenType = ObjLstType.Text
.......

Je veux bien ajouter à la Sub ", ObjLstType.Click", mais ca génère une erreur, donc, refusé.

Comment gérer le fait que Click doit être pris en considération et faire la même séquence d'instruction que TAB et ENTER ?


J'ai essayé en créant :

Code :

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

1
2
3
4
 
Private Sub ObjLstType_Click(ByVal sender As Object, ByVal e As System.EventArgs) Handles ObjLstType.Click
 
End Sub

et en essayant d'envoyer à la sub Keypress un EventArgs qui vaut ENTER ou TAB. Me suis plantée évidemment

Merci de votre aide

[mictif]

Code :

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

1
2
3
4
5
6
7
8
Private Sub ObjLstType_KeyPress(ByVal sender As Object, ByVal e As System.Windows.Forms.KeyPressEventArgs) Handles ObjLstType.KeyPress
        Select Case e.KeyChar
            '--- Touche ENTER et TAB
            Case vbkeyenter,vbkeytab 
                ObjLstType_Click(sender,e) 
         end select
end sub
et tu codes ton evenement clique sur ton objlsttype

[Piotrek]

Salut khany

Si j'ai bien compris le probleme:

Cree une sub Valider que tu apelles si l'utilisateur:
- clique sur l'element de liste (je crois que l'evenement SelectedIndexChanged serait plus approprie que Click)
- appuie sur la touche TAB ou enter

La sub Valider contiendrait:

Code :

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

1
2
3
 
EnregExamen.ExamenType = ObjLstType.Text
etc etc...

EDIT: Tout pareil que mictif en fait

[khany]

J'ai dit que j'avais tourné en rond

Bon, je vais essayer et je vous tiens au courant !

et pour le selectedindexchanged, j'ai tellement voulu occulter mon VB6 que je fini par me compliquer la vie

[khany]

Bon, c'est ok ! mais je trouve dommage avec tous les avantages que les nouveautés VS nous offrent, on ne puisse conjuguer 2 événements

Merci de m'avoir remise sur les rails