如何让按键精灵自动输入文档内的文本
1个回答
展开全部
帮你写好啦,直接copy上去运行即可,表太谢我~
=======================================
//读取txt
word
=
Plugin.File.ReadFileEx("C:\1.txt")
//分割为行
Dim
hang
hang
=
split(hang,
"|")
//循环打出每一行
For
i
=
0
To
UBound(hang)
SayString
hang(i)
Delay
900
KeyPress
"Tab",
1
Delay
500
//暂停,任意键继续
WaitKey
Next
=======================================
基本注释已经写好,还有不懂得追问我吧
希望对你有帮助!
=======================================
//读取txt
word
=
Plugin.File.ReadFileEx("C:\1.txt")
//分割为行
Dim
hang
hang
=
split(hang,
"|")
//循环打出每一行
For
i
=
0
To
UBound(hang)
SayString
hang(i)
Delay
900
KeyPress
"Tab",
1
Delay
500
//暂停,任意键继续
WaitKey
Next
=======================================
基本注释已经写好,还有不懂得追问我吧
希望对你有帮助!
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询