想让按键精灵每次循环输入不同的输入框内容

Question

Dim intX,intY,a
a = ReadUIConfig("输入框1")
TracePrint SetDictEx(0, "Attachment:1.txt")
TracePrint UseDict(0)
Do
FindStr(154,67,183,83,"搜索","ABABAB-202020",0.9,intX,intY)
If intX > -1 And intY > -1 Then
Tap intX, intY
Delay 1000
InputText a
Delay 1000
End If
Loop

想让每次循环输入不同的输入框内容
比如 第一次循环 时候输入 输入框1的内容 第二次循环时输入 输入框2的内容

Answer 1

dp=0

do
loop
里面加个判断pd
if pd >0
输入 框2
pd=pd-1
else
输入框1
pd=pd+1
end if
反复的 pd+1，-1。结果PD是0，1，0，0，1，0，1