1、在程序界面添加1个编辑框和1个调节器 分别按规则命名
2、选择调节器,为调节器蹲赓忧甘被按下添加代码:.版本 2.子程序 _调节器_注数_调节钮被按下.参数 按钮值, 整数型.如果 (按钮值 = 1) 编辑框_注数.内容 = 到文本 (到数值 (编辑框_注数.内容) + 1).否则 .如果 (到数值 (编辑框_注数.内容) ≥ 2) 编辑框_注数.内容 = 到文本 (到数值 (编辑框_注数.内容) - 1) .否则 信息框 (“注数不能小于1注”, 0, ) .如果结束.如果结束
3、为防止数据出错,我们还应该为”编辑框失去焦点“添加代码.版本 2.如果 (到数值 (编辑框_注数.内容) > 1) 编辑框_注数.内容 = 到文本 (取整 (到数值 (编辑框_注数.内容))).否则 信息框 (“输入了错误数字!!”, 0, ) 编辑框_注数.内容 = “1”
4、为简化程序,把按钮_选号修改为子程序,返回一注号码。
5、双击选号按钮重新添加代码:如下:要注意,该子程序没有参数,直接写: 生成一注 ().版本 2.子程序 忧溲枷茫_按钮_选号_被单击.局部变量 号码文本, 文本型.如果 (到数值 (编辑框_注数.内容) > 0) .计次循环首 (到数值 (编辑框_注数.内容), ) 号码文本 = 号码文本 + 生成一注 () + #换行符 .计次循环尾 () 编辑框_号码.内容 = 号码文本.否则 信息框 (“输出注数错误,或不为数值!”, 0, )
6、到这里就完成了,看看一运行结果吧!