vfp学籍信息管理系统.doc

《vfp学籍信息管理系统.doc》由会员上传分享，免费在线阅读，更多相关内容在教育资源-天天文库。

1、课题名称：学籍管理信息系统一系统分析据本次课程设计指导老师的要求，需建立一个“学籍管理系统”，以取代人工管理。开发项目如：1能对与学籍管理有关的各类数据进行输入，修改，浏览与打印。2能根据需要查询学籍管理所需的各类数据。3打印学生学籍信息，奖学金，个人简历等报表。了解了老师的要求，我详细查阅了图书馆的相关书籍，经过调查，设想，我终于归纳出了目标系统，以满足数据需求和功能需求。二总体程序设计总体程序设计共分为三个层次，系统功能需求可分为4方面。如功能界面所示:(1)录入功能.(2)浏览功能(3)查询功能(4)报表打印功能.三报表设计数据需求建立一

2、个名为xjgl的项目，在此项目下建立一个名为xjgl的数据库，它包括4个主表和4个自由表。用户需提供和输入的数据如下表所示：（1）主表：学籍卡表，简历表，奖学金表，班级表Xjk.dbf(学号，姓名，性别，出生日期，民族，政治面貌，班级名称，奖惩情况，特长生，照片，备注)Jl.dbf(学号，起始时间，终止时间，所在单位，备注)Jxj.dbf(学号，姓名，班级名称，第一学年，第二学年，第三学年，第四学年，累计)Bj.dbf（班级名称，所属系部，入学年度，学制，备注）（1）自由表：系部表，民族表，政治面貌表，毕业班级表xb.dbf(系部名称)zzmm

3、.dbf(政治面貌)mz.dbf(民族)Bj.dbf（班级名称，所属系部，入学年度，学制，备注）四表单及代码1根据需要共建立了8个表单，分别是：“登陆系统”表单、“欢迎界面”表单、功能界面表单、数据查询表单、学籍数据管理表单、报表打印表单、班级基本信息表单、奖学金数据管理表单。截图如下：（1）“登陆系统”表单代码：确定：docasecasethisform.optiongroup1.value=1ifthisform.text1.value="aaa"andthisform.text2.value="111messagebox("欢迎使用本系统

4、")doform欢迎界面thisform.releaseelsei=i+1ifi<=3messagebox("账号或密码错，重新输入")thisform.text1.value=""thisform.text2.value=""thisform.text1.setfocuselsemessagebox("信息有误，禁止进入！")quitendifendifcasethisform.optiongroup1.value=2ifthisform.text1.value="xxx"andthisform.text2.value="123"messag

5、ebox("欢迎使用本系统")doform欢迎界面thisform.releasek=k+1ifk<=3messagebox("账号或密码错，重新输入").text1.value=""thisform.text2.value=""thisform.text1.setfocuselsemessagebox("信息有误，禁止进入！")quitendifendifendcase退出;thisform.release（2）“欢迎界面”表单：代码：timer1：ifthisform.label1.left+thisform.label1.width<0t

6、hisform.label1.left=thisform.widthelsethisform.label1.left=thisform.label1.left-10endiftimer2：ifthisform.label1.left+thisform.label1.width<0thisform.label1.left=thisform.widthelsethisform.label1.left=thisform.label1.left-10endif（2）“功能界面”表单：代码：学籍管理：doform数据查询thisform.Refresh奖

7、学金：doform数据查询thisform.refres学籍管理：doform学籍管理奖学金：doform奖学金数据管理个人简历：doform最新简历班级：doform班级信息管理个人简历：doform个人简历报表的打印奖学金：doform奖学金报表的打印学籍管理：doform学籍报表的打印退出系统：quit（2）“数据查询”表单：按班级查询：selectxjksetfiltertoxjk.班级名称=thisform.combo1.valuegotopthisform.refresh按姓名查询：selectxjksetfilterto;allt

8、rim(xjk.姓名)==alltrim(thisform.text1.value)countalltorsgotopthisform.refresh