1. 用vb写程序,怎么才能实现键盘快捷输入啊(不影响输入法) 比如,在键盘上按一个键F1
加入控件,直接复制!!
"User32"(ByValVkeyAsLong)AsInteger
PrivateFunctionMyHotKey(vKeyCode)AsBoolean
MyHotKey=GetAsyncKeyState(vKeyCode)<0
EndFunction
PrivateSubForm_Load()
Timer1.Interval=1
Timer2.Interval=300
EndSub
PrivateSubTimer1_Timer()
IfMyHotKey(113)Then'113是F2
SendKeys"这是VB快捷输入设置!"
Timer1.Enabled=False
Timer2.Enabled=True
EndIf
EndSub
PrivateSubTimer2_Timer()
Timer1=True
Timer2=False
EndSub