2017-06-09 5 views
0

Donc j'essaie d'écrire du code simple qui allume ou éteint quelque chose quand la touche "g" est pressée. Je vous laisse jeter un oeil sur le code et nous espérons qu'il est quelque chose me regarder en face ...e.KeyCode ne veut pas travailler pour moi

Private Sub Form1_KeyDown(sender As Object, e As KeyEventArgs) 
    If e.KeyCode = Keys.G Then 
     If Label2.Text = "Off" Then 
      Label2.Text = "On" 
      Label2.ForeColor = Color.Green 
     Else 
      Label2.Text = "Off" 
      Label2.ForeColor = Color.Red 
     End If 
    End If 
End Sub 

Répondre

2

Vous avez en quelque sorte perdu le « Handes Me.KeyDown » à la fin de votre gestionnaire. ..note la fin de la première ligne:

Private Sub Form1_KeyDown(sender As Object, e As KeyEventArgs) Handles Me.KeyDown 
    If e.KeyCode = Keys.G Then 
     If Label2.Text = "Off" Then 
      Label2.Text = "On" 
      Label2.ForeColor = Color.Green 
     Else 
      Label2.Text = "Off" 
      Label2.ForeColor = Color.Red 
     End If 
    End If 
End Sub 

aussi, assurez-vous que vous avez la propriété KeyPreview de votre formulaire défini sur True.