按键精灵多线程问题请教

2025-03-10 08:13:48
推荐回答(1个)
回答1:

代码如下 自己理解试试

do
    a=BeginThread(过程名)
    Call 过程名0()
loop
Sub 过程名()
    SayString "a"
End Sub
Sub 过程名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 If
End Sub