请高手帮忙,键盘事件?

Question

以下代码可以运行, 
Private   Sub   Form_KeyDown(KeyCode   As   Integer,   shift   As   Integer) 
                    If   KeyCode   =   vbKeyW   +   vbKeyAlt   Then 
                                    MsgBox   "F5       按下" 
                    End   If 
    End   Sub 
        
    Private   Sub   Form_Load() 
                    Me.KeyPreview   =   True 
    End   Sub 
但是加了   "+   vbKeyShift   "以后,按住这   "Shift+Alt+W"   三个键,程序没反应.请高手帮忙,兄弟在此先谢谢了! 

Answer 1

If       KeyCode       =       vbKeyW       +       vbKeyAlt       Then   
==>
if keycode=vbkeyw  and shift=6 then

Answer 2

谢谢小刀剜心仁兄,你说的我试过了,还是不行,可能是我没表达清楚吧,我的意思是:同时按下"Alt+Shift+W"这三个键用来替换"Command" 这个按钮.能不能有其它什么方法,谢谢!

Answer 3

If KeyCode = vbKeyW And Shift = 5 Then MsgBox "press"

Answer 4

我搞错了 alt=4 shift=1 ctrl=2
所以 (alt or shift)应该等于5

Answer 5

我记得以前用过sendkeys，不知道行不行