易语言时尚编程100例.txt如果你同时爱几个人，说明你年轻；如果你只爱一个人，那么，你已经老了；如果你谁也不爱，你已获得重生。积极的人一定有一个坚持的习惯。易语言时尚编程100例
（一）例程名称：计算编辑框的输入内容的长度
设立本100例教程的目的：把易语言现有的例程都学习一遍，以达到共同脱菜的目的。
★、例程来源。
㈠、例程名称：计算编辑框的输入内容的长度（暂名）
㈡、下载地址：
㈢、作者：（暂不详）
★、例程详解。
不知程序作者是谁？该程序作者或提问者为什么要做该例程？有什么作用？有知道者请跟贴。我在编辑时修改。
该例程只有一个子程序，该子程序只有一行执行代码，程序如下：
子程序：_编辑框1_内容被改变
标签1.标题＝到文本(取文本长度(编辑框1.内容))
编程大概思路：
㈠、确定用什么样的子程序，包括确定用什么控件来发送指令（事件驱动承担者），什么控件用来传递指令，什么控件用来执行指令，什么控件用来反馈指令。
⑴、确定发送指令控件。比如用按钮作为事件驱动（发送指令）承担者，则程序大概是：
子程序：_按钮1_被单击
标签1.标题＝到文本(取文本长度(编辑框1.内容))
当然，如果想使编辑框在输入文本时即时显示文本长度，就要用到编辑框本身的事件，如本程序的第一种子程序，即子程序：_编辑框1_内容被改变，通过在编辑框输入信息来发送指令。
⑵、确定传递、执行或反馈指令控件。如果我们用信息框来执行或反馈指令，则程序大概类似下面为好：
子程序：_按钮1_被单击
信息框("你输入的文本长度是："＋到文本(取文本长度(编辑框1.内容))
0
)
思考：如果想做到按"enter"时就弹出该信息框，应怎样做？
㈡、"计算编辑框的输入内容的长度"也即是确定编辑框的某个属性值，那么我们就重点查编辑框的有关属性、方法和事件及易语言系统有关的命令，看有哪些在本例程中用得上。还是比较难呢。
交流附件上传地址：www.91asp/
（二）例程名称：幼儿算术软件
由于还没有到新空间存放例程，所以《菜鸟每日一课》和其他课程暂停，代之以一门新课程：《易语言时尚编程100例》，专门学习研究别人的程序。由于本人也是菜鸟，所以一般是照搬其中的代码，保持原汁原味，其中是否有错，由高手来跟贴完善评改吧。
★、例程来源。
㈠、例程名称：幼儿算术软件
㈡、下载地址：eyuyan/non-cgi/usr/1/1_3244.e
㈢、作者：bklbklbk
★、例程详解。
该程序近日由作者上传到论坛，程序明白
易懂，主要功能代码也不多，所以我们现在就以它为研究学习对象。
该程序由三个窗口组成，其中_启动窗口只是该程序的封面，窗口2只是说明文件，核心功能都在窗口1中实现，所以这里只讲解窗口1，窗口1中又只有"出题"和"计算结果"两个重要子程序，其他的子程序是辅助的。
㈠、先讲讲怎样实现随机出题。
在随机出题中作者要做两件事：⑴、用单选框设置有三个出题计算数的范围：1到10；1到20；1到100，分别代表三种不同的学习程度。⑵、按三种计算数范围随机出题。下面看程序是怎样做的：
子程序：_按钮1_被单击
置随机数种子()
※一般过程是先置随机数种子再随机取数
编辑框1.内容＝到文本(取整(取随机数(最小号码
最大号码)))
※随机选择第一个计算数
编辑框2.内容＝到文本(取整(取随机数(最小号码
最大号码)))
※随机选择第一个计算数。取整数的随机数，"取整"是算术运算命令
编辑框3.内容＝""
※清空"编辑框3"以便你把结果填上去
标签2.标题＝""
※清空"标签2"（提示正确与否）以方便指出对还是错
编辑框3.获取焦点()
※使"编辑框3"获取焦点光标以便你输入计算结果
如果(单选框1.选中＝真)
最大号码＝10
※当选择最大数为10的计算范围时
否则
如果(单选框2.选中＝真)
最大号码＝20
否则
如果(单选框3.选中＝真)
最大号码＝100
否则
如果结束
如果结束
如果结束
㈡、再讲讲怎样评价你的计算结果。
该子程序分别设置了加、减、乘、除四种运算情况，我们以"减法"为例说明：
如果(标签3.标题＝"-")
※当选择为减法运算时。选择不同的运算方式，该标签的标题就发生相应变化
如果(变量1＞变量2)
※当减数大于被减数时
如果(变量3＝变量1－变量2)
※当运算结果正确时
标签7.可视＝真
※该标签的标题是"正确"
标签2.标题＝"恭喜你！做对了"
标签5.标题＝到文本(变量4＋1)
※显示正确的次数，变量4存放的是正确次数，为静态短整数型容器，静态容器能将正确次数保留到下次运算，数值型数据的默认值为0
变量4＝变量4＋1
※给变量4赋值
否则※当运算结果错误时编程语言下载
标签2.标题＝"错啦！重做一遍"
标签8.可视＝真
※该标签的标题是"错误"
标签6.标题＝到文本(变量5＋1)
变量5＝变量5＋1
如果结束
变量6＝变量4＋变量5
※赋值于变量6，表示运算次数的总和，即正确次数与错误次数之和
标签13.可视＝真
※该标签的标题是"共计"
标签12.标题＝到文本(变量4＋变量5)
标签9.标题＝到文
本(取整(变量4÷变量6×100))
标签11.可视＝真
※该标签的标题是"正确率"
标签10.可视＝真
※该标签的标题是"%"
否则
标签2.标题＝"不能相减"
※当减数小于被减数时
如果结束
上面是以减法的实现为例对该软件功能实现作一说明，整个窗口1的程序如下：
窗口程序集：窗口程序集2
程序集容器：最小号码数据类型：短整数型
程序集容器：最大号码数据类型：短整数型
------------------------------
子程序：_按钮2_被单击
局部容器：变量1数据类型：短整数型
局部容器：变量2数据类型：短整数型
局部容器：变量3数据类型：短整数型
局部容器：变量4数据类型：短整数型
局部容器：变量5数据类型：短整数型
局部容器：变量6数据类型：整数型
变量1＝文本到数值(编辑框1.内容)
变量2＝文本到数值(编辑框2.内容)
变量3＝文本到数值(编辑框3.内容)
编辑框3.获取焦点()
如果(标签3.标题＝"+")
如果(变量3＝变量1＋变量2)
标签7.可视＝真
标签2.标题＝"恭喜你！做对了"
标签5.标题＝到文本(变量4＋1)
变量4＝变量4＋1
否则
标签2.标题＝"错啦！重算一遍"
标签8.可视＝真
标签6.标题＝到文本(变量5＋1)
变量5＝变量5＋1
如果结束
变量6＝变量4＋变量5
标签13.可视＝真
标签12.标题＝到文本(变量4＋变量5)
标签9.标题＝到文本(取整(变量4÷变量6×100))
标签11.可视＝真
标签10.可视＝真
否则
如果(标签3.标题＝"-")
如果(变量1＞变量2)
如果(变量3＝变量1－变量2)
标签7.可视＝真
标签2.标题＝"恭喜你！做对了"
标签5.标题＝到文本(变量4＋1)
变量4＝变量4＋1
否则
标签2.标题＝"错啦！重做一遍"
标签8.可视＝真
标签6.标题＝到文本(变量5＋1)
变量5＝变量5＋1
如果结束
变量6＝变量4＋变量5
标签13.可视＝真
标签12.标题＝到文本(变量4＋变量5)
标签9.标题＝到文本(取整(变量4÷变量6×100))
标签11.可视＝真
标签10.可视＝真
否则
标签2.标题＝"不能相减"
如果结束
否则
如果(标签3.标题＝"×")
如果(变量3＝变量1×变量2)
标签7.可视＝真
标签2.标题＝"恭喜你！做对了"
标签5.标题＝到文本(变量4＋1)
变量4＝变量4＋1
否则
标签2.标题＝"错啦！重做一遍"
标签8.可视＝真
标签6.标题＝到文本(变量5＋1)
变量5＝变量5＋1
如果结束
变量6＝变量4＋变量5
标签13.可视＝真
标签12.标题＝到文本(变量4＋变量5)
标签9.标题＝到文本(取整(变量4÷变量6×100))
发表评论