63数组运用之统计总成绩及平均分并保存为文本（易语言之...

技能不多

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

.版本 2<br /> <br /> .程序集 窗口程序集_启动窗口<br /> .程序集变量 文件时间名, 文本型<br /> .程序集变量 成绩数组, 整数型, , "10"<br /> .程序集变量 人数, 整数型<br /> <br /> .子程序 __启动窗口_创建完毕<br /> <br /> 文件时间名 ＝ 时间_到文本 (, 3, 2) ＋ 时间_到文本 (, 3, 4) ＋ “.”<br /> <br /> .子程序 _按钮1_被单击<br /> .局部变量 成绩, 整数型<br /> .局部变量 我要结果, 文本型<br /> .局部变量 i, 整数型<br /> <br /> 人数 ＝ 人数 ＋ 1<br /> 成绩 ＝ 到数值 (总成绩输出框.内容)<br /> .如果 (人数 ＞ 5)<br />     信息框 (“所有人的成绩输入完毕”, 0, , )<br />     .计次循环首 (5, i)<br />         我要结果 ＝ 我要结果 ＋ 列表编辑框.取项目文本 (i － 1) ＋ “天才” ＋ #换行符<br />     .计次循环尾 ()<br /> <br />     写到文件 (取运行目录 () ＋ “\” ＋ 文件时间名 ＋ “__我要的结果.txt”, 到字节集 (我要结果))<br /> <br /> <br /> .否则<br />     成绩数组 [人数] ＝ 到数值 (成绩输入编辑框)<br />     列表编辑框.加入项目 (到文本 (人数) ＋ “:” ＋ 成绩输入编辑框.内容, )<br />     总成绩输出框.内容 ＝ 到文本 (成绩 ＋ 到数值 (成绩输入编辑框.内容))<br />     平均成绩输出框.内容 ＝ 到文本 (到数值 (总成绩输出框.内容) ÷ 10)<br />     总人数编辑框.内容 ＝ 到文本 (人数)<br /> .如果结束<br /> <br /> <br /> .子程序 _按钮2_被单击<br /> <br /> 总成绩输出框.内容 ＝ “”<br /> 平均成绩输出框.内容 ＝ “”<br /> 成绩输入编辑框.内容 ＝ “”<br /> 列表编辑框.清空 ()<br /> 总人数编辑框.内容 ＝ “”<br /> 人数 ＝ 0

成绩统计.e (908.71 KB, 下载次数: 5)

2021-12-5 11:00 上传

点击文件名下载附件

duanyijun

先下载再研究

技能不多

iconic 发表于 2021-12-7 14:21
互相学习，共同进步。

iconic

互相学习，共同进步。

技能不多

保留两位小数
四舍五入命令
.版本 2

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

  

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

子程序名	返回值类型	公开	备 注
__启动窗口_创建完毕

文件时间名 ＝ 时间_到文本 (, 3, 2) ＋ 时间_到文本 (, 3, 4) ＋ “.”

子程序名	返回值类型	公开	备 注
_按钮1_被单击

变量名	类 型	静态	数组	备 注
成绩	整数型
我要结果	文本型
i	整数型
总人数	整数型

总人数 ＝ 到数值 (总人数编辑框2.内容)
调试输出 (总人数)
人数 ＝ 人数 ＋ 1
成绩 ＝ 到数值 (总成绩输出框.内容)
如果 (人数 ＞ 总人数)
信息框 (“所有人的成绩输入完毕”, 0, , )
计次循环首 (总人数, i)
我要结果 ＝ 我要结果 ＋ 列表编辑框.取项目文本 (i － 1) ＋ “天才” ＋ #换行符
计次循环尾 ()
写到文件 (取运行目录 () ＋ “\” ＋ 文件时间名 ＋ “__我要的结果.txt”, 到字节集 (我要结果))

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

子程序名	返回值类型	公开	备 注
_按钮2_被单击

总成绩输出框.内容 ＝ “”
平均成绩输出框.内容 ＝ “”
成绩输入编辑框.内容 ＝ “”
列表编辑框.清空 ()
总人数编辑框.内容 ＝ “”
人数 ＝ 0

子程序名	返回值类型	公开	备 注
_标签1_反馈事件	整数型
参数名	类 型	参考	可空	数组	备 注
参数一	整数型
参数二	整数型

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

