//随机密码大小写间隔5-15位随机字符串生成
Function 随机(个数)
For 个数/2+1
Randomize
a = (Mid("ABCDEFGHIJKLMNOPQRSTUVWXYZ", Int((26 - 0 + 1) * Rnd + 0), 1))
b = (Mid("abcdefghijklmnopqrstuvwxyz", Int((26 - 0 + 1) * Rnd + 0), 1))
c=c&a&b
Next
随机 = (Mid(c, 1, 个数))
End Function
TracePrint 随机(15)
//运行脚本开始检测A键是否被按，按了就自定义延时 依次按 C,D键
UserVar ys=1000 "延时"
Rem ks
Do
key = WaitKey
If key = 65 Then
Exit Do
End If
Delay 100
Loop
KeyPress "C", 1
Delay ys
KeyPress "D", 1
Delay ys
Goto ks
//变量str，少于5位，在前面用A补全5位
str = "bbb"
y = Len(str)
x = 5-y
z = "A"
For x
i=i+z
Next
d = i + str
TracePrint d