按键精灵如何制作按一个键等于按顺序按好几个键一次(非循环,一次就行)?

2024-11-10 16:14:20
推荐回答(3个)
回答1:

a = WaitKey()
If a = 88 Then
KeyPress "D", 1
Delay 10
KeyPress "D", 1
Delay 10
KeyPress "J", 1
Delay 10
KeyPress "E", 1
Delay 10
KeyPress "J", 1
Delay 10
KeyPress "I", 1
Delay 10
KeyPress "J", 1
End If

回答2:

如果你加载了大漠的话就使用这个吧:
Do
key = WaitKey()
If key = 123 Then
dm.KeyPressStr "d,d,j,e,j,i,j",10
End If
Loop
这个无限循环呢就是你每次按F12就会启用一次

回答3:

楼下的代码写的很对,不知你有按键精灵吗,还是需要按键精灵压缩出来的可执行文件,如果是后者,留个邮箱,给你发文件,可以直接使用了