你可以通过按键状态判断某个键是否按下例如:判断按下A 就这样写Dim keyResult as Integer keyResult=GetAsyncKeyState(ASC("A"))if keyResult=-32767 then msgbox "按下" & "A" & "键."A ->65 B->66..............依此类推