代码如下 自己理解试试
do a=BeginThread(过程名) Call 过程名0()loopSub 过程名() SayString "a"End SubSub 过程名0() Delay 100 FindPic 0,0,1024,768,"Attachment:\神盾.bmp",0.9,intX,intY If intX > 0 And intY > 0 Then MoveTo intX,intY LeftClick 1 End IfEnd Sub