Событие KeyDown

[Чудик]

Добрый день!
На данный момент испытываю трудность с упомянутым событием. Создаю форму и пишу:

Private Sub UserForm_KeyDown(ByVal KeyCode As _ MSForms.ReturnInteger, ByVal Shift As Integer)
If KeyCode=vbKeyF12 Then msgBox "Ау"
End Sub

Все работает - при нажатии на клавишу F12 выходит диалог. Но стоит установить на форму кнопку или др. элемент, уже не работает. Даже событие не фиксируется. Понимаю фокус где-то не на форме, но и не на кнопке. Так где? Или фишка не в фокусе? Или как?

[Sirik]

Ты сам ответил на свой вопрос: фокус переходит на добавленный контрол

[Чудик]

Sorry, притормозил.

[tyomitch]

Чудик, если установить у формы KeyPreview = True, то она будет ловить все нажатия на кнопки, независимо от фокуса.

[Sirik]

Чудик, если установить у формы KeyPreview = True, то она будет ловить все нажатия на кнопки, независимо от фокуса.

Хорошие замечание!!!

[Тимофей_кг]

Спасибо

[Ennor]

Чудик, если установить у формы KeyPreview = True, то она будет ловить все нажатия на кнопки, независимо от фокуса.

Прикол хотите? Некоторые контролы не отдают форме KeyPreview. Т.е. все работает так, как будто это свойство не установлено. Я сейчас не вспомню точно, но по-моему Treeview был за этим пойман и точно один из штатных гридов (MSHFlex, кажется). Так что даже тут гарантий нет.