Question

如何 编程 按键精灵 当鼠标手动点击某区域（一块很少的地方不是点）后 执行按键5

Answer 1

//设置你的某区域范围
//左，右，上，下
左 =0
右 =100
上 =0
下 = 100
Do
// 检测上次按过的鼠标键
Mouse=GetLastClick()

//把当前鼠标位置的x和y坐标放在变量mx和my中
GetCursorPos mx, my
TracePrint mx & "IIII" & my
// 设置条件：满足鼠标在指定区域 并且 按下了左键
If mx > 左 and mx< 右 and my > 上 and my < 下 and Mouse = 32769 Then
//执行按键5
KeyPress "5", 1

Delay 100
End If

Loop
达到你的要求。。
有问题在追加

追问

我是新手 比较笨 按照你说的 做到了  如果我想在一个脚本里实现多个线程 鼠标点击不同区域 自动执行不同按键呢

追答

同理啊

追问

你好！ 麻烦了 我按照 相同的方法再次编写 在一个脚本里 可只有第一段 按键被执行了 再往后鼠标点击其他位置 不执行 请问要加什么语句吗

追答

你的具体操作流程 我不清楚。

Answer 2

UserVar x=1350 "请输入右下角点x坐标"
UserVar y=1350 "请输入右下角点y坐标"
Rem b
GetCursorPos i, k
a = WaitClick()
If a = 32769 and i < x and k < y Then
Delay 100
KeyPress "5",1
End If
goto b

追问

按你说的  我点击F5处确实 实现自动点击5    可为什么 我再按照相同方法在一个脚本里继续编写 鼠标点击F6处 可还是5键 被执行呢 如图我想 实现鼠标点击五处 分别 按下不同的 数字键  再次十分感谢你的回答

追答

Rem a
a = WaitClick()
If a = 116 Then
Delay 100
KeyPress "5",1
End If
If a = 117 Then
Delay 100
KeyPress "6",1
End If
If a = 118 Then
Delay 100
KeyPress "7",1
End If
If a = 119 Then
Delay 100
KeyPress "8",1
End If
If a = 120 Then
Delay 100
KeyPress "9",1
End If
Goto a
不是鼠标点击的，不知道可以不。你按下F5脚本帮你按下5，你按下F6脚本帮你按下6，以此类推。

追问

还是十分感谢你的 回答 不过我只是想要鼠标点击的 万分感谢

追答

鼠标点击的也可以 不过需要你提供坐标才能写啊 你把你的那个几个区域坐标发过来呗

Answer 3

witkey加判断鼠标位置

Answer 4

很简单的 按键精灵 基础部分
MoveTo x,y
Delay 40
LeftClick 1