VB鼠标按键精灵（VB模拟出的按键精灵大部分功能）(Private Declare Sub keybd_event Lib "user32" (ByVal bVk As Byte, ByVal bScan As Byte, ByVal dwFlags As Long, ByVal dwExtraInfo As Long) Private Declare Sub mouse_event Lib "user32" (ByVal dwFlags As Long