一下子发太快了，有时会反应不过来，在二个语句之间加上SLEEP来延时就OK。
Private Declare Sub Sleep Lib "kernel32" (ByVal dwMilliseconds As Long)
Call keybd_event(54, 0, 0, 0)
Call keybd_event(54, 0, KEYEVENTF_KEYUP, 0)
Sleep(50)
Call keybd_event(54, 0, 0, 0)
Call keybd_event(54, 0, KEYEVENTF_KEYUP, 0)
内容全部来源于网络收集，如有侵权，请联系网站删除：QQ：24596024