学生信息管理系统论文范文-计算机毕业设计论文范文-优秀毕业论文范文

.PAGE.1系统技术及运行环境1.1VisualFoxpro6.0简介VisualFoxpro6.0是计算机优秀的数据管理系统软件之一,正如其名称中的"Visual"一样,它采用了可视化的、面向对象的程序设计方法,大大简化了应用系统的开发过程,并提高了应用系统的开发过程,并提高了系统的模块性和紧凑型。是新一代的小型数据库管理系统的杰出代表,它以其强大的性能、完整而又丰富的工具、较高的处理速度、友好的界面以及较完备的兼容性,备受广大用户的欢迎。面前,VisualFoxpro6.0是用户收集信息、查询数据、创建集成数据库系统、进行应用系统开发较为理想的微机数据库管理系统。1.2系统开发及运行环境该运行环境的规定是保证本需求说明的功能得到实际真正体现的基础。〔1运行环境Windows98或更高版本的操作系统数据库系统：MicrosoftVisualFoxpro6.0〔2开发环境：开发工具：MicrosoftVisualFoxpro6.0数据库系统：MicrosoftVisualFoxpro6.02系统分析2.1需求分析21世纪以来,人类经济高速发展,人们发生了日新月异的变化,特别是计算机的应用及普及到经济和社会生活的各个领域。使原本的旧的管理方法越来越不适应现在社会的发展。许多人还停留在以前的手工操作。这大大地阻碍了人类经济的发展。为了适应现代社会人们高度强烈的时间观念,学校信息管理系统软件为学校办公室带来了极大的方便。〔一教育系统学生管理现状分析学校工作流程分析学校工作总体规划由教务人员在学生信息管理系统中完成对运行教务处所需的基本数据的维护,包括这些信息的增加、修改及对各项信息的变动都将在这进行操作。新的学年,教务人员首先加入年级信息,然后编排班级,再对来校学生进行基本的信息录入,新生入学后由教务人员在学籍系统中完成新学生信息的维护。〔二学校具体需求分析学生：对各科成绩的查询任课老师：输入并维护所教科目的学生成绩教务处：学校全体成员的信息管理,并对任课老师,班主任等输入的信息进行存库,对学生的信息进行必要的维护。通过研究调查,本系统需以下功能：综合学生信息、学生成绩以及信息查询等信息。方便用户了解和管理学生的全面动态信息。良好的界面设计,更人性化的设计理念,使用户拥有更轻松的使用心情。2.2可行性分析目的：可行性研究的目的是用最小的代价在尽可能的时间内确定问题是否能解决。经济性：由于学校等中小型管理系统并不复杂,且VisualFoxpro6.0本身要求的运行环境不高,所以一般Windows2000以上的系统环境都可以使用。实用性：本学生信息管理系统管理系统无太多复杂的操作要求,也没有过分花哨的装饰品,人性化的设计界面可以使操作者轻易运用自如3总体设计3.1设计目标本系统可以能减少很多不必要的资源,不用象以前那样用冗余的纸张式的管理。大节省了学校能源。并且计算机的存储与快速查询功能大大提高了学籍管理的效率,并且还提高了学籍信息管理的精确度。方便快速的操作,可减少学籍信息管理的漏洞,又减少因工作的冗余出现的错误,并且操作非常简单,可减少许多不很必要的人员,这无论从物质上还是工作人员的工资上都为学校节约了开支。为学校增加了财富。数据库分析用户需求具体有学籍管理系统提供保存、更新、查询、维护,这就需求数据库结构能充分满足各种信息的输入与输出,实现有组织地、动态地存储大量关联数据,方便用户访问系统中的数据,它与文件系统的重要区别是数据的充分共享,交叉访问,与应用程序的高度独立性。3.2项目规划学生管理系统是各大中专院校不可缺少的一部分,是一个VF数据库开发应用程序,它主要包括用户登录、学生信息输入修改、学生信息查询以及学生成绩输入、学生成绩查询、系统用户管理等几个页面,因而该系统具有较强的实用性。3.3系统功能图学生课程信息管理学生课程信息管理学生成绩信息管理系统管理学生成绩管理系管理学生成绩录入专业管理用户管理修改密码退出系统班级管理学生班级管理学生信息管理学生信息录入学生信息录入学生信息录入课程管理学生信息管理系统登录系统主界面4系统详细设计4.1数据库设计〔1deandma.dbf,见表1表1字段名数据类型备注班级Char〔8主键Notnull系Char〔10Notnull专业Char〔14Notnull〔2grade.dbf,见表2表2字段名数据类型备注学号Char〔8主键Notnull班级Char〔10Notnull课程Char〔18Notnull成绩Int<5>Notnull学期Char〔2Notnull备注MemoNull〔3stduents.dbf,见表3表3字段名数据类型备注班级Char〔8主键Notnull学号Char〔8Notnull姓名Char〔8Notnull性别Char〔6NotNull出生日期DatetimeNull政治面貌Char〔8Null身份证号码Char〔16Null入学时间DatetimeNull籍贯Char〔16Null家庭住址Char〔28Null邮政编码Char〔6Null照片GeneralNull备注MemoNull<4>.dbf,见表4表4用户信息表字段名数据类型备注姓名Char〔8主键Notnull密码Char〔6Notnull标识LogicalNotnull4.2登陆界面设计"进入"按钮的click事件添加如下的代码:seleyonghuifallt<thisform.text1.value>==""messagebox<left<allt<thisform.label1.caption>,6>+"为空,请输入！",64,"提示">elseifallt<thisform.text2.value>==""messagebox<"密码为空,请输入！",64,"提示">elsen=n+1locateforallt<姓名>=allt<thisform.text1.value>;.and.allt<密码>=allt<thisform.text2.value>iffound<>ifthisform.check1.value==1.and.标识checked=1thisform.releasedomenu.mprelseifthisform.check1.value==1.and.!标识messagebox<"你不是管理员！",48,"警告">thisform.check1.value=0elsechecked=0cyonghu=allt<姓名>cmima=allt<密码>thisform.releasedomenu.mprendifendifelseifn>=3messagebox<"你不是合法用户,请与管理员联系！",48,"警告">thisform.releasecleareventquitelsemessagebox<left<allt<thisform.label1.caption>,6>+"或密码错误,请重新输入！",64,"提示">thisform.text1.value=""thisform.text2.value=""endifendifendifendif"取消"按钮的click事件添加如下的代码nr=messagebox<"你选择了退出登录,是否退出？",68,"用户登录">ifnr=6thisform.releasequitendif4.3学生信息录入"增加"按钮的click事件添加如下的代码:ifthis.caption=="增加"if<thisformbo3.displayvalue=="〔选择">.or.<alltrim<thisform.text1.value>=="">;.or.<alltrim<thisform.text2.value>=="">messagebox<"班级、学号和姓名必须填充！！",64,"提示">elselocateforalltrim<thisform.text1.value>=alltrim<students.学号>if!eof<>=messagebox<"此学号已经存在,请重新输入！",64,"提示">thisform.text1.value=""elseselestudentsappendblankreplace班级withalltrim<thisformbo3.value>,学号withalltrim<thisform.text1.value>;姓名withalltrim<thisform.text2.value>,出生日期withctod<alltrim<thisform.text4.value>>;入学时间withctod<alltrim<thisform.text6.value>>,籍贯withalltrim<thisform.text7.value>;家庭住址withalltrim<thisform.text8.value>,身份证号码withalltrim<thisform.text8.value>;alue>,邮政编码withalltrim<thisform.text3.value>ifalltrim<thisformbo4.value>==""replace性别withalltrim<thisformbo4.displayvalue>elsereplace性别withalltrim<thisformbo4.value>endififalltrim<thisformbo5.value>==""replace政治面貌withalltrim<thisformbo5.displayvalue>elsereplace政治面貌withalltrim<thisformbo5.value>endif&&if.not.alltrim<thisform.label17.caption>==""if!pictemp==""waitwindows"正在导入相片,请等待！"at100,40timeout2nowait&& pictemp=thisform.label17.captionappendgeneralstudents.照片from"&pictemp"endifpictemp=""this.caption="继续"endifendifelsethis.caption="增加"endif4.4学生信息修改"修改"按钮的click事件添加如下的代码:iththisformselestudentslocateforallt<学号>=allt<.text1.value>ifallt<学号>==allt<.text1.value>replace学号withallt<.text1.value>,姓名withallt<.text2.value>,邮政编码withallt<.text3.value>,;出生日期with.text4.value,入学时间with.text6.value,籍贯withallt<.text7.value>,;家庭住址withallt<.text8.value>,身份证号码withallt<.text9.value>,性别withallt<bo4.value>,;政治面貌withallt<bo5.value>,备注withallt<.edit1.value>if!pictemp==""waitwindows"正在导入相片,请等待！"at100,40timeout2nowaitappendgeneral照片from"&pictemp"endifendifselelslocateforallt<学号>=allt<.text1.value>ifallt<学号>==allt<students.学号>replace学号withstudents.学号,姓名withstudents.姓名,邮政编码withstudents.邮政编码,;出生日期withstudents.出生日期,入学时间withstudents.入学时间,籍贯withstudents.籍贯,;家庭住址withstudents.家庭住址,身份证号码withstudents.身份证号码,性别withstudents.性别,;政治面貌withstudents.政治面貌,备注withstudents.备注,照片withstudents.照片endifpictemp=""this.enabled=.f.endwith4.5学生信息查询"定位查询"按钮的click事件添加如下的代码ifallt<thisform.text1.value>==""messagebox<"请输入学号或姓名！",64,"提示">elseselestulslocateforallt<学号>=allt<thisform.text1.value>;.or.allt<姓名>=allt<thisform.text1.value>iffound<>gorecn<>elsewaitwindowat18,38nowait'没有找到你要查询的信息！'endifendifthisform.refresh"第一个"按钮的click事件添加如下的代码selestulsskip-1ifbof<>this.enabled=.f.thisformmandgroup1mand3.enabled=.f.messagebox<"已经到第一条记录了！",64,"提示">gotopelsegorecn<>endifthisformmandgroup1mand2.enabled=.t.thisformmandgroup1mand4.enabled=.t."单个查询"按钮的click事件添加如下的代码nxx=1doformxxxg4.6系管理表单设计"增加"按钮的click事件添加如下的代码setordertotagsetsafetyoffifalltrim<thisform.text1.value>==""messagebox<"系名为空,请输入！",64,"提示">elselocatefordeandma.系=alltrim<thisform.text1.value>if.not.eof<>messagebox<"系名已经存在,请重新输入！",48,"提示">thisform.text1.value=""elseappendblankreplacedeandma.系withalltrim<thisform.text1.value>thisform.text1.value=""cusendifthisform.list1.init&&重新显示list列表thisform.list1.value=""endif"删除"按钮的click事件添加如下的代码Setsafetyoffifthis.caption=="取消"thisform.text2.value=""thisform.text2.enabled=.f.thisform.label3.enabled=.f.this.caption="删除"thisformmand1.enabled=.t.thisformmand2.caption="修改"elseifalltrim<thisform.text1.value>==""messagebox<"缺少完整信息,无法删除！",0+48,"警告">elsethisform.list1.value=alltrim<thisform.text1.value>nn=messagebox<"是否确定删除此系单位,其所属的专业班级的数据库都将删除！",1+48,"警告">ifnn==1t=0usedata\deandmagotopdowhile.not.eof<>ifalltrim<系>==alltrim<thisform.text1.value>deletepackt=1endifskipenddoift==0messagebox<"将删除的内容不存在,请重新输入。",60,"提示">endifendifthisform.text1.value=""thisform.list1.init&&重新显示List列表thisform.text1.value=alltrim<thisform.list1.value>endifendifthisform.refresh4.7班级管理"增加"按钮的click事件添加如下的代码setordertotagsetsafetyoffifalltrim<thisform.text1.value>==""messagebox<"班级名为空,请输入！",64,"提示">elselocatefordeandma.班级=alltrim<thisform.text1.value>if.not.eof<>messagebox<"班级名已经存在,请重新输入！",48,"提示">thisform.text1.value=""elselocatefordeandma.专业=alltrim<thisformbo2.value>ifalltrim<deandma.班级>==""replacedeandma.班级withalltrim<thisform.text1.value>elseappendblankreplacedeandma.系withalltrim<thisformbo1.value>replacedeandma.专业withalltrim<thisformbo2.value>replacedeandma.班级withalltrim<thisform.text1.value>endifthisform.text1.value=""endifthisformbo2.click&&重新显示list列表thisform.list1.value=""endif"删除"按钮的click事件添加如下的代码Setsafetyoffifthis.caption=="取消"thisform.text2.value=""thisform.text2.enabled=.f.thisform.label5.enabled=.f.this.caption="删除"thisformmandgroup1mand1.enabled=.t.ion="修改"elseifalltrim<thisform.text1.value>==""=messagebox<"缺少完整信息,无法删除！",0+48,"警告">elseusedeandmaexclusivethisform.list1.value=alltrim<thisform.text1.value>nn=messagebox<"是否确定删除此班级,与其相关的数据都将删除！",1+48,"警告">ifnn==1t=0locateforalltrim<deandma.班级>=alltrim<thisform.text1.value>deletepackt=1ift==0messagebox<"将删除的内容不存在,请重新输入。",64,"提示">endifendifthisform.text1.value=""thisformbo2.click&&重新显示List列表thisform.text1.value=alltrim<thisform.list1.value>endifendifthisform.refresh4.8学生成绩录入"确定"按钮的click事件添加如下的代码xuehao=allt<thisform.text1.value>banji=allt<thisformbo3.value>kecheng=allt<thisformbo4.value>xueqi=allt<thisformbo5.value>chengji=allt<thisform.text2.value>selegradeifchengji==""tt=messagebox<"想输入单科成绩吗？",4+32,"提示">iftt==6elseendifelse*locateforallt<学号>=xuehao*ifeof<>locateforallt<课程>=kechengifallt<学号>=="".and.allt<班级>==banjirepl学号withxuehaorepl成绩withval<chengji>repl学期withxueqielse*appendblank*repl学号withxuehao*repl班级withbanji*repl课程withkecheng*repl成绩withval<chengji>*repl学期withxueqi*endif*elselocateforallt<学号>=xuehao.and.allt<课程>==kecheng.and.allt<学期>==xueqiifeof<>appendblankrepl学号withxuehaorepl班级withbanjirepl课程withkechengrepl成绩withval<chengji>repl学期withxueqielsett=messagebox<"该科的成绩已存在,是否覆盖？",4+32+256,"提示">iftt==6repl成绩withval<chengji>endifendifendifthisformmand3.enabled=.f.endif"查询"按钮的click事件添加如下的代码selelsifallt<thisform.text3.value>==""messagebox<"请输入学号或姓名！",64,"提示">elselocatefor学号=allt<thisform.text3.value>.or.姓名=allt<thisform.text3.value>ifeof<>messagebox<"该班级没有此人！！",64,"提示">thisform.text3.value=""gonhereelsethisform.text1.value=学号endifendif4.9修改学生成绩"快速查询"按钮的click事件添加如下的代码selelsbjifallt<thisform.text1.value>==""messagebox<"请输入学号或姓名！",16,"提示">elselocatefor学号=allt<thisform.text1.value>.or.姓名=allt<thisform.text1.value>ifeof<>messagebox<"本班级没有此人,请重新输入！",64,"提示">thisform.text1.value=""elsexuehao=allt<学号>thisform.label8.caption=姓名thisform.label9.caption=学号endifendif"下一位"按钮的click事件添加如下的代码thisformmand2.enabled=.t.thisformmand4.enabled=.t.if!allt<thisformbo3.value>==""selelsbjskip1ifeof<>this.enabled=.f.thisformmand5.enabled=.f.messagebox<"已经到最后一条记录了！",48,"提示">gobottomendifxuehao=allt<学号>thisform.label8.caption=allt<姓名>thisform.label9.caption=allt<学号>4.10学生成绩查询"补考统计"按钮的click事件添加如下的代码ifallt<thisformbo3.value>==""messagebox<"请选择班级!",64,"提示">elsebkbdoformbukaoendif"定位查询"按钮的click事件添加如下的代码ifallt<thisform.text1.value>==""messagebox<"请输入学号或姓名！",64,"提示">elselocateforallt<students.学号>=allt<thisform.text1.value>.or.;allt<students.姓名>=allt<thisform.text1.value>iffound<>lsxh=allt<students.学号>lsxm=allt<students.姓名>buxq=allt<thisformbo4.value>doformdgcjelsemessagebox<"没有此人,请重新输入",64,"提示">endifendif4.11用户管理List1的init事件中添加的代码如下seleyonghuthis.additem<"管理员">locatefor标识=.T.dowhilefound<>this.additem<""+姓名>continueenddogotoplocatefor标识=.F.this.additem<"普通用户">dowhilefound<>this.additem<""+姓名>continueenddo"注册"按钮的click事件添加如下的代码Setsafetyoffseleyonghuifalltrim<thisform.text1.value>==""messagebox<"用户名不能为空！",0+48,"警告">elselocatefor姓名=alltrim<thisform.text1.value>if<.not.eof<>>messagebox<"此用户已存在,请重新输入！",64,"警告">thisform.text1.value=""elseifalltrim<thisform.text2.value>==""messagebox<"密码不能为空！",0+48,"警告">elseif<thisform.text2.value>==<thisform.text3.value>appendblankrepl姓名withalltrim<thisform.text1.value>,;密码withalltrim<thisform.text2.value>ifthisform.check1.value==1repl标识with.T.elserepl标识with.F.endifthisform.text1.value=""thisform.text2.value=""thisform.text3.value=""thisform.text3.enabled=.f.thisform.label4.enabled=.f.elsett=messagebox<"确认密码错误,请重新输入！",0+48,"警告">iftt==1thisform.text3.enabled=.t.thisform.label4.enabled=.t.thisform.text3.value=""endifendifendifendifendif"删除"按钮的click事件添加如下的代码ifallt<thisform.text1.value>==""messagebox<"请选择或输入用户名",64,"提示">elseuseyonghulocatefor姓名=allt<thisform.text1.value>;.and.密码=allt<thisform.text2.value>ifeof<>messagebox<"请选择或输入正确的用户名",64,"提示">thisform.text1.value=""thisform.text2.value=""elsett=messagebox<"一定要删除吗？",4+48,"删除确认">iftt==6deletepackendifendifendif4.12修改用户密码"修改"按钮的click事件添加如下的代码seleyonghuifallt<thisform.text1.value>==""elselocateforallt<姓名>=allt<thisform.text1.value>ifeof<>messagebox<"此用户不存在,请重新输入！",64,"提示">thisform.text1.value=""thisform.text1.setfocus<>elseif!allt<密码>==allt<thisform.text2.value>messagebox<"密码错误,请重新输入