401.txt

易语言时尚编程100例 （一）例程名称：计算编辑框的输入内容的长度 设立本100例教程的目的：把易语言现有的例程都学习一遍

    [易语言时尚编程100例 / 未知 著 ]
    书香中文网 出品作品Txt版阅读,阅读作品更多请访问:http://www.sxcnw.com
 
    书籍介绍:
    {WsErr}

 ------章节内容开始-------

    第一卷 第一章
    书香中文网 更新时间:2007-1-12 23:35:47 本章字数:11969

?易语言时尚编程100例
（一）例程名称：计算编辑框的输入内容的长度
设立本100例教程的目的：把易语言现有的例程都学习一遍，以达到共同脱菜的目的。
★、例程来源。
㈠、例程名称：计算编辑框的输入内容的长度（暂名）
㈡、下载地址：
㈢、作者：（暂不详）
★、例程详解。
不知程序作者是谁？该程序作者或提问者为什么要做该例程？有什么作用？有知道者请跟贴。我在编辑时修改。
该例程只有一个子程序，该子程序只有一行执行代码，程序如下：
子程序：_编辑框1_内容被改变
标签1.标题    ＝    到文本    (取文本长度    (编辑框1.内容))
编程大概思路：
㈠、确定用什么样的子程序，包括确定用什么控件来发送指令（事件驱动承担者），什么控件用来传递指令，什么控件用来执行指令，什么控件用来反馈指令。
⑴、确定发送指令控件。比如用按钮作为事件驱动（发送指令）承担者，则程序大概是：
子程序：_按钮1_被单击
标签1.标题    ＝    到文本    (取文本长度    (编辑框1.内容))
当然，如果想使编辑框在输入文本时即时显示文本长度，就要用到编辑框本身的事件，如本程序的第一种子程序，即子程序：_编辑框1_内容被改变，通过在编辑框输入信息来发送指令。
⑵、确定传递、执行或反馈指令控件。如果我们用信息框来执行或反馈指令，则程序大概类似下面为好：
子程序：_按钮1_被单击
信息框    (“你输入的文本长度是：”    ＋    到文本    (取文本长度    (编辑框1.内容))
0
)
思考：如果想做到按“enter”时就弹出该信息框，应怎样做？
㈡、“计算编辑框的输入内容的长度”也即是确定编辑框的某个属性值，那么我们就重点查找编辑框的有关属性、方法和事件及易语言系统有关的命令，看有哪些在本例程中用得上。还是比较难找呢。
交流附件上传地址：http://www.91asp.com/
（二）例程名称：幼儿算术软件
由于还没有找到新空间存放例程，所以《菜鸟每日一课》和其他课程暂停，代之以一门新课程：《易语言时尚编程100例》，专门学习研究别人的程序。由于本人也是菜鸟，所以一般是照搬其中的代码，保持原汁原味，其中是否有错，由高手来跟贴完善评改吧。
★、例程来源。
㈠、例程名称：幼儿算术软件
㈡、下载地址：    http://eyuyan.com/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))
标签11.可视    ＝    真
标签10.可视    ＝    真
否则
如果    (标签3.标题    ＝    “÷”)
如果    (变量2    ≠    0)
如果    (变量3    ＝    变量1    ÷    变量2)
标签7.可视    ＝    真
标签2.标题    ＝    “恭喜你！做对了”
标签5.标题    ＝    到文本    (变量4    ＋    1)
变量4    ＝    变量4    ＋    1
否则
信息框    (“错啦！重做一遍”
#错误图标
“错误”)
标签8.可视    ＝    真
标签6.标题    ＝    到文本    (变量5    ＋    1)
变量5    ＝    变量5    ＋    1
如果结束
变量6    ＝    变量4    ＋    变量5
标签13.可视    ＝    真
标签12.标题    ＝    到文本    (变量4    ＋    变量5)
标签9.标题    ＝    到文本    (取整    (变量4    ÷    变量6    ×    100))
标签11.可视    ＝    真
标签10.可视    ＝    真
否则
信息框    (“除数不能为0”
#错误图标
“错误”)
如果结束
否则
如果结束
如果结束
如果结束
如果结束
------------------------------
子程序：_按钮7_被单击
销毁    ()
------------------------------
子程序：_按钮3_被单击
标签3.标题    ＝    “+”
标签1.标题    ＝    “加法运算”
编辑框3.获取焦点    ()
------------------------------
子程序：_按钮4_被单击
标签3.标题    ＝    “-”
标签1.标题    ＝    “减法运算”
编辑框3.获取焦点    ()