GetAysncKeyState строчные

Question

Я объявил функцию

Public Declare Function GetAsyncKeyState Lib "user32" (ByVal vkey As Int32) As Integer

Но такой код, как

If GetAsyncKeyState(100) then
'do something
End

Не будет работать [Раньше -.-]. Однако замена 100 с «Keys.D» будет. Что оставляет проблему ограничения заглавными буквами.

Есть ли способ получить Keys.a (в нижнем регистре) или способ использовать коды ascii в GetAsyncKeyState?

Заранее спасибо.

Answer 1

100 (десятичное число) равно VK_NUMPAD4 (0x64)?

Если вы хотите обнаружить строчные буквы, вам нужно проверить состояние VK_CAPITAL & VK_SHIFT.