MS Access | Навигация по форме стрелками с клавиатуры |
Есть обычная навигация (Tab с клавиатуры), принятая в формах MS Access по умолчанию. Есть навигация, принятая в MS Excel (стрелками с клавиатуры), которая может быть удобна и применима и в Access формах:
1. На событие формы KeyDown:
Private Sub Form_KeyDown(KeyCode As Integer, Shift As Integer) On Error GoTo KeyDownERR Select Case KeyCode Case vbKeyUp 'Нажата клавиша вверх DoCmd.GoToRecord , , acPrevious Case vbKeyDown 'Нажата клавиша вниз DoCmd.GoToRecord , , acNext End Select Exit Sub KeyDownERR: KeyCode = 0 End Sub
2. В свойствах формы Key Preview (Перехват нажатия клавиш) указать Yes:
|