1、学生成绩统计程序设计VB 课 程 设 计班 级 信 管 C081 班 成 员 （ 087267 ）齐 琪 （ 087264 ） 龙泉江指导教师 李 艳 2010/12/12VB 课程设计2目录1、设计题目 32、设计思路 3 划分功能模块 3 确定各模块的算法 33、过程图示 54、程序清单 55、更完善的方案 76、收获与心得体会 7VB 课程设计31、设计题目：学生成绩统计程序在程序界面中单击“读入数据”按钮，从数据文件中将学生姓名信息及三门课程的成绩读入，此时可以在屏幕上显示读入了多少学生的信息（例如：读入了 40 名学生信息）。在程序界面中单击“统计”按钮，计算所有学生数学、英语、计算
2、机的平均分数，统计每个学生三门课的平均分。2、设计思路划分功能模块分为四个模块：标准模块、全局变量模块、输入数据模块、统计模块。确定各模块的算法标准模块：定义结构体变量 stu。VB 课程设计4全局变量模块：定义全局变量，以便各程序使用、存储、共享各变量数据。输入数据模块：运用 for 循环，“依次输入各学生的姓名和数学、英语、计算机的分数”，存入结构体数组；嵌入 if 条件语句，以输入姓名是空时为标志，结束输入，并把此时的 i 的值减 1 后，赋值给 t，t 便是读入的学生人数。统计模块：使用 for 循环，将结构体数组里各组的数学、英语、计算机三科分数平均，VB 课程设计5定义一个新的数组
3、，存储求得的平均分，再依次输出各学生的各科成绩和平均分。3、过程图示4、程序清单Dim a(100) As stu 存储学生信息Dim ave(100) As Double 存储学生平均成绩Dim t As Integer 记录读入学生人数Dim i As Integer 循环控制变量Private Sub Command1_Click()Print “依次输入各学生的姓名和数学、英语、计算机的分数：“For i = 1 To 100 输入学生各项信息VB 课程设计6a(i).name = InputBox(“姓名：“)If a(i).name = “ Then 当输入姓名为空时，结束输入t
4、= i - 1Print “Print “读入了“ “名学生信息“ 显示读入多少名学生信息Exit ForEnd Ifa(i).x = InputBox(“数学：“)a(i).y = InputBox(“英语：“)a(i).z = InputBox(“计算机：“)Next iEnd SubPrivate Sub Command2_Click()Print “Print “姓名 数学 英语 计算机 平均分数“Print “For i = 1 To tave(i) = (a(i).x + a(i).y + a(i).z) / 计算各学生平均成绩Print a(i).name; “ “; a(i).
5、x; “ “; a(i).y; “ “; _a(i).z; “ “; ave(i) 输出统计的所有学生的各科成绩和平均成绩Print “Next iEnd Sub自定义类型标准模块程序：Type stu 设自定义类型为 stuname As String 姓名x As Double 数学y As Double 英语z As Double 计算机End TypeVB 课程设计75、更完善的方案统计功能，不应该只是统计单个学生的平均分，而是需能统计所有学生的列平均分（单科成绩平均分），甚至统计出总分、最高分和最低分。6、收获与心得体会通过这次编程，熟悉了 VB 的编程功能，初步了解到 VB 与 C+的区别，各有千秋，也更一步巩固了所学的 VB 编程知识。编程领域很广阔，我们所学的 C+、VB、数据库 都是冰山一角，欲窥其全貌、运筹帷幄，还须更深的学习与探究！
