Вопрос № 32042: Уважаемые эксперты! При передаче фокуса от одного текстбокса другому в WinXP2 издаётся звук:
Private Sub TextBox1_KeyDown(KeyCode As Integer, Shift As Integer)
If KeyCode = 13 Then TextBox2.SetFocus
End Sub
но, если добавит...
Вопрос № 32.042
Уважаемые эксперты! При передаче фокуса от одного текстбокса другому в WinXP2 издаётся звук:
Private Sub TextBox1_KeyDown(KeyCode As Integer, Shift As Integer)
If KeyCode = 13 Then TextBox2.SetFocus
End Sub
но, если добавить:
Private Sub TextBox1_KeyPress(KeyAscii As Integer)
KeyAscii = 0
End Sub
Отвечает: AlexanderZh
Здравствуйте, Александр А.А.!
Все просто - происходит сброс кода клавиши (она считается как бы не нажатой)...
Ответ отправил: AlexanderZh (статус: 3-ий класс)
Отправлен: 23.12.2005, 12:24 Оценка за ответ: 3 Комментарий оценки: всё не так просто, как вам кажется
Отвечает: Залетин Виталий Викторович
Здравствуйте, Александр А.А.!
Потому что Вы делаете так, что клавиша считается как-бы не нажатой, т. е. присваиваете ей код 0.
--------- Учиться никогда не поздно. Особенно программированию!