名称 = 24
do
Call Plugin.Pic.PrintScreen(0, 0, 1024, 768, "C:\"&名称&".bmp")
名称 = 名称 + 1
Delay 1000
Loop until(名称 = 802)
复制上面的代码到按键精灵调试即可,文件的保存路径你自行修改,效果图如下:
i = 24
Do until i=802
Call Plugin.Pic.PrintScreen(0, 0, 1024, 768, "E:\a.bmp")
Delay 100
Call Plugin.File.ReNameFile("E:\a.bmp", "E:\" & i & ".bmp")
i=i+1
Loop
有什么弄不明白的请追问,或者企鹅378144939
i=1
While i<1001
Delay 100
TracePrint i
SayString i
i = i + 1
Delay 100
wend
没明白什么意思