该专栏包含的脚本都需要先安装 按键精灵。
实现对指定区域进行自动截图
Dim i
For i=1 To 109
MoveTo 1886,584 //将鼠标移动到指定区域 长,宽
LeftClick 1
KeyDown "Ctrl",1
KeyDown "alt",1
KeyDown "a",1
KeyUp "Ctrl",1
KeyUp "alt",1
KeyUp "a",1
'==========框选==========
MoveTo 357, 144
Delay 1000
LeftDown 1
MoveTo 1559, 980
Delay 2100
LeftUp 1
'========================
KeyDown "Ctrl",1
KeyDown "s",1
KeyUp "Ctrl",1
KeyUp "s", 1
Delay 2000
//TracePrint "chenlin_intestine_" & i
SayString "photo_" & i
KeyPress "enter", 1
Delay 1000
Next