按键精灵怎么输入固定几个数字

软件 2024-06-23

按键精灵怎么设置有输入固定字母加递增的数字（如A001.A002到A999到B001这样一直下去）？

/* 思路：两层循环嵌套，一层字母一层数字，拼接就可以了 */ arr = Array("A","B","C","D","E","F","G","H","I","J","K","L","M","N","O","P","Q","R","S","T","U","V","W","X","Y","Z")//声明字母的数组 For i = 0 To UBound(arr)//循环字母数组 For j = 1 To 999//嵌套循环数字 //数字不够三位用“0”补足 j_len = len(j)//得到数字的长度 If j_len < 3 Then l = 3 - j_len//缺少几个“0” For

怎么让按键精灵输入固定的数字

Dim 延时延时 = 100 Do KeyPress "1", 1 Delay 延时 KeyPress "2", 1 Delay 延时 KeyPress "3", 1 Delay 延时 KeyPress "7", 1 Delay 延时 KeyPress "8", 1 Delay 延时 KeyPress "9", 1 Delay 延时 Loop 这样的兼容性比较好，每按下一个数字的延时可以自己设定，只需修改第二行的数字即可修改所有延时。

按键精灵随机输入固定字母和数字6位

不用谢我我是雷锋

Sub随机数字()
Randomize
//随机0到9其中一个数字
数字=Int((10*Rnd)+0)
EndSub
Sub随机字母()
数字=1
While数字<65
Randomize
数字=Int((90*Rnd)+1)
Wend
数字=chr(数字)
EndSub
Call随机字母()
字符=字符&数字
Call随机数字()
字符=字符&数字
Call随机字母()
字符=字符&数字
Call随机数字()
字符=字符&数字
For2
Call随机字母()
字符=字符&数字
Next
MessageBox字符