易语言打造个性应用：[2]指定任意选号个数

1、在程序界面添加1个编辑框和1个调节器 分别按规则命名

2、选择调节器，为调节器被按下添加代码：

.版本 2

.子程序 _调节器_注数_调节钮被按下.参数 按钮值, 整数型

.如果 (按钮值 ＝ 1)    编辑框_注数.内容 ＝ 到文本 (到数值 (编辑框_注数.内容) ＋ 1).否则    .如果 (到数值 (编辑框_注数.内容) ≥ 2)        编辑框_注数.内容 ＝ 到文本 (到数值 (编辑框_注数.内容) － 1)    .否则        信息框 (“注数不能小于1注”, 0, )    .如果结束

.如果结束

3、为防止数据出错，我们还应该为”编辑框失去焦点“添加代码

.版本 2

.如果 (到数值 (编辑框_注数.内容) ＞ 1)    编辑框_注数.内容 ＝ 到文本 (取整 (到数值 (编辑框_注数.内容)))

.否则    信息框 (“输入了错误数字！！”, 0, )    编辑框_注数.内容 ＝ “1”

4、为简化程序，把按钮_选号修改为子程序，返回一注号码。

5、双击选号按钮重新添加代码：如下：

要注意，该子程序没有参数，直接写： 生成一注 ()

.版本 2

.子程序 _按钮_选号_被单击.局部变量 号码文本, 文本型

.如果 (到数值 (编辑框_注数.内容) ＞ 0)    .计次循环首 (到数值 (编辑框_注数.内容), )        号码文本 ＝ 号码文本 ＋ 生成一注 () ＋ #换行符

    .计次循环尾 ()    编辑框_号码.内容 ＝ 号码文本.否则    信息框 (“输出注数错误，或不为数值！”, 0, )

6、到这里就完成了，看看一运行结果吧！