Visual Basic, .NET, ASP, VBScript
Новости | Примеры | Библиотека кодов | НеЧаВо | VBA | Справочник по VB | Справочник по WinAPI | ActiveX контролы | Статьи по VB | Мастерская разработчика | Форум VBNet | Яndex bar! | Голосование | Полезные программы | Магазин VBNet | Рассылка | Конкурсы | Юмор | Чат | Реклама на VBNet | Автора! | Ссылки | Бета-тестирование | Послать пример на сайт
 

   
   
     

Форум - Общий форум

Страница: 1 |

 

  Вопрос: Клавиатура... Добавлено: 13.01.09 21:03  

Автор вопроса:  $@ny@PG | ICQ: 468469477 
А можно ли перехватить нажатие клавиш клавиатуры?

Ответить

  Ответы Всего ответов: 4  

Номер ответа: 1
Автор ответа:
 Alex



Вопросов: 10
Ответов: 131
  Профиль | | #1 Добавлено: 13.01.09 22:10
конечно можно

Ответить

Номер ответа: 2
Автор ответа:
 @lex



Вопросов: 14
Ответов: 262
  Профиль | | #2 Добавлено: 14.01.09 00:48
  1. Private Declare Function GetAsyncKeyState Lib "user32" Alias "GetAsyncKeyState" (ByVal vKey As Long) As Integer

vKey - клавиша) Возвращает < 0 (точно не помню) если нажата:)

Ответить

Номер ответа: 3
Автор ответа:
 Ra$cal



ICQ: 8068014 

Вопросов: 18
Ответов: 817
  Web-сайт: www.rascalspb.narod.ru
 Профиль | | #3 		Добавлено: 14.01.09 08:46
@lex
представляю зрелище - или пара страниц ГетАсинкКеев, или цикл с массивом кейкодов. Для перехвата кнопок специально придуманы хуки клавиатурные и мышиные.

Ответить

Номер ответа: 4
Автор ответа:
 Imperial Kashak



ICQ: 479713821 

Вопросов: 10
Ответов: 57
  Профиль | | #4 Добавлено: 21.01.09 20:01
Не усложняйте жизнь человеку ))
  1. Private Sub Form_KeyPress(KeyAscii As Integer)
  2. If KeyAscii = 13 Then MsgBox ("wqewqeqw") 'тут главное ASCII коды и уже хорошо
  3. End Sub


Просто прописать кнопочки, которые нужны. А если надо все - то тут или потрудиться массив набить, или воспользоваться чужим трудом.

Ответить

Страница: 1 |

Поиск по форуму



© Copyright 2002-2011 VBNet.RU | Пишите нам