Как определить какую кнопку на клавиатуре нажал пользователь

Программирование на Visual Basic, главный форум. Обсуждение тем программирования на VB 1—6.
Даже если вы плохо разбираетесь в VB и программировании вообще — тут вам помогут. В разумных пределах, конечно.
Правила форума
Темы, в которых будет сначала написано «что нужно сделать», а затем просьба «помогите», будут закрыты.
Читайте требования к создаваемым темам.
xxxDemoNxxx
Начинающий
Начинающий
 
Сообщения: 16
Зарегистрирован: 20.06.2006 (Вт) 20:53

Как определить какую кнопку на клавиатуре нажал пользователь

Сообщение xxxDemoNxxx » 30.07.2006 (Вс) 17:04

Как определить какую кнопку на клавиатуре нажал пользователь? :?: :?: :?:

IIIypuk
Обычный пользователь
Обычный пользователь
 
Сообщения: 96
Зарегистрирован: 10.06.2006 (Сб) 12:39

Сообщение IIIypuk » 30.07.2006 (Вс) 17:12

Private Sub Form_KeyDown(KeyCode As Integer, Shift As Integer)

Идешь в Object Browser(F2) и жмешь поиск KeyCode.
Есть 10 типов людей. Те, кто понимает двоичную систему исчисления, и те, кто не понимает...

xxxDemoNxxx
Начинающий
Начинающий
 
Сообщения: 16
Зарегистрирован: 20.06.2006 (Вт) 20:53

Сообщение xxxDemoNxxx » 30.07.2006 (Вс) 18:09

Private Sub Form_keyDown(vbKeyd As Integer, Shift As Integer)
Timer1.Enabled = True
End Sub
я нажимаю любую кнопку всё равно таймер включ.,а я хотел чтоб таймер включался только после нажатия клавиши B
Что-то не так? :shock: :shock:

tyomitch
Пользователь #1352
Пользователь #1352
Аватара пользователя
 
Сообщения: 12822
Зарегистрирован: 20.10.2002 (Вс) 17:02
Откуда: חיפה

Сообщение tyomitch » 30.07.2006 (Вс) 18:31

Отгадай, зачем IIIypuk подчеркнул кое-что в своём посте?
Изображение

xxxDemoNxxx
Начинающий
Начинающий
 
Сообщения: 16
Зарегистрирован: 20.06.2006 (Вт) 20:53

Сообщение xxxDemoNxxx » 30.07.2006 (Вс) 18:36

Зачем?

GSerg
Шаман
Шаман
 
Сообщения: 14286
Зарегистрирован: 14.12.2002 (Сб) 5:25
Откуда: Магадан

Сообщение GSerg » 30.07.2006 (Вс) 18:49

Так красивее?
Как только вы переберёте все варианты решения и не найдёте нужного, тут же обнаружится решение, простое и очевидное для всех, кроме вас

xxxDemoNxxx
Начинающий
Начинающий
 
Сообщения: 16
Зарегистрирован: 20.06.2006 (Вт) 20:53

Сообщение xxxDemoNxxx » 30.07.2006 (Вс) 19:14

Ну скажите же новичку ааа :)

GSerg
Шаман
Шаман
 
Сообщения: 14286
Зарегистрирован: 14.12.2002 (Сб) 5:25
Откуда: Магадан

Сообщение GSerg » 30.07.2006 (Вс) 19:19

Лица, оправдывающие подобное поведение словами "ну я же новичок", на этом форуме как правило не получают помощи и долго не задерживаются...
Как только вы переберёте все варианты решения и не найдёте нужного, тут же обнаружится решение, простое и очевидное для всех, кроме вас

xxxDemoNxxx
Начинающий
Начинающий
 
Сообщения: 16
Зарегистрирован: 20.06.2006 (Вт) 20:53

Сообщение xxxDemoNxxx » 30.07.2006 (Вс) 19:28

Я прочитал учебный курс C.Брауна и не нашёл там ответа решил попросить помощи.Дак скажите или нет в чём ошибка?

GSerg
Шаман
Шаман
 
Сообщения: 14286
Зарегистрирован: 14.12.2002 (Сб) 5:25
Откуда: Магадан

Сообщение GSerg » 30.07.2006 (Вс) 19:30

Переведи на русский язык подчёркнутое и пойми странность своего вопроса.
Как только вы переберёте все варианты решения и не найдёте нужного, тут же обнаружится решение, простое и очевидное для всех, кроме вас

xxxDemoNxxx
Начинающий
Начинающий
 
Сообщения: 16
Зарегистрирован: 20.06.2006 (Вт) 20:53

Сообщение xxxDemoNxxx » 30.07.2006 (Вс) 19:49

Чёт я ничего непонимаю)
Можешь обьяснить плз.

vvs_adm
Гуру
Гуру
Аватара пользователя
 
Сообщения: 1492
Зарегистрирован: 03.02.2005 (Чт) 3:45
Откуда: оттуда ;)

Сообщение vvs_adm » 30.07.2006 (Вс) 20:08