.版本 2<br /> .支持库 spec<br /> <br /> .程序集 窗口程序集_启动窗口<br /> .程序集变量 文件时间名, 文本型<br /> .程序集变量 成绩数组, 整数型, , "100"<br /> .程序集变量 人数, 整数型<br /> <br /> .子程序 __启动窗口_创建完毕<br /> <br /> 文件时间名 ＝ 时间_到文本 (, 3, 2) ＋ 时间_到文本 (, 3, 4) ＋ “.”<br /> <br /> .子程序 _按钮1_被单击<br /> .局部变量 成绩, 整数型<br /> .局部变量 我要结果, 文本型<br /> .局部变量 i, 整数型<br /> .局部变量 总人数, 整数型<br /> <br /> 总人数 ＝ 到数值 (总人数编辑框2.内容)<br /> 调试输出 (总人数)<br /> 人数 ＝ 人数 ＋ 1<br /> 成绩 ＝ 到数值 (总成绩输出框.内容)<br /> .如果 (人数 ＞ 总人数)<br />     信息框 (“所有人的成绩输入完毕”, 0, , )<br />     .计次循环首 (总人数, i)<br />         我要结果 ＝ 我要结果 ＋ 列表编辑框.取项目文本 (i － 1) ＋ “天才” ＋ #换行符<br />     .计次循环尾 ()<br /> <br />     写到文件 (取运行目录 () ＋ “\” ＋ 文件时间名 ＋ “__我要的结果.txt”, 到字节集 (我要结果))<br /> <br /> <br /> .否则<br />     成绩数组 [人数] ＝ 到数值 (成绩输入编辑框)<br />     列表编辑框.加入项目 (到文本 (人数) ＋ “:” ＋ 成绩输入编辑框.内容, )<br />     总成绩输出框.内容 ＝ 到文本 (成绩 ＋ 到数值 (成绩输入编辑框.内容))<br />     平均成绩输出框.内容 ＝ 到文本 (四舍五入 (到数值 (总成绩输出框.内容) ÷ 总人数, ))<br /> <br />     总人数编辑框.内容 ＝ 到文本 (人数)<br /> .如果结束<br /> <br /> <br /> .子程序 _按钮2_被单击<br /> <br /> 总成绩输出框.内容 ＝ “”<br /> 平均成绩输出框.内容 ＝ “”<br /> 成绩输入编辑框.内容 ＝ “”<br /> 列表编辑框.清空 ()<br /> 总人数编辑框.内容 ＝ “”<br /> 人数 ＝ 0<br /> <br /> <br /> .子程序 _标签1_反馈事件, 整数型<br /> .参数 参数一, 整数型<br /> .参数 参数二, 整数型

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

2021-12-5 11:38 上传

点击文件名下载附件

技能不多

又添加了一个小功能，可录入100人成绩
注意数组改成了100
先输入总人

  

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

子程序名	返回值类型	公开	备 注
__启动窗口_创建完毕

文件时间名 ＝ 时间_到文本 (, 3, 2) ＋ 时间_到文本 (, 3, 4) ＋ “.”

子程序名	返回值类型	公开	备 注
_按钮1_被单击

变量名	类 型	静态	数组	备 注
成绩	整数型
我要结果	文本型
i	整数型
总人数	整数型

总人数 ＝ 到数值 (总人数编辑框2.内容)
调试输出 (总人数)
人数 ＝ 人数 ＋ 1
成绩 ＝ 到数值 (总成绩输出框.内容)
如果 (人数 ＞ 总人数)
信息框 (“所有人的成绩输入完毕”, 0, , )
计次循环首 (总人数, i)
我要结果 ＝ 我要结果 ＋ 列表编辑框.取项目文本 (i － 1) ＋ “天才” ＋ #换行符
计次循环尾 ()
写到文件 (取运行目录 () ＋ “\” ＋ 文件时间名 ＋ “__我要的结果.txt”, 到字节集 (我要结果))

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

子程序名	返回值类型	公开	备 注
_按钮2_被单击

总成绩输出框.内容 ＝ “”
平均成绩输出框.内容 ＝ “”
成绩输入编辑框.内容 ＝ “”
列表编辑框.清空 ()
总人数编辑框.内容 ＝ “”
人数 ＝ 0

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

.版本 2<br /> .支持库 spec<br /> <br /> .程序集 窗口程序集_启动窗口<br /> .程序集变量 文件时间名, 文本型<br /> .程序集变量 成绩数组, 整数型, , "100"<br /> .程序集变量 人数, 整数型<br /> <br /> .子程序 __启动窗口_创建完毕<br /> <br /> 文件时间名 ＝ 时间_到文本 (, 3, 2) ＋ 时间_到文本 (, 3, 4) ＋ “.”<br /> <br /> .子程序 _按钮1_被单击<br /> .局部变量 成绩, 整数型<br /> .局部变量 我要结果, 文本型<br /> .局部变量 i, 整数型<br /> .局部变量 总人数, 整数型<br /> <br /> 总人数 ＝ 到数值 (总人数编辑框2.内容)<br /> 调试输出 (总人数)<br /> 人数 ＝ 人数 ＋ 1<br /> 成绩 ＝ 到数值 (总成绩输出框.内容)<br /> .如果 (人数 ＞ 总人数)<br />     信息框 (“所有人的成绩输入完毕”, 0, , )<br />     .计次循环首 (总人数, i)<br />         我要结果 ＝ 我要结果 ＋ 列表编辑框.取项目文本 (i － 1) ＋ “天才” ＋ #换行符<br />     .计次循环尾 ()<br /> <br />     写到文件 (取运行目录 () ＋ “\” ＋ 文件时间名 ＋ “__我要的结果.txt”, 到字节集 (我要结果))<br /> <br /> <br /> .否则<br />     成绩数组 [人数] ＝ 到数值 (成绩输入编辑框)<br />     列表编辑框.加入项目 (到文本 (人数) ＋ “:” ＋ 成绩输入编辑框.内容, )<br />     总成绩输出框.内容 ＝ 到文本 (成绩 ＋ 到数值 (成绩输入编辑框.内容))<br />     平均成绩输出框.内容 ＝ 到文本 (到数值 (总成绩输出框.内容) ÷ 10)<br />     总人数编辑框.内容 ＝ 到文本 (人数)<br /> .如果结束<br /> <br /> <br /> .子程序 _按钮2_被单击<br /> <br /> 总成绩输出框.内容 ＝ “”<br /> 平均成绩输出框.内容 ＝ “”<br /> 成绩输入编辑框.内容 ＝ “”<br /> 列表编辑框.清空 ()<br /> 总人数编辑框.内容 ＝ “”<br /> 人数 ＝ 0

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

2021-12-5 11:30 上传

点击文件名下载附件 可录入100人成绩.e (909.44 KB, 下载次数: 0)

2021-12-5 11:23 上传

点击文件名下载附件