请问:我想用vb写一个小游戏!请问如何用wasd和箭头控制上下移动!谢谢你
Private Sub Form_KeyDown(KeyCode为整数,Shift为整数)
选择案例键码
案例vbKeyUp
MsgBox“向上”
Case vbKeyDown
MsgBox“向下”
案例vbKeyLeft
MsgBox“左”
案例vbKeyRight
MsgBox“右”
其他情况
MsgBox键码& amp空间(5)& amp;Chr(键码)
结束选择
末端接头
或者
私有子窗体_按键(KeyAscii为整数)
MsgBox Chr(KeyAscii)
末端接头
私有子窗体_Load()
我。KeyPreview = True
末端接头