易语言学生成绩管理系统

.版本 2

.程序集 窗口程序集_启动窗口
.程序集变量 程序集_学生姓名, 文本型, , "0"
.程序集变量 程序集_学生成绩, 整数型, , "0"

.子程序 __启动窗口_创建完毕



.子程序 _按钮1_被单击
.局部变量 成员数量, 整数型
.局部变量 i, 整数型
.局部变量 成绩总和, 整数型

成员数量 ＝ 取数组成员数 (程序集_学生成绩)
.计次循环首 (成员数量, i)
    成绩总和 ＝ 成绩总和 ＋ 程序集_学生成绩 
    输出调试文本 (成绩总和)
.计次循环尾 ()

加入成员 (程序集_学生姓名, 编辑框_学生姓名.内容)

加入成员 (程序集_学生成绩, 到整数 (编辑框_学生成绩.内容))


编辑框_显示.加入文本 (“姓名：” ＋ 程序集_学生姓名 , “成绩：” ＋ 到文本 (程序集_学生成绩 ), #换行符)


.子程序 _按钮_取平均成绩_被单击
.局部变量 成员数量, 整数型
.局部变量 i, 整数型
.局部变量 成绩总和, 整数型

成员数量 ＝ 取数组成员数 (程序集_学生成绩)
.计次循环首 (成员数量, i)
    成绩总和 ＝ 成绩总和 ＋ 程序集_学生成绩 
    输出调试文本 (成绩总和)
.计次循环尾 ()


编辑框_显示.加入文本 (“取平均成绩为：” ＋ 到文本 (成绩总和 ÷ 成员数量))


.子程序 _清楚成绩_按钮_被单击

清除数组 (程序集_学生姓名)
清除数组 (程序集_学生成绩)