15-12-2015, 13:07
Visual Basic
- Dim Ctrl As Boolean
- Dim F2 As Boolean
- Private Sub Form_KeyDown(KeyCode As Integer, Shift As Integer)
- Select Case KeyCode
- Case vbKeyControl
- F2 = False
- Ctrl = True
- Case vbKeyF2
- F2 = True
- End Select
-
- If F2 = True And Ctrl = True Then
- MsgBox "Control + F2 ye Bastınız"
- Ctrl = False
- F2 = False
- End If
- End Sub

