按键精灵全局变量发生改变后怎样传递到子程序

DimEnv x,y
X = 840
Y = 375
MoveTo X, Y
线程ID1 = BeginThread(线程)
Do
Delay 1000
FindPic 652, 300, 865, 438, "Attachment:\11.bmp", 0.9, intX, intY
//再次赋值试试
x=intx:y=inty
MoveTo X, Y
loop
Sub 线程
Do
MoveTo X, Y
Delay 300
Loop
End Sub

环境变量不能在子程序和线程间传递，线程和线程间可以传递，线程和主进程间可以传递，比方说你要用线程实时获取人物的坐标，得到的参数别的线程可以用，主进程可以用，但是子程序却用不了

主线程。。。
线程ID1 = BeginThread(线程)
Thread.SetShareVar("x",x)
.......
Sub 线程
Dim x = Thread.GetShareVar("x")
TracePrint "当前共享变量值为" & x
End Sub

你还得定义找到后的坐标不然怎么传递

用环境变量