按键精灵简单教程

关于按键精灵9.0对于批量工作速度的快速提升

首先这是一个非常简单好用的工具。

新建输入文件名，写代码，点调试，按启动热键启动。

PS：关于录制，不是很好用，有兴趣也可以试试。

修改小数位：

修改小数位，先想想自己手动操作是怎么做的，每一步要做什么。1.双击位号。2弹出位号窗口。3点高级。4如果小数位前的钩没打上，你要打上，已经打上了就不能再点击，所以要判断。5双击整数位，输入数字比如3。6双击小数位，输入数字比如2。

如上所述要点4个点。但这里我要加一个点用于判断窗口有无弹出。先打开抓抓，按电脑截屏键（PrtSc）。

在抓抓中点图像，可以按1~0，这里捉到的点和

有关联，写到代码里后和代码里的是没有关联的。

鼠标移到需要点击的地方，右键点击选择加入到点”1”，点”2”.....

在这条线上取它的位置和颜色值，加入1号点在按钮上取2号点在钩的

位取3号点加入4号点加入5号点

------------------------------------------------------割------------------------------------------------------------- 选择

代码中先加入Delay 10 延时10毫秒

将放大镜中的1号点中的值写入IfColor 中

Do while 1

IfColor 392,357, "A0A0A0", 0 Then

//这里写内容

Exit Do

End If

Loop

这里可以选择，就是IFCOLOR命令。不过上面选了P３，下面也要记得选P3！

上面的是为了判断双击后的窗口是否弹出，弹出后我们才好进行下面的操作（当然也可以用别的方法）（代码原理：用永循环去）

------------------------------------------------------割-------------------------------------------------------------

MoveTo 805, 528

LeftClick 1//点高级所在的位置

Delay 20//延时20毫秒（很重要）

------------------------------------------------------割-------------------------------------------------------------

同理将第三点写入IfColor 805, 528, "FFFFFF", 0 Then

IfColor 806, 530, "FFFFFF", 0 Then //如果805，528为白色，也就是没打勾

MoveTo 806, 530

LeftClick 1//打上勾

Delay 20//延时20毫秒

END IF

------------------------------------------------------割-------------------------------------------------------------

MoveTo 886，500//点整数位所在的位置

LeftDoubleClick 1//双击，相当于是全选中

KeyPress "3", 1//输入3

同样第五点也用上面的方法加入

MoveTo 976, 700 //鼠标移动到976, 700

LeftDoubleClick 1 //左键双击，、

KeyPress "2", 1 //按2

KeyPress "Enter", 1 //按回车，确定

以下是完整代码

LeftDoubleClick 1 双击你鼠标所在的位置

Do while 1 永循环

IfColor 392, 357, "A0A0A0", 0 Then (判断窗口是否打开)x,y,”颜色”，0（等于）MoveTo 854, 427 鼠标移动，左键单击（点高级的位置）

LeftClick 1

Delay 20 延时（点高级后要延时，等延伸窗体出现）IfColor 806,530, "FFFFFF", 0 Then 判断小数位是否有打勾

MoveTo 806, 530 如果806, 530 点的颜色不是"FFFFFF"

LeftClick 1 点击806, 530

End If

MoveTo 886, 500 鼠标移到866, 500（整数位）

LeftDoubleClick 1 左键双击（相当于全选内容）

KeyPress "3", 1 输入3

Delay 20

MoveTo 887, 527 鼠标移到887, 527（小数位）

LeftDoubleClick 1

KeyPress "2", 1

Delay 10

KeyPress "Enter", 1 按回车，确定

Exit Do 跳出循环

End if

Loop

丰富的插件，大家可以用用。

利用按键精灵工作，他的工作方式就是控制你的鼠标与键盘，不需要你手动工作，或只需要你按下快捷键，就能按照你设计好的步骤，操作鼠标与键盘进行工作。

单击“新建”，进入编辑脚本页面

例1；在那次出差，图纸已经用PIMS画好，但是位号在对方公司例如：II-12345-123;

但是在PIMS上使用的必须是下划线II_12345_123。在这种情况下，无论是照着手动输入，还是复制过来，把”-”改成”_”都将极大降低了工作效率，浪费工作时间。所以，我用到了按键精灵。

代码如下，附解释：

//手动选中要复制的位号，按下设置好的快捷键；

KeyDown 17, 1 //按下Ctrl键

KeyPress 67, 1 //单击键盘”C”

KeyUp 17, 1 //松开Ctrl键

txt = ""

i=0

Clipboard = Plugin.Sys.GetCLB() //获取剪贴板中的值，赋值到Clipboard

L= len(Clipboard) //获取Clipboard 的长度

For L //循环L次

i = i + 1

If Mid(Clipboard,i,1)="-" then

txt = txt + "_" //遇到”-”时替换”_”

Else

txt=txt+Mid(Clipboard,i,1) //其他的照常

End If

Next

Call Plugin.Sys.SetCLB(txt) //将修改好的txt设置回剪贴板

根据代码与解释，我们很容易看懂这段代码，很简单，意思就是将”-”替换成”_”，只要选对地方粘贴就可以了。

同理，除了”-”我们还可以改”.”，”@”，”%”，”?”等。

例2；取引号里的位号，val=1，xx=”II_12345.Value”，alignment=center；比如这一串字符串在一个单元格中，用鼠标去选取，选中引号内，在拖满一个位号，在复制是不是很慢。用到案件精灵，只需要选中这个单元格按下快捷键就可以了。

代码如下，附解释：

//选中单元格内容，有鼠标选中，或者键盘选中，这里是键盘选中，有些计算机上可能无法成功选中。

KeyPress "End", 1 //单击键盘End键，至尾KeyDown 16, 1 //按下键盘Shift键

KeyPress 36, 1 //单击键盘Home键，至首KeyUp 16, 1 //松开键盘Shift键

KeyDown 17, 1

KeyPress 67, 1

KeyUp 17, 1 //复制

Clipboard = Plugin.Sys.GetCLB() //获取剪贴板的内容到Clipboard MyLen = len(Clipboard) //Clipboard 的长度

t = 0

flag=False

txt = ""