Гость
Целевая тема:
Создать новую тему:
Автор:
Форумы / Visual Basic [игнор отключен] [закрыт для гостей] / ComboBox&Enter / 17 сообщений из 17, страница 1 из 1
12.11.2010, 16:11
    #36952156
BKulik
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
ComboBox&Enter
Добрый день!
Помогите, пожалуйста, настроить ComboBox таким образом, чтобы после нажатия клавиши Enter:
1) переход на другой элемент не происходил (фокус оставался на ComboBox)
2) весь текст в поле ComboBox был выделен

Заранее спасибо!
...
Рейтинг: 0 / 0
12.11.2010, 16:13
    #36952161
Konst_One
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
ComboBox&Enter
KeyDown
KeyUp
KeyPress
...
Рейтинг: 0 / 0
12.11.2010, 16:17
    #36952177
Shocker.Pro
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
ComboBox&Enter
BKulik1) переход на другой элемент не происходил (фокус оставался на ComboBox)
убрать причину, почему он переходит, ибо штатно фокус не должен никуда деваться
BKulik2) весь текст в поле ComboBox был выделен
SelStart, SelLen
...
Рейтинг: 0 / 0
12.11.2010, 16:39
    #36952232
BKulik
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
ComboBox&Enter
Konst_One,

Код: plaintext
1.
2.
3.
4.
5.
6.
7.
8.
Private Sub ComboBox_Cur_KeyDown(ByVal KeyCode As MSForms.ReturnInteger, ByVal Shift As Integer)

If KeyCode =  13  Then
    If ComboBox_Cur.Value <> "" Then
        ComboBox_Cur.AddItem ComboBox_Cur.Value
    End If
    ComboBox_Cur.SetFocus
End If
End Sub

После нажатия клавиши Enter все равно переходит на другой элемент((((
...
Рейтинг: 0 / 0
12.11.2010, 16:40
    #36952234
Konst_One
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
ComboBox&Enter
BKulikKonst_One,

Код: plaintext
1.
2.
3.
4.
5.
6.
7.
8.
Private Sub ComboBox_Cur_KeyDown(ByVal KeyCode As MSForms.ReturnInteger, ByVal Shift As Integer)

If KeyCode =  13  Then
    If ComboBox_Cur.Value <> "" Then
        ComboBox_Cur.AddItem ComboBox_Cur.Value
    End If
    ComboBox_Cur.SetFocus
End If
End Sub

После нажатия клавиши Enter все равно переходит на другой элемент((((

сказали А, так говорите уж Б. я вам перчислил все события, которые надо проконтролировать
...
Рейтинг: 0 / 0
12.11.2010, 16:45
    #36952244
BKulik
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
ComboBox&Enter
Konst_One,

у меня только KeyDown реагирует на Enter. Другие по Entery ничего не выполняют(хотя для других клавиш нормально работают).
...
Рейтинг: 0 / 0
12.11.2010, 16:46
    #36952247
Konst_One
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
ComboBox&Enter
кстати, так и не понятно поведение по ENTER. стандартно переход по TAB межку контролами на форме. вы что-то не договариваете
...
Рейтинг: 0 / 0
12.11.2010, 16:46
    #36952249
Konst_One
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
ComboBox&Enter
KeyCode = 0

надо делать
...
Рейтинг: 0 / 0
12.11.2010, 16:50
    #36952256
BKulik
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
ComboBox&Enter
Табуляция выключена
TabStop=False

Я не по на счет KeyCode=0
...
Рейтинг: 0 / 0
12.11.2010, 16:53
    #36952264
Konst_One
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
ComboBox&Enter
BKulikТабуляция выключена
TabStop=False

Я не по на счет KeyCode=0

не могу воспроизвести вашу ситуацию. у меня по ENTER в combobox ничего не происходит и фокус не теряется, как ,в прочем, и для любых других типов контролов на форме
...
Рейтинг: 0 / 0
12.11.2010, 17:39
    #36952392
BKulik
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
ComboBox&Enter
Попробовал еще раз с нуля
Создал форму, затем два ComboBoxa. Когда нажимаю Enter, курсор появляется на другому ComboBoxе...и наоборот
...
Рейтинг: 0 / 0
12.11.2010, 17:42
    #36952405
Konst_One
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
ComboBox&Enter
BKulikПопробовал еще раз с нуля
Создал форму, затем два ComboBoxa. Когда нажимаю Enter, курсор появляется на другому ComboBoxе...и наоборот

вы точно это делаете в Visual Studio 6.0 Visual Basic?
...
Рейтинг: 0 / 0
12.11.2010, 17:50
    #36952425
BKulik
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
ComboBox&Enter
))))))))))))))))
Извините, но как то не упомянул, что тружусь на Microsoft Visul Basic 6.5 (внедрен в Excel 2003)
...
Рейтинг: 0 / 0
12.11.2010, 17:53
    #36952430
Konst_One
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
ComboBox&Enter
BKulik))))))))))))))))
Извините, но как то не упомянул, что тружусь на Microsoft Visul Basic 6.5 (внедрен в Excel 2003)

это VBA for MS Office Excel
и скорее всего вы юзаете MS Forms. Там другие правила, смотрите описание контролов и их свойства.
...
Рейтинг: 0 / 0
12.11.2010, 17:53
    #36952431
Shocker.Pro
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
ComboBox&Enter
Konst_OneBKulikПопробовал еще раз с нуля
Создал форму, затем два ComboBoxa. Когда нажимаю Enter, курсор появляется на другому ComboBoxе...и наоборот


вы точно это делаете в Visual Studio 6.0 Visual Basic?
Костя! Не заметил в событии MSForms?
я-то сразу отключился, как понял
...
Рейтинг: 0 / 0
12.11.2010, 17:55
    #36952441
Konst_One
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
ComboBox&Enter
Shocker.Pro+
Konst_Oneпропущено...


вы точно это делаете в Visual Studio 6.0 Visual Basic?

Костя! Не заметил в событии MSForms?
я-то сразу отключился, как понял

да не глянул внимательно. ох уж эти офисники. есть же ветка у них по их вопросам :
Microsoft Office

там быстрее ответят.
...
Рейтинг: 0 / 0
13.11.2010, 08:31
    #36953261
HandKot
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
ComboBox&Enter
Konst_One KeyCode = 0

надо делать
BKulikТабуляция выключена
TabStop=False

Я не по на счет KeyCode=0

имелось ввиду надо делать
Код: plaintext
1.
2.
Private Sub ComboBox1_KeyDown(ByVal KeyCode As MSForms.ReturnInteger, ByVal Shift As Integer)
    If KeyCode =  13  Then KeyCode =  0 
End Sub
...
Рейтинг: 0 / 0
Форумы / Visual Basic [игнор отключен] [закрыт для гостей] / ComboBox&Enter / 17 сообщений из 17, страница 1 из 1
Найденые пользователи ...
Разблокировать пользователей ...
Читали форум (0):
Пользователи онлайн (0):
x
x
Закрыть


Просмотр
0 / 0
Close
Debug Console [Select Text]