Код: Выделить всё
Private Sub Form_KeyDown(KeyCode As Integer, Shift As Integer)
    Debug.Print KeyCode
End Sub
Если это не поможет, то не поможет ничего ;)
Никогда не откладывай на завтра то, что можно ... отложить на послезавтра!

xxxDemoNxxx
Начинающий
Начинающий
 
Сообщения: 16
Зарегистрирован: 20.06.2006 (Вт) 20:53

Сообщение xxxDemoNxxx » 30.07.2006 (Вс) 20:48

Хм значит мне уже ни чё не поможет?:(
А напишите пожалуйста какой по идее должен был быть код
Я может пойму свою ошибку
Зарание спасибо.

vvs_adm
Гуру
Гуру
Аватара пользователя
 
Сообщения: 1492
Зарегистрирован: 03.02.2005 (Чт) 3:45
Откуда: оттуда ;)

Сообщение vvs_adm » 30.07.2006 (Вс) 20:55

Я тебе уже написал код, который должен быть. Понажимай клавиши и посмотри в окно Immediate. Если после того, что ты там увидишь, станет непонятно, то срочно учи английский язык, сможешь неплохо зарабатывать на переводе статей.
Никогда не откладывай на завтра то, что можно ... отложить на послезавтра!

xxxDemoNxxx
Начинающий
Начинающий
 
Сообщения: 16
Зарегистрирован: 20.06.2006 (Вт) 20:53

Сообщение xxxDemoNxxx » 30.07.2006 (Вс) 21:19

Private Sub Form_KeyDown(KeyCode(87 (&H57)) , Shift As Integer)
Timer1.Enabled = True
End Sub
так не получается как ещё то я ща умру!!
Мозги кипят!!!Не мучайте напишите код какой должен быть пожалуйста!

vvs_adm
Гуру
Гуру
Аватара пользователя
 
Сообщения: 1492
Зарегистрирован: 03.02.2005 (Чт) 3:45
Откуда: оттуда ;)

Сообщение vvs_adm » 30.07.2006 (Вс) 21:24

Код: Выделить всё
Private Sub Form_KeyDown(KeyCode As Integer, Shift As Integer)
    MsgBox "Нажата клавиша с кодом " & cstr(KeyCode)
End Sub
Если уж и это не поможет, то и это
vvs_adm писал(а):срочно учи английский язык, сможешь неплохо зарабатывать на переводе статей.
можешь не делать...
Никогда не откладывай на завтра то, что можно ... отложить на послезавтра!

GSerg
Шаман
Шаман
 
Сообщения: 14286
Зарегистрирован: 14.12.2002 (Сб) 5:25
Откуда: Магадан

Сообщение GSerg » 30.07.2006 (Вс) 21:24

xxxDemoNxxx писал(а):Я прочитал учебный курс C.Брауна

Правда?
Как только вы переберёте все варианты решения и не найдёте нужного, тут же обнаружится решение, простое и очевидное для всех, кроме вас

DirectXManiac
Продвинутый гуру
Продвинутый гуру
Аватара пользователя
 
Сообщения: 1543
Зарегистрирован: 03.11.2005 (Чт) 13:32
Откуда: из DirectX SDK

Сообщение DirectXManiac » 30.07.2006 (Вс) 21:42

В Object Browser впринципе не надо знать инглиш =)... Смотри vbKey... и все слова начинающиеся с этого, а внизу в окошке написано
vbKey0 = 48
=) Учись...
#define ROFL 0xDDDD

vvs_adm
Гуру
Гуру
Аватара пользователя
 
Сообщения: 1492
Зарегистрирован: 03.02.2005 (Чт) 3:45
Откуда: оттуда ;)

Сообщение vvs_adm » 30.07.2006 (Вс) 21:45

DirectXManiac писал(а):В Object Browser впринципе не надо знать инглиш =)... Смотри vbKey... и все слова начинающиеся с этого, а внизу в окошке написано
vbKey0 = 48
=) Учись...
При чем тут вообще инглиш?
Никогда не откладывай на завтра то, что можно ... отложить на послезавтра!

DirectXManiac
Продвинутый гуру
Продвинутый гуру
Аватара пользователя
 
Сообщения: 1543
Зарегистрирован: 03.11.2005 (Чт) 13:32
Откуда: из DirectX SDK

Сообщение DirectXManiac » 30.07.2006 (Вс) 22:16

vvs_adm
То то и оно что не причём :D
#define ROFL 0xDDDD

GB826
Постоялец
Постоялец
Аватара пользователя
 
Сообщения: 312
Зарегистрирован: 04.08.2005 (Чт) 0:58
Откуда: Планета #3

Сообщение GB826 » 31.07.2006 (Пн) 0:08

К сожалению, даже если автор перестанет похабить сгенеренный код, таймер не выключится :(

Честно думал, что модеры развлекаются, придумали дурацкий вопрос, и сами на него хохочат :о))
Пора уже всем хорошим людям собраться и убить всех плохих людей.


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

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

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

    TopList  
cron