先给X,Y赋值。假如:
x=100
y=100
GetCursorPos a, b//获取当前鼠标位置,返回变量a,b
If a = x and b = y Then
//这里添加文本输入的代码
Else
MessageBox "鼠标位置不对"
MoveTo x, y//鼠标移动到坐标100,100
End If
有点不明白你为什么不直接鼠标移动到预定坐标然后执行文本输入。。。
x = 100
y = 200
GetCursorPos x1, y1
If x1 = x and y1 = y Then
SayString "文字输入"
Else
MessageBox "出错了"
MoveTo x, y
End If
Rem start
GetCursorPos mx, my
If mx = x and my= y Then
MessageBox mx
End If
Goto start
Rem start
Key = WaitKey()
If key = 13 Then
MoveTo x,y
End If
Goto start
单个的执行可以,在一起不知道为什么不对了