03.获取鼠标位置

Dim objPoint,iRet  

iRet =Dialog.MsgBox("请将鼠标移到相应的位置","Laiye Automation",0,1,0)

Delay(3000)

objPoint=Mouse.GetPos()

TracePrint(objPoint["x"]&";"&objPoint["y"])

Clipboard.SetText(objPoint["x"]&";"&objPoint["y"])