易语言学生成绩管理系统
.版本 2 .程序集 窗口程序集_启动窗口 .程序集变量 程序集_学生姓名, 文本型, , "0" .程序集变量 程序集_学生成绩, 整数型, , "0" .子程序 __启动窗口_创建完毕 .子程序 _按钮1_被单击 .局部变量 成员数量, 整数型 .局部变量 i, 整数型 .局部变量 成绩总和, 整数型 成员数量 = 取数组成员数 (程序集_学生成绩) .计次循环首 (成员数量, i) 成绩总和 = 成绩总和 + 程序集_学生成绩 [i] 输出调试文本 (成绩总和) .计次循环尾 () 加入成员 (程序集_学生姓名, 编辑框_学生姓名.内容) 加入成员 (程序集_学生成绩, 到整数 (编辑框_学生成绩.内容)) 编辑框_显示.加入文本 (“姓名:” + 程序集_学生姓名 [i], “成绩:” + 到文本 (程序集_学生成绩 [i]), #换行符) .子程序 _按钮_取平均成绩_被单击 .局部变量 成员数量, 整数型 .局部变量 i, 整数型 .局部变量 成绩总和, 整数型 成员数量 = 取数组成员数 (程序集_学生成绩) .计次循环首 (成员数量, i) 成绩总和 = 成绩总和 + 程序集_学生成绩 [i] 输出调试文本 (成绩总和) .计次循环尾 () 编辑框_显示.加入文本 (“取平均成绩为:” + 到文本 (成绩总和 ÷ 成员数量)) .子程序 _清楚成绩_按钮_被单击 清除数组 (程序集_学生姓名) 清除数组 (程序集_学生成绩)