关于绵竹易语言小程序源码的信息
本文目录一览:
请人用易语言帮忙做个小程序,要源码
程序代码
{
.版本 2
.支持库 shellEx
.支持库 eAPI
.程序集 窗口程序集1
.程序集变量 热键句柄, 整数型
.程序集变量 计次, 整数型
.子程序 __启动窗口_创建完毕
热键句柄 = 注册热键 (取窗口句柄 (), 标签1.取窗口句柄 (), 0, #F10键)
.子程序 _时钟1_周期事件
.局部变量 数字, 文本型
.局部变量 计次B, 整数型
计次 = 计次 + 1
模拟按键 (#A键, #键2, #空格键)
.计次循环首 (取文本长度 (到文本 (计次)), 计次B)
数字 = 取文本中间 (到文本 (计次), 计次B, 1)
.如果真 (数字 = “0”)
模拟按键 (#键0, , )
.如果真结束
.如果真 (数字 = “1”)
模拟按键 (#键1, , )
.如果真结束
.如果真 (数字 = “2”)
模拟按键 (#键2, , )
.如果真结束
.如果真 (数字 = “3”)
模拟按键 (#键3, , )
.如果真结束
.如果真 (数字 = “4”)
模拟按键 (#键4, , )
.如果真结束
.如果真 (数字 = “5”)
模拟按键 (#键5, , )
.如果真结束
.如果真 (数字 = “6”)
模拟按键 (#键6, , )
.如果真结束
.如果真 (数字 = “7”)
模拟按键 (#键7, , )
.如果真结束
.如果真 (数字 = “8”)
模拟按键 (#键8, , )
.如果真结束
.如果真 (数字 = “9”)
模拟按键 (#键9, , )
.如果真结束
.计次循环尾 ()
模拟按键 (#回车键, , )
标题 = 到文本 (计次)
.如果真 (计次 = 10)
_标签1_反馈事件 (0, 0)
.如果真结束
.子程序 _标签1_反馈事件, 整数型
.参数 参数一, 整数型
.参数 参数二, 整数型
.如果 (时钟1.时钟周期 = 0)
时钟1.时钟周期 = 1000
标签1.标题 = “已开启”
.否则
时钟1.时钟周期 = 0
标签1.标题 = “已关闭”
标题 = “已关闭”
.如果结束
.子程序 __启动窗口_将被销毁
撤销热键 (取窗口句柄 (), 热键句柄)
}END
控件就俩 一个时钟 一个标签
不用其他设置 想测试稳定性你就打开笔记本 代码里的时钟周期设置为 =1
速度高 稳定性强 代码也简便
如果还有什么请百度HI
----------------------
补充一下 如果你想控制次数的话 就在时钟周期子程序里加个代码
补充代码{
.如果真 (计次 = 100000)‘这个100000是你所限制的次数
_标签1_反馈事件 (0,0)
}
我用易语言写了一个post登陆的小程序 然后把小程序的代码放到大程序源码里面 小程序可以post登陆
因为易语言中的窗口和窗口程序集是一一对应的,当进行复制操作时,有些命令前需要加上“窗口1.”,比如:原代码是“编辑框1.内容=账号”,转移后,可能要根据实际情况改为“窗口1.编辑框1.内容=账号”
检查一下看看是不是哪个细节给忽略了!
求易语言小程序源码
建议楼主好好的学习下易语言,多加几个时钟周期 加个判断就不会出你说的问题了。