KeyPress, KeyDown et KeyUp
' exemple Option Explicit On Public Class Form1 ' deux textBox 1 et 2 Sub TextBox1_KeyPress(ByVal sender As Object, ByVal e As System.Windows.Forms.KeyPressEventArgs) Handles TextBox1.KeyPress Dim ascii As Integer ascii = Asc(e.KeyChar) MsgBox("presse = " & ascii) ' C'est KeyPress qu'il faut utiliser pour les valeur ascii des touches End Sub Sub TextBox1_KeyDown(ByVal sender As Object, ByVal e As System.Windows.Forms.KeyEventArgs) Handles TextBox1.KeyDown Dim ascii As Integer ascii = Asc(e.KeyCode) MsgBox("Down = " & ascii) ' valeur de localisation de la touche End Sub Sub TextBox2_KeyUp(ByVal sender As Object, ByVal e As System.Windows.Forms.KeyEventArgs) Handles TextBox2.KeyUp Dim ascii As Integer ascii = Asc(e.KeyCode) MsgBox("Up = " & ascii) ' valeur de localisation de la touche End Sub End Class
Vous n’avez pas trouvé la réponse que vous recherchez ?
Posez votre questionSub TextBox1_KeyPress(ByVal sender As Object, ByVal e As System.Windows.Forms.KeyPressEventArgs) Handles TextBox1.KeyPress TextBox1.Text = e.KeyChar.ToString End Sub
Sub TextBox1_KeyPress(ByVal sender As Object, ByVal e As System.Windows.Forms.KeyPressEventArgs) Handles TextBox1.KeyPress e.Handled = True TextBox1.Text = e.KeyChar.ToString End Sub
*Une textbox, grisée a coté aie pour texte la touche pressée précédemment
Et puis tu pourrais dire pourquoi tu veux avoir le nom des touches du clavier, car parfois j'ai le sentiment de perdre du temps à chercher une réponse pour une personne qui fait n'importe quoi...
Indique bien quelle application tu comptes faire, quelle sera son objectif, etc...
Mais ne dites pas "Cela ne sert a rien" Si, je pourrais copier cette application dans une autre un jour
Mais si tu en as une autre (non espion) à l'esprit
Comment des raccourcis claviers dans une application peut etre un logiciel espion ?
Par exemple: il y a une textbox quand on tape une touche, ce soit ecrit la valeur de la touche ex : CTRL, A, J, Shift Espace, Enter etc..)