toets opvangen

Status
Niet open voor verdere reacties.

kees1955

Gebruiker
Lid geworden
30 jul 2017
Berichten
77
Ik heb een windows form met wel 50 tekstvelden
nu zodra er op de escape toets gedrukt wordt moet het formulier worden afgesloten
ik doe dit in de keydown van het tekstveld en als volgt

Private Sub txtleveringtekstgrootte_KeyDown(ByVal sender As Object, ByVal e As System.Windows.Forms.KeyEventArgs) Handles txtleveringtekstgrootte.KeyDown
If e.KeyCode = Keys.Escape Then afsluiten()
End Sub

zoals ik nu doe moet ik dit in ieder veld of datatgrid dit doen
is er ook een manier om dit bijvoorbeeld in het formEvents te doen als bijvoorbeeld frmConfiguratie_KeyDown = keys.escape then doe dat
 
Zet de KeyPreview eigenschap van dat formulier op True en gebruik dan dit:
Code:
Private Sub Form1_KeyDown(ByVal sender As Object, ByVal e As System.Windows.Forms.KeyEventArgs) Handles MyBase.KeyDown
    If e.KeyCode = Keys.Escape Then Me.Close()
End Sub
 
Laatst bewerkt:
dat werkt alleen als ik op het formulier sta
het gaat het mij om dat als ik in een willekeurig tekstveld sta en niet op het formulier kan ik het dan centraal opvangen
of moet ik dat afzonderlijk doen in ieder tekstveld ???
 
Je hebt toch wel die KeyPreview op True gezet?
Werkt hier prima.
 
ik had de KeyPreview niet op true staan
nu wel en het werkt
Bedank voor je hulp
 
Status
Niet open voor verdere reacties.
Steun Ons

Nieuwste berichten

Terug
Bovenaan Onderaan