Vb课程设计学生奖学金

学生奖学金测定程序设计报告。

一、设计思路。

1.要达到的目的。

读入文本文件中的学生成绩并保存，显示在文本框中。

统计各科最高分，将最高分学生的学生信息显示在文本中。

计算出每个学生的总成绩，并把总成绩按降序排列。

根据标准评定。

一、二、三等奖和单项奖，并显示学生信息。

单击“查询”输入学号可以显示对应学生成绩。

2.关键问题的解决。

①文本文件的正确录入方法。

菜单和控件的属性设置。

求数组最大值的核心步骤。

数据排序的核心步骤。

循环结构和选择结构的应用。

二、模块之间的调用关系，或程序流程图。

调用。调用调用。

3、部分程序关键源**及注释。

下面是录入成绩的部分。

fileno = freefile ’得到空文件号。

open & for input as #fileno ’用open语句以input方式打开文件。

do while not eof(fileno循环至文件尾。

i = i + 1

input #fileno, num(i), na(i), eng(i), ma(i), com(i), his(i), ty(i) ’将数据读入对应数组。

loopclose #fileno ’关闭文件。

对总成绩降序排列的部分。

for j = 1 to i - 1

for k = 1 to i - j

if sum(k)

t = num(k): num(k) =num(k + 1): num(k + 1) =t ’根据条件交换变量。

d = na(k): na(k) =na(k + 1): na(k + 1) =d姓名和学号应对应同时交换。

c = ma(k): ma(k) =ma(k + 1): ma(k + 1) =c

c = eng(k): eng(k) =eng(k + 1): eng(k + 1) =c

c = com(k): com(k) =com(k + 1): com(k + 1) =c

c = his(k): his(k) =his(k + 1): his(k + 1) =c

c = ty(k): ty(k) =ty(k + 1): ty(k + 1) =c

c = sum(k): sum(k) =sum(k + 1): sum(k + 1) =c

c = zcj(k): zcj(k) =zcj(k + 1): zcj(k + 1) =c ’zcj()=sum()/5 ，得到降序的总成绩

end if

next k

next j

判定奖学金级别的部分。

for j = 1 to i

sum(j) =eng(j) +ma(j) +com(j) +his(j) +ty(j)

zcj(j) =sum(j) /5

if zcj(j) >90 then利用if语句表示判定条件。

= "一等奖学金" &chr(13) &chr(10)

= &num(jna(jzcj(j) &chr(13) &chr(10)

end if在文本框中输出获奖学生信息。

next在判定。

二、三等奖时设计方法同上，只需改动分数条件。

四、设计方案的完善及目前存在的问题。

1．设计方案要完善的地方。

在创新的要求上增加进步奖奖学金。

可以设置颜色使界面更加美观。

2. 目前存在的问题。

在显示各等级奖学金时，文字较繁琐，不够简洁清晰。

5、本次设计的收获及心得体会。

通过本次课程设计，掌握了一些课堂上没有介绍过的控件的设置及使用知识，提高了我的自学能力；在设计的同时，锻炼了自己分部解决问题的能力和逻辑思维能力；此题目的程序设计贴近自己生活，使我认识到vb有很强的实用性，加深了我对vb的理解。vb课程虽然结束，但以后也会继续学习，争取成为vb高手。

六、对该题目和vb设计的意见和建议。

1. 对该题目的意见和建议。

本题目的设计重视基础，较多的运用了循环、选择等结构，突出了一些常用控件的设置方法，有很强的实用性，但设计比较单一，界面也比较简单，如果能增加一些其他程序功能，会更加激发学生编程的兴趣。

2．对本次设计的意见和建议。

课程设计比其他考试更具有挑战性，既巩固了所学知识，又增强了自主解决问题的能力，希望老师们可以多组织一些这样的设计活动，锻炼我们的能力。只是由于放假及准备期末考试等原因使得上机时间比较仓促，如果时间充裕，程序会完成得更好。

Vb课程设计学生奖学金

VB课程设计

VB课程设计

VB课程设计

其他用户还读了

Vb课程设计 学生奖学金

VB课程设计

VB课程设计

VB课程设计

其他用户还读了

Vb课程设计学生奖学金