1
Февраль
2009
Как перехватить нажатие клавиши Escape?
Как перехватить нажатие клавиши Escape?
Когда фокус имеет текстовое поле.
Таким образом, можно перехватить и другие клавиши…
Option Explicit 'Перехватываем нажатие клавиши Escape в текстовом поле 'И посылаем в поле PRESS Private Sub Text1_KeyDown(KeyCode As Integer, Shift As Integer) 'Нажатие клавиши Escape на клавиатуре 'Посылает в поле текст PRESS If KeyCode = vbKeyEscape Then SendKeys "(Escape)" End Sub