Vi har skrivit följande kod för att få upp en MsgBox när man trycker på F1, det fungerar tyvärr inte, vad e fel?


Private Sub Form1_Keydown (KeyCode As Integer)
Select Case KeyCode
Case vbKeyF1
MsgBox "blblabla"
End Select
End Sub

Private Sub Form_KeyDown(keycode As Integer, Shift As Integer)

If keycode = vbKeyF1 Then MsgBox "Du tröck på F1!", vbOKOnly, "F1 knappen"

End Sub

Private Sub Form_KeyDown(KeyCode As Integer, Shift As Integer)
Select Case KeyCode
Case vbKeyF1
MsgBox "blblabla"
End Select
End Sub

/Johan

Hej
F1 är inget bra val ta hellre tex F11.

F1 används som standard i Windows mfl. för att koppla
Hjälp information.Du kommer lätt att få konflikter med F1

mvh
Sven

Sätt egenskapen keypreview till true för formuläret. Annars kommer bara kontroll som har focus att få eventet.