vb.net - GetAysncKeyState 小写

Question

我已经声明了函数

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

但是像这样的代码

If GetAsyncKeyState(100) then
'do something
End

不起作用[它曾经-.-]。但是用“Keys.D”替换 100 会。这留下了仅限于大写字母的问题。

有没有办法让 Keys.a（小写）或在 GetAsyncKeyState 中使用 ascii 代码？

提前致谢。

Answer 1

100（十进制）是VK_NUMPAD4 (0x64)？

如果要检测小写字母，则需要检查VK_CAPITAL&的状态VK_SHIFT。