精易论坛

标题: 63数组运用之统计总成绩及平均分并保存为文本（易语言之... [打印本页]
作者: 技能不多    时间: 2021-12-5 10:53
标题: 63数组运用之统计总成绩及平均分并保存为文本（易语言之...
本帖最后由 技能不多 于 2021-12-5 11:03 编辑

63数组运用之统计总成绩及平均分并保存为文本（易语言之小白入门）
几个小功能，可清空，可查看总人数和平均成绩



1
变量是从0开始
列表框是从-1开始
所以i-1等于-1 取第一个列表框
且 现行选中项不能选择只能是-1
变量注意是否重复使用
2
列表框，本身就是一行一行的,所以不需要换行符
3
循环时，程序集变量，每次运行完，变量数值不会自动清零，因此保存不到文本


附：各变量初始值
字节型变量:0  
短整数型变量:0
整数型变量 :0
长整数型变量:0
小数型变量 :0
双精度小数型变量:0
逻辑型变量  :假(也就是没有)
日期时间型变量 :1899年12月30日
文本型变量的初始长度为0
字节集变量的初始长度为0


  
窗口程序集名保 留  保 留备 注
窗口程序集_启动窗口   
变量名类 型数组备 注
文件时间名文本型  
成绩数组整数型10 
人数整数型  

子程序名返回值类型公开备 注
__启动窗口_创建完毕  
文件时间名 ＝ 时间_到文本 (, 3, 2) ＋ 时间_到文本 (, 3, 4) ＋ “.”
子程序名返回值类型公开备 注
_按钮1_被单击  
变量名类 型静态数组备 注
成绩整数型 
我要结果文本型 
i整数型 
人数 ＝ 人数 ＋ 1
成绩 ＝ 到数值 (总成绩输出框.内容)
如果 (人数 ＞ 5)
信息框 (“所有人的成绩输入完毕”, 0, , )
计次循环首 (5, i)
我要结果 ＝ 我要结果 ＋ 列表编辑框.取项目文本 (i － 1) ＋ “天才” ＋ #换行符
计次循环尾 ()
写到文件 (取运行目录 () ＋ “\” ＋ 文件时间名 ＋ “__我要的结果.txt”, 到字节集 (我要结果))

成绩数组 [人数] ＝ 到数值 (成绩输入编辑框)
列表编辑框.加入项目 (到文本 (人数) ＋ “:” ＋ 成绩输入编辑框.内容, )
总成绩输出框.内容 ＝ 到文本 (成绩 ＋ 到数值 (成绩输入编辑框.内容))
平均成绩输出框.内容 ＝ 到文本 (到数值 (总成绩输出框.内容) ÷ 10)
总人数编辑框.内容 ＝ 到文本 (人数)

子程序名返回值类型公开备 注
_按钮2_被单击  
总成绩输出框.内容 ＝ “”
平均成绩输出框.内容 ＝ “”
成绩输入编辑框.内容 ＝ “”
列表编辑框.清空 ()
总人数编辑框.内容 ＝ “”
人数 ＝ 0
成绩统计.e (908.71 KB, 下载次数: 5)


作者: 技能不多    时间: 2021-12-5 11:30
又添加了一个小功能，可录入100人成绩
注意数组改成了100
先输入总人

  
窗口程序集名保 留  保 留备 注
窗口程序集_启动窗口   
变量名类 型数组备 注
文件时间名文本型  
成绩数组整数型100 
人数整数型  

子程序名返回值类型公开备 注
__启动窗口_创建完毕  
文件时间名 ＝ 时间_到文本 (, 3, 2) ＋ 时间_到文本 (, 3, 4) ＋ “.”
子程序名返回值类型公开备 注
_按钮1_被单击  
变量名类 型静态数组备 注
成绩整数型 
我要结果文本型 
i整数型 
总人数整数型 
总人数 ＝ 到数值 (总人数编辑框2.内容)
调试输出 (总人数)
人数 ＝ 人数 ＋ 1
成绩 ＝ 到数值 (总成绩输出框.内容)
如果 (人数 ＞ 总人数)
信息框 (“所有人的成绩输入完毕”, 0, , )
计次循环首 (总人数, i)
我要结果 ＝ 我要结果 ＋ 列表编辑框.取项目文本 (i － 1) ＋ “天才” ＋ #换行符
计次循环尾 ()
写到文件 (取运行目录 () ＋ “\” ＋ 文件时间名 ＋ “__我要的结果.txt”, 到字节集 (我要结果))

