Question

VB 中的 GetAsyncKeyState( ？) 问号等于什麻是回车换行？

Answer 1

GetAsyncKeyState

VB声明
Declare Function GetAsyncKeyState Lib "user32" Alias "GetAsyncKeyState" (ByVal vKey As Long) As Integer
说明
判断函数调用时指定虚拟键的状态
返回值
Long，自对GetAsyncKeyState函数的上一次调用以来，如键已被按过，则位0设为1；否则设为0。如键目前处于按下状态，则位15设为1；如抬起，则为0。微软的win32手册指出：倘若输入焦点从属于与调用函数的输入线程不同的另一个输入线程，则返回值为0（例如，一旦另一个程序拥有焦点，则它应返回零）。证据显示，函数实际是在整个系统的范围内工作的
参数表
参数 类型及说明
vKey Long，欲测试的虚拟键的键码
注解
如指定了VK_LBUTTON 或 VK_RBUTTON，按钮的状态就会根据实际的按钮报告——无论是否曾用SwapMouseButton函数对鼠标的位置进行了交换。win32提供了额外的一些虚拟键码，比如VK_LSHIFT 和 VK_RSHIFT，以便在两个完全一样的键中区分出左右（也包括Ctrl 和 Alt）

是判断键盘上按键的状态的!可以来做热键

追问

我的天啊呀呀，这么多，可对我没有用！
我问的是GetAsyncKeyState( ？)括号中的数字是几的时候 它可以判断你按了回车？
if GetAsyncKeyState( ？) then
print"hai 我想打打劫，把冥币交出来！！"
end if

追答

Private Declare Function GetAsyncKeyState Lib "user32" (ByVal vKey As Long) As Integer
Private Const VK_RETURN As Long = &HD

Private Sub Form_Load()
Timer1.Interval = 400
End Sub

Private Sub Timer1_Timer()
If GetAsyncKeyState(VK_RETURN) = 1 Then
Print "You” enter“ the execution"
Else
Exit Sub
End If
End Sub
'加个timer控件

只是判断

Answer 2

是vbKeyReturn