vb高手请进!!做个小按键模拟器。

来源:百度知道 编辑:UC知道 时间:2024/07/04 15:56:49
我想制VB按键小按键模拟器,来方便游戏的按键设置.
条件:
1.按健"1"的时候,过几秒在按“2”时在过几秒在按“3”在过几秒按6次“4”就行了。
2.设置个热键F10启动 F12停止
3.最小化/不是当前窗口 一样起效
只能用VB作要多少分开口,这个号上的都给也行。
1.目标输出"1"的时候,过几秒在向目标输出“2”时在过几秒在目标输出“3”在过几秒目标输出6次“4”就行了。

Dim a As Integer
Private Sub Form_KeyDown(KeyCode As Integer, Shift As Integer)
If KeyCode = vbKeyF10 Then a = 1
If KeyCode = vbKey1 Then Timer1.Enabled = True
If KeyCode = vbKeyF12 Then a = 2
End Sub

Private Sub Form_Load()
Form1.KeyPreview = True
Timer1.Interval = 2000
Timer2.Interval = 2000
Timer3.Interval = 2000
Timer4.Interval = 2000
End Sub

Private Sub Timer1_Timer()
If a = 1 Then
SendKeys "{2}"
Timer2.Enabled = True
Timer1.Enabled = False
End If
End Sub

Private Sub Timer2_Timer()
SendKeys "{3}"
Timer3.Enabled = True
Timer2.Enabled = False
End Sub

Private Sub Timer3_Timer()
SendKeys "{4 6}"
Timer3.Enabled = False
End Sub

Private Sub Timer4_Timer()
Form1.SetFocus
End Sub

.按健"1"的时候,过几秒在按“2”时在过几秒在按“3”在过几秒按6次“4”就行了。
功能没看明白
说具体点