VF课程设计 学生成绩管理系统.docx
《VF课程设计 学生成绩管理系统.docx》由会员分享,可在线阅读,更多相关《VF课程设计 学生成绩管理系统.docx(11页珍藏版)》请在冰豆网上搜索。
VF课程设计学生成绩管理系统
学生成绩管理系统
一.需求分析
(一)数据分析
1.原始数据包括5个表:
(1)电子商务一班成绩单
(2)电子商务二班成绩单
(3)财务管理一班成绩单
(4)财务管理二班成绩单
(5)科技工程学院总成绩单
2.表包括字段:
学期年号(C),班号(C),姓名(C),学号(C),课程名称(C),考试性质(C),考试性质名(C),分数(N),课程号(N)等.
(二)功能分析
基本功能:
1.编辑:
增加记录,修改记录,删除记录
2.查询成绩:
按照学号查询成绩,逐一浏览查询
3.统计成绩:
统计各班各科的总分数,各班各科的平均分,按照学生学号汇总的分数
二.程序设计
1主程序文件代码
settalkoff
closeall
doform封面
modiwindscreentitl'沈阳大学科技工程学院学生成绩管理系统'
clea
do菜单新.mpr
readevent
quit
2.封面
3.确定按钮代码:
i=i+1
ifthisform.id.value="1"andthisform.password.value="111111"
thisform.release
else
ifi<4
messgaebox("密码输入错误,请重新输入!
")
thisform.password.value=""
thisform.password.setfocus
else
messagebox("密码输入错误,系统关闭!
")
thisform.release
endif
endif
4.退出按钮代码:
(1)退出
(2)对话框提示
(3)代码
thisform.release
5.用户名:
1
密码:
111111
6.菜单设计器编辑
7.菜单一览
8.系统菜单下,退出按钮的代码:
ask=messagebox("确实要退出系统吗?
",4+32+256,"学生管理系统")
ifask=6
closeall
clearall
releaseall
clearevents
else
endif
9.浏览按钮:
10.浏览按钮的代码:
1.use成绩03-04-2.DBF
brow
2.usedianshang1.dbf
brow
3.usedianshang2.dbf
brow
4.usecaiguan1.dbf
brow
5.usecaiguan2.dbf
brow
11.编辑菜单
12.编辑菜单的主要代码
1.usedianshang1.dbf
append
2.usedianshang2.dbf
append
3.usecaiguan1.dbf
append
4.usecaiguan2.dbf
append
13.统计菜单:
1.统计求和
1.
2.
求和主要代码(仅以电子商务1班为例)
1.closeall
usedianshang1.dbfin0
sum分数for课程名="高等数学2-2"togs
sele0
?
'电子商务一班高等数学2-2的全班总分是:
',gs
2.closeall
usedianshang1.dbfin0
sum分数for课程名="英语4-2"toyy
sele0
?
'电子商务一班英语4-2的全班总分是:
',yy
3.closeall
usedianshang1.dbfin0
sum分数for课程名="体育"toty
sele0
?
'电子商务一班体育的全班总分是:
',ty
4.closeall
usedianshang1.dbfin0
sum分数for课程名="政治经济学"tozz
sele0
?
'电子商务一班政治经济学的全班总分是:
',zz
5.closeall
usedianshang1.dbfin0
sum分数for考试性质名="选修"togx
sele0
?
'电子商务一班公共选修课的全班总分是:
',gx
3.统计实例
4.求平均分
5.平均代码:
settalkoff
n=32&&学生人数
S=0&&存放累加值的变量清零
fori=1ton&&循环32次,步长值为1省略
input"请输入要统计平均分的成绩(输入32人的成绩):
"toY
&&输入32位同学的成绩
S=S+Y
endfor
Average=S/n&&求平均分
?
"该科的平均分为:
",Average&&输出
6.输入平均数:
7.汇总菜单
8.汇总代码
1.usedianshang1
indexon学号taghzxh
totalto电子商务一班汇总表on学号fiel分数
use电子商务一班汇总表
listfiel学年学期,学号,姓名,班号,分数
2.clea
usecaiguan2
indexon学号taghzxhce
totalto财务管理二班汇总表on学号fiel分数
use财务管理二班汇总表
dispallfiel学年学期,学号,姓名,班号,分数
8.汇总表:
9.查询菜单
10.查询代码
1.Usedianshang1.DBF
DoWhile.T.
Accept"请您输入要查询学生的学号(输入0结束查询):
"Toxh
Ifxh=='0'
Exit
Endif
LocateForAlltrim(学号)==xh
IfFound()
DispFORAlltrim(学号)==xh
Endif
Enddo
2.Usedianshang2.DBF
DoWhile.T.
Accept"请您输入要查询学生的学号(输入0结束查询):
"Toxh
Ifxh=='0'
Exit
Endif
LocateForAlltrim(学号)==xh
IfFound()
DispFORAlltrim(学号)==xh
Endif
Enddo
11.查询结果
12.帮助菜单
13.帮助代码
clea
use版本.dbf
list
14.帮助信息显示