易语言制作三句话的刷屏器源码(详细点)
就是输入第一句、第二句、第三句。然后点击开始后分别刷屏第一句、第二句、第三句这样循坏。对了,还有要能设置速度的。...
就是输入第一句、第二句、第三句。然后点击开始后分别刷屏第一句、第二句、第三句这样循坏。对了,还有要能设置速度的。
展开
2个回答
2014-05-31
展开全部
.版本 2
.支持库 eAPI
.程序集 窗口程序集1
.子程序 _时钟1_周期事件
置剪辑板文本 (编辑框1.内容)
模拟按键 (#Ctrl键, #V键, )
模拟按键 (#回车键, , )
延时 (1000) ' 第一句话发送后停留时间,可自定义
置剪辑板文本 (编辑框2.内容)
模拟按键 (#Ctrl键, #V键, )
模拟按键 (#回车键, , )
延时 (1000)
置剪辑板文本 (编辑框3.内容)
模拟按键 (#Ctrl键, #V键, )
模拟按键 (#回车键, , )
延时 (1000)
.子程序 _按钮1_被单击
开始 ()
.子程序 开始
.如果真 (按钮1.标题 = “开始”)
时钟1.时钟周期 = 到数值 (编辑框4.内容) ' 编辑框4设置时间
按钮1.标题 = “停止”
返回 ()
.如果真结束
.如果真 (按钮1.标题 = “停止”)
时钟1.时钟周期 = 0
按钮1.标题 = “开始”
返回 ()
.如果真结束
超级模块有监视热键的命令 记住按钮标题为 开始 哦 启动窗口启动 监视热键 (&开始, #F1键)
.支持库 eAPI
.程序集 窗口程序集1
.子程序 _时钟1_周期事件
置剪辑板文本 (编辑框1.内容)
模拟按键 (#Ctrl键, #V键, )
模拟按键 (#回车键, , )
延时 (1000) ' 第一句话发送后停留时间,可自定义
置剪辑板文本 (编辑框2.内容)
模拟按键 (#Ctrl键, #V键, )
模拟按键 (#回车键, , )
延时 (1000)
置剪辑板文本 (编辑框3.内容)
模拟按键 (#Ctrl键, #V键, )
模拟按键 (#回车键, , )
延时 (1000)
.子程序 _按钮1_被单击
开始 ()
.子程序 开始
.如果真 (按钮1.标题 = “开始”)
时钟1.时钟周期 = 到数值 (编辑框4.内容) ' 编辑框4设置时间
按钮1.标题 = “停止”
返回 ()
.如果真结束
.如果真 (按钮1.标题 = “停止”)
时钟1.时钟周期 = 0
按钮1.标题 = “开始”
返回 ()
.如果真结束
超级模块有监视热键的命令 记住按钮标题为 开始 哦 启动窗口启动 监视热键 (&开始, #F1键)
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询
广告 您可能关注的内容 |