Click по кнопке (command): результат - непонятки.

[Alex404]

Подозреваю, что вопрос наивный, возможно даже глупый, но тем не менее ...
На форме - Кнопка (Command)
Если верить VB помимо всего прочего ей сопоставлены Event-ты: Click, KeyUp, KeyDown.
Вот и пишем
Sub Command1_Click()
MsgBox "Кликнули"
End sub
Sub command1_KeyUp (KeyCode As Integer, Shift As Integer)
MsgBox "КейАпнули"
End sub
Sub command1_KeyDown (KeyCode As Integer, Shift As Integer)
MsgBox "КейДаунули"
End sub
Click в чистом виде (то есть мышью) неактуален - мыши не предполагается, посему мужественно жмем на ENTER - Вылетает " Кликнули ", т.е. 2-й и 3-й Sub-ы проигнорировали как нажатие кнопки ENTER, так и ее отпускание.
Ладно Клик так Клик. Пишу свой код в это вобытие. Код передает фокус вледующему контролу на форме, которому тоже прописано свое событие KeyUp. И тут выясняется, что то первое нажатие на ENTER не пропало бесследно, не трансформировалось в Click, а классно так сработало уже на новом контроле.
По моему скромному мнению получилось слишком много суеты от одного нажатия пусть и на большую кнопочку.
Просветите парня ... пошли вторые сутки...

[ZeroX]

Нажатие ENTER по буттону воспринимаеться как клик мышью, то есть в этом случае событие Click имеет больший приоритет нежели кейапы и кейдауны

[Alex404]

Отсутствие Sub-a на событие Click не обеспечивает обработки Up&Down-ов. Они как не обрабатывались так и не обрабатываются .
То есть они работают, но только если жали не на ENTER...
Грустная история... Так че? Кнопку в лоб не заставить обрабатывать нажатие на ENTER ?..

[TimeKeeper]

Вылавливай Click, какая тебе разница?

P.S. У Буттона есть еще свойства Cancel и Default, которые наступают по нажатию на Esc и Enter (если выставить в True), не зависимо где фокус (не на другой кнопке). Мож пригодится?..

[alibek]

Замени

Код: Выделить всё

MsgBox "Text"

на

Код: Выделить всё

Debug.Print "Text"

и многое станет ясным

А события Key??? будут выполнятся только тогда, когда фокус установлен на кнопку. Выставь у формы .KeyPreview=True и обрабатывай события Form_Key???.

[Ilia]

События от нажатия enter на кнопках не работают.
на других контролах - работают
вместо кнопки можно использовать пикчербокс с подгружаемыми картинками.