我想用易语言编一个自动输入的程序 20

先编写个程序,里面有一个输入框,将文字打进去后,按一个快捷键,就可以自动重复复制和回车这两个命令。如在框内输入易语言,按f2后开始运行,一直重复易语言(回车)易语言(回车... 先编写个程序,里面有一个输入框,将文字打进去后,按一个快捷键,就可以自动重复复制和回车这两个命令。如在框内输入易语言,按f2后开始运行,一直重复易语言(回车)易语言(回车)(回车代表自动按一次回车)

各位大侠,能实现吗,应该不难吧,麻烦帮我写出来
展开
 我来答
1018438419
2012-05-26 · TA获得超过702个赞
知道小有建树答主
回答量:760
采纳率:0%
帮助的人:278万
展开全部
.版本 2

.子程序 输入
.局部变量 对象, 对象
.局部变量 计次, 整数型
.局部变量 数据, 文本型
.局部变量 键名, 文本型

对象.创建 (“WScript.Shell”, )
数据 = 取剪辑板文本 ()
.计次循环首 (取文本长度 (数据), 计次)
键名 = 取文本中间 (数据, 计次, 1)
.如果真 (键名 = “~”)
对象.方法 (“SendKeys”, “+`”)
到循环尾 ()
.如果真结束
.如果真 (键名 = “%”)
对象.方法 (“SendKeys”, “+5”)
到循环尾 ()
.如果真结束
.如果真 (键名 = “^”)
对象.方法 (“SendKeys”, “+6”)
到循环尾 ()
.如果真结束
.如果真 (键名 = “(”)
对象.方法 (“SendKeys”, “+9”)
到循环尾 ()
.如果真结束
.如果真 (键名 = “)”)
对象.方法 (“SendKeys”, “+0”)
到循环尾 ()
.如果真结束
.如果真 (键名 = “+”)
对象.方法 (“SendKeys”, “+=”)
到循环尾 ()
.如果真结束
.如果真 (键名 = “{”)
对象.方法 (“SendKeys”, “+[”)
到循环尾 ()
.如果真结束
.如果真 (键名 = “}”)
对象.方法 (“SendKeys”, “+]”)
到循环尾 ()
.如果真结束
对象.方法 (“SendKeys”, 键名)
.计次循环尾 ()
这个不用复制,写上内容直接发送到窗口
已赞过 已踩过<
你对这个回答的评价是?
评论 收起
二次元老友BI
2012-05-23 · 超过23用户采纳过TA的回答
知道答主
回答量:142
采纳率:0%
帮助的人:62.7万
展开全部
先注册热键(取启动窗口句柄(),标签1.取句柄(),#F2键)再复制文本编辑框内容
已赞过 已踩过<
你对这个回答的评价是?
评论 收起
s780206546
2012-05-29
知道答主
回答量:20
采纳率:0%
帮助的人:6万
展开全部
时钟周期事件,好多时间后编辑框的内容就等于好多
已赞过 已踩过<
你对这个回答的评价是?
评论 收起
匿名用户
2012-05-24
展开全部
我不行
已赞过 已踩过<
你对这个回答的评价是?
评论 收起
yunluyangguang
2012-05-23 · 超过30用户采纳过TA的回答
知道答主
回答量:256
采纳率:0%
帮助的人:153万
展开全部
等待高人吧
已赞过 已踩过<
你对这个回答的评价是?
评论 收起
收起 3条折叠回答
推荐律师服务: 若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询

为你推荐:

下载百度知道APP,抢鲜体验
使用百度知道APP,立即抢鲜体验。你的手机镜头里或许有别人想知道的答案。
扫描二维码下载
×

类别

我们会通过消息、邮箱等方式尽快将举报结果通知您。

说明

0/200

提交
取消

辅 助

模 式