Dim intX,intY
Function 确定()
Tap 404, 456
End Function
Do Until 确定()
FindMultiColor 327,431,479,469,"FFFFFF","3|-4|C58B54,3|8|D4B7A4",0,0.9,intX,intY
If intX > -1 And intY > -1 Then
Exit Do
Else
Tap 504, 456
Delay 100
End If
Loop
为什么要弄成函数呢?我觉得弄成SUB子程序会更好点