нажатие Enter на usercontrol дважды вызывает keydown

Программирование на Visual Basic, главный форум. Обсуждение тем программирования на VB 1—6.
Даже если вы плохо разбираетесь в VB и программировании вообще — тут вам помогут. В разумных пределах, конечно.
Правила форума
Темы, в которых будет сначала написано «что нужно сделать», а затем просьба «помогите», будут закрыты.
Читайте требования к создаваемым темам.
Nikita
Обычный пользователь
Обычный пользователь
 
Сообщения: 90
Зарегистрирован: 05.02.2003 (Ср) 15:09
Откуда: Russia

нажатие Enter на usercontrol дважды вызывает keydown

Сообщение Nikita » 19.11.2003 (Ср) 19:28

пусть на usercontrol есть текстовое поле
когда я нажимаю Enter при вводе текста в это поле, UserControl_KeyDown вызывается дважды, оба раза с vbKeyReturn

почему?

skiperski
Идеолог
Идеолог
Аватара пользователя
 
Сообщения: 1386
Зарегистрирован: 25.06.2002 (Вт) 15:52

Сообщение skiperski » 19.11.2003 (Ср) 19:51

Видимо что-то криво написал

Вот простейший пример

UserControl:
На форму UserControl'а кинуть TextBox
Код: Выделить всё
Option Explicit

Event KeyDown(KeyCode As Integer, Shift As Integer)

Private Sub Text1_KeyDown(KeyCode As Integer, Shift As Integer)
    Debug.Print "Text1_KeyDown", KeyCode
    RaiseEvent KeyDown(KeyCode, Shift)
End Sub


Стартовая форма:
На форму поместить UserControl
Код: Выделить всё
Option Explicit

Private Sub UserControl11_KeyDown(KeyCode As Integer, Shift As Integer)
    Debug.Print "UserControl11_KeyDown", KeyCode
End Sub


Immediate:
Код: Выделить всё
Text1_KeyDown  17
UserControl11_KeyDown        17
Text1_KeyDown  16
UserControl11_KeyDown        16
Text1_KeyDown  39
UserControl11_KeyDown        39
Text1_KeyDown  13
UserControl11_KeyDown        13
Text1_KeyDown  8
UserControl11_KeyDown        8
Text1_KeyDown  13
UserControl11_KeyDown        13


Т.е. всё функциклирует. Вывод: ищи грабли в своём коде.

Nikita
Обычный пользователь
Обычный пользователь
 
Сообщения: 90
Зарегистрирован: 05.02.2003 (Ср) 15:09
Откуда: Russia

Сообщение Nikita » 19.11.2003 (Ср) 20:07

да, ошибся
не просто текстовое поле, а комбобокс в который можно писать текст
комбобокс с открытым списком
при нажатии Enter закрывается список, наверно после этого снова посылается сообщение уже закрытому комбобоксу .. причем только если все это в usercontrol
как бы это побороть ..

кстати, есть похожий странный глюк (я уже придумал как его обойти, но все же :))
комбобокс в который можно писать текст, пусть в нем есть какие-то значения в списке.
кладем его на форму, открываем список, выбираем значение(при этом список закрывается), открываем список снова, пишем в текстовом поле любой текст, нажимаем Enter (при открытом списке) - и... - все нормально, текст в текстовом поле и тп.
кладем этот комбобокс на usercontrol, его - на форму
открываем список, выбираем любой элемент (список закрывается), открываем снова список, пишем в текстовое поле любой текст. нажимаем enter - и - текстовое поле очищается. пусто. введенный текст исчез.
только на user control :)


Вернуться в Visual Basic 1–6

Кто сейчас на конференции

Сейчас этот форум просматривают: AhrefsBot, SemrushBot и гости: 8

    TopList  
cron