Discussion :

[Kreepz]

Bonjour,

Je voudrais savoir si il est possible que l'Event de tab (celui qui permet de changer de tabIndex rapidement) peut-être utiliser avec la touche entrée?

Sans avoir à mettre pour chaque textBox :

Code :

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

1
2
3
4
 
if keys.keycode = keys.enter then
txtboxTrux.focus()
end if

Merci!

[mactwist69]

Bonjour,

Il existe dans les propriétés du formulaire la propriété KeyPreview (a mettre à True)

Une fois cela fait, tu peux utiliser l’événement KeyDown du formulaire, pour intercepter la touche.
Une fois l’événement passé, l’événement "normal" du Control se déclenche.

L'idée (je n'ai pas testé), serait de remplacer le code de la touche Entrée par celui du Tab. A essayer.

[Kreepz]

Comment puis-je lui passer le code de tab ?

[_Ez3kiel]

Comment puis-je lui passer le code de tab ?

Sur l'idée de mactwist69 :

Code :

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

1
2
3
4
5
    Private Sub Form1_KeyDown(sender As Object, e As KeyEventArgs) Handles Me.KeyDown
        If e.KeyCode = Keys.Enter Then
            SendKeys.Send("{TAB}")
        End If
    End Sub

Mais le hic, c'est qu'en faisant ça, tu court-circuites tous les fonctionnements basé sur Enter pour tous les Controls de ta Form (elle comprise). (Ex: Le focus est sur le bouton "Valider", on tape Entrée, le Focus repartira sans valider, idem auto-completion des combobox, idem pour le fonctionnement d'un DGV, etc etc) Je pense que tu vas partir sur un casse-tête ...

A la rigueur tu peux rajouter une couche entre les Controls windows et ton appli : tu crées ta classe de textbox, tu la fais hériter de la classe system.windows.form.textbox, et tu n'as qu'à coder l'event KeyDown de la textbox (voir code du dessus). Par conséquent toutes tes textboxs en profiteront, et les boutons ne seront pas impactés par le fonctionnement.

[ebastien]

Bonjour,

+1 pour l'héritage du control TextBox.
En revanche, plutôt que d'utiliser SendKeys.Send("{TAB}"), il serait préférable d'utiliser Control.SelectNextControl.

[Kreepz]

Sur l'idée de mactwist69 :

Code :

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

1
2
3
4
5
    Private Sub Form1_KeyDown(sender As Object, e As KeyEventArgs) Handles Me.KeyDown
        If e.KeyCode = Keys.Enter Then
            SendKeys.Send("{TAB}")
        End If
    End Sub

Mais le hic, c'est qu'en faisant ça, tu court-circuites tous les fonctionnements basé sur Enter pour tous les Controls de ta Form (elle comprise). (Ex: Le focus est sur le bouton "Valider", on tape Entrée, le Focus repartira sans valider, idem auto-completion des combobox, idem pour le fonctionnement d'un DGV, etc etc) Je pense que tu vas partir sur un casse-tête ...

A la rigueur tu peux rajouter une couche entre les Controls windows et ton appli : tu crées ta classe de textbox, tu la fais hériter de la classe system.windows.form.textbox, et tu n'as qu'à coder l'event KeyDown de la textbox (voir code du dessus). Par conséquent toutes tes textboxs en profiteront, et les boutons ne seront pas impactés par le fonctionnement.

Oui je pensais à cela justement que tous mes contrôles sur les boutons et autres seraient court-circuités ...

J'ai testé le :

Code :

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

1
2
3
4
5
6
 
Private Sub module_KeyDown(sender As Object, e As KeyEventArgs) Handles Me.KeyDown
            If e.KeyCode = Keys.Enter Then
                SendKeys.Send("{TAB}")
            End If
        End Sub

Mais il ne fonctionne pas.

[_Ez3kiel]

Dans quelle classe est placée cette méthode ? (A quoi correspond 'Me' ici : Un form ou un module ?) -> Si tu suis l'idée de mactwist69, il faut que ce code soit dans ta Form.vb et que cette dernière ai .KeyPreview = True.

Ps: Prend en compte la judicieuse remarque d'ebastien et privilégie Control.SelectNextControl plutôt que SendKeys.Send("{TAB}").