成绩数组 [人数] ＝ 到数值 (成绩输入编辑框)
列表编辑框.加入项目 (到文本 (人数) ＋ “:” ＋ 成绩输入编辑框.内容, )
总成绩输出框.内容 ＝ 到文本 (成绩 ＋ 到数值 (成绩输入编辑框.内容))
平均成绩输出框.内容 ＝ 到文本 (到数值 (总成绩输出框.内容) ÷ 10)
总人数编辑框.内容 ＝ 到文本 (人数)

子程序名返回值类型公开备 注
_按钮2_被单击  
总成绩输出框.内容 ＝ “”
平均成绩输出框.内容 ＝ “”
成绩输入编辑框.内容 ＝ “”
列表编辑框.清空 ()
总人数编辑框.内容 ＝ “”
人数 ＝ 0


i支持库列表   支持库注释   
spec特殊功能支持库

可录入100人成绩.e (909.69 KB, 下载次数: 0) 可录入100人成绩.e (909.44 KB, 下载次数: 0)
作者: 技能不多    时间: 2021-12-5 11:39
保留两位小数
四舍五入命令
.版本 2

    平均成绩输出框.内容 ＝ 到文本 (四舍五入 (到数值 (总成绩输出框.内容) ÷ 总人数, ))

  
窗口程序集名保 留  保 留备 注
窗口程序集_启动窗口   
变量名类 型数组备 注
文件时间名文本型  
成绩数组整数型100 
人数整数型  

子程序名返回值类型公开备 注
__启动窗口_创建完毕  
文件时间名 ＝ 时间_到文本 (, 3, 2) ＋ 时间_到文本 (, 3, 4) ＋ “.”
子程序名返回值类型公开备 注
_按钮1_被单击  
变量名类 型静态数组备 注
成绩整数型 
我要结果文本型 
i整数型 
总人数整数型 
总人数 ＝ 到数值 (总人数编辑框2.内容)
调试输出 (总人数)
人数 ＝ 人数 ＋ 1
成绩 ＝ 到数值 (总成绩输出框.内容)
如果 (人数 ＞ 总人数)
信息框 (“所有人的成绩输入完毕”, 0, , )
计次循环首 (总人数, i)
我要结果 ＝ 我要结果 ＋ 列表编辑框.取项目文本 (i － 1) ＋ “天才” ＋ #换行符
计次循环尾 ()
写到文件 (取运行目录 () ＋ “\” ＋ 文件时间名 ＋ “__我要的结果.txt”, 到字节集 (我要结果))

成绩数组 [人数] ＝ 到数值 (成绩输入编辑框)
列表编辑框.加入项目 (到文本 (人数) ＋ “:” ＋ 成绩输入编辑框.内容, )
总成绩输出框.内容 ＝ 到文本 (成绩 ＋ 到数值 (成绩输入编辑框.内容))
平均成绩输出框.内容 ＝ 到文本 (四舍五入 (到数值 (总成绩输出框.内容) ÷ 总人数, ))
总人数编辑框.内容 ＝ 到文本 (人数)

子程序名返回值类型公开备 注
_按钮2_被单击  
总成绩输出框.内容 ＝ “”
平均成绩输出框.内容 ＝ “”
成绩输入编辑框.内容 ＝ “”
列表编辑框.清空 ()
总人数编辑框.内容 ＝ “”
人数 ＝ 0
子程序名返回值类型公开备 注
_标签1_反馈事件整数型 
参数名类 型参考可空数组备 注
参数一整数型
参数二整数型



i支持库列表   支持库注释   
spec特殊功能支持库

可录入100人成绩2.e (909.73 KB, 下载次数: 0)

作者: iconic    时间: 2021-12-7 14:21
互相学习，共同进步。
作者: 技能不多    时间: 2021-12-7 16:55
iconic 发表于 2021-12-7 14:21
互相学习，共同进步。

作者: duanyijun    时间: 2022-4-2 10:07
先下载再研究



欢迎光临 精易论坛 (https://125.confly.eu.org/) Powered by Discuz! X3.4