急!!急!!VB中KeyPress的问题!!

来源:百度知道 编辑:UC知道 时间:2024/09/28 10:02:48
VB中如果要让按下Up键的效果与按下W键的效果用:
Private Sub Form_KeyPress(KeyAscii As Integer)
If KeyAscii = 38 Then
SendKeys "W"
End If
End Sub
为什么不行????
顺便问一下怎么让这种操作在任何窗口中都有效????
打错字了,那句应该是:
“VB中如果要让按下Up键的效果与按下W键的效果相同用:......”

我在编程时尽量不用keypress命令
因为它的限制比较高,
我按照你说的使用的是keydown
private sub form_keydown(keycode as integer,shift as integer)
if keycode=vbkeyup then
sendkeys\"W\"
end if
end sub
记得要把form属性中的keypreview 改成True
你试下吧!!!