学生成绩查询系统空间数据库实习设计报告

空间数据库实习设计报告学生成绩查询系统课程名称：数据库原理与应用专 业：地理信息系统班 级：XXX设 计 组：第十小组设 计 者：XXX指导教师：XXX设计时间：2011年11月21日-12月9日河南城建学院测绘与城市空间信息系目录一 系统介绍二 设计目的三 本组成员信息及其任务四 使用说明五 系统设计1. 系统总体设计2. 系统详细设计六 设计小结一 系统介绍1. 总体介绍：学生成绩查询系统v2.0版软件特点：界面清晰，美观，功能单一软件作者：第十组程序员email：v 2.0（虚拟网，不必当真）网 站：v 2.0.126.com（虚拟网，不必当真）警告： 未经授权不得将本软件用于任何商业目的，违者必追究法律责任！（虽然系统功能单一，不过这也是我们组的私有财产，所以未经授权不得转让，谢谢合作）2. 功能介绍这是一个功能还需完善的学生成绩查询管理系统。系统管理员可录入学生成绩和学生基本信息，然后学生用自己的姓名学号登录系统对自己的成绩以及一些基本信息进行查询。 学生可查询各学期各门成绩，查询时可按各种项目自动分类查询。程序的设计从为使用者的角度出发，可以说是还算完善。程序登录：姓名是本班学生的姓名，学号是其相应学号。例：姓名：陈旭娇，学号：062410101姓名：李琦，学号：062410124姓名：赵玉鹏，学号：062410147二 设计目的通过本次课程设计，掌握vfp程序语言的设计过程以及设计思路。培养用vfp设计面向对象的应用软件能力。三 本组成员信息以及任务第十组成员信息姓名学号任务组长马XX062410106建学生在校信息表，还制作了查询表单，菜单，报表以及图片的搜集，系统的连编，音乐的插入以及字符的滚动，显示时间。组员张XX062410143建了学生成绩表，制作了浏览表单，关于表单，以及辅助组长搜集背景图片以及音乐，美化系统董XX062410116建了学生生活基本信息表，制作了登录表单，退出表单，以及辅助组长搜集背景图片以及音乐，帮助美化系统杜XX062410117建了学生照片表，制作了启动表单，帮助，提示表单等，以及帮助组长处理后续工作，搜集背景图片以及音乐组长评语总之，本系统的完成离不开各个组员的大力帮助，组员与组长之间的团结互助是我们去的成功的关键，大家表现的都挺好！希望以后大家共勉，再接再厉！四 使用说明打开本系统后，首先用系统介绍中所给的学员姓名与学号进行登录。登录后进入顶层表单。进入后然后在表单上端的菜单栏中进行选择操作。1.查询查询中包括成绩查询，学生基本信息查询以及学生照片查询。学生成绩查询的查询方式与上类似，同样使用学员的姓名与学号登录。其他的学生信息查询和照片查询方法类似。2.打印打印中包括学生成绩打印和学生基本信息打印3.系统系统选项中包含帮助，关于，还有退出等命令。选择相应的按钮执行相应的操作。五 系统设计1 系统总体设计欢迎界面登录欢迎进入打印系统查询退出关于帮助学生基本信息查询学生成绩表学生照片管理学生成绩查询学生基本信息查询2.系统详细设计1.主程序代码如下：do form 欢迎界面.scxpublic pread events 2.菜单：2.表单：l 欢迎界面.scx对象对象名属性事件窗体Form1Caption：欢迎界面InitMaxbotton：fShowwindow：2-作为顶层表单标签Label1Caption：欢迎进入学生成绩查询无Backstyle：0透明Fontsize：25Foreclosure：255,0,0Autocenter：tAlwaysontop：t命令按钮Command1Caption：进入Click时钟Timer1Interval：150Timer1.form1的init事件代码如下：set bell on set bell to 启动.wav?chr(7)2.Command1的click事件代码如下：do form 登录1.scx3.timer1的timer事件代码如下：if thisform.label1.left1000thisform.label1.left=thisform.label1.left+10elsethisform.label1.left=0endifl 登录1.scxl对象对象名属性事件窗体Form1Caption：登录InitShowwinsow：在顶层表单中标签Label1Caption：学生成绩查询系统v2.0无Backstyle：0-不透明Fontsize：25Foreclosure：255,0,0文本框Txt姓名Value：无无组合框Cbo学号Controlsource：无无Rowsource：学生成绩表.学号Rowsourcetype：6命令按钮Command1Caption：登录ClickCommand2Caption：退出时钟控件Timer1Interval：1000Timer1Command1的click事件的代码如下：n=n+1select 学生成绩表locate for alltrim(thisform.cbo学号.value)=alltrim(学生成绩表.学号)if found() AND alltrim(thisform.txt姓名.value)=alltrim(学生成绩表.姓名)do form 欢迎进入.scx 欢迎界面.releaserelease thisformelseif n3 then=messagebox(学号或姓名错误，请重新输入!,48,警告)else=messagebox(对不起，您是非法用户，系统将会退出!,48,严重警告)mand2的click事件代码如下：Release thisform3.timer1的timer事件代码如下：thisform.label2.caption=time()thisform.label3.caption=cdow(date()thisform.label4.caption=dtoc(date()3秒后的背景图片如下：l 欢迎进入.scx对象对象名属性事件窗体Form1Caption：学生成绩查询InitShowwinsow：2-作为顶层表单标签Label1Caption：欢迎进入学生成绩查询系统无Backstyle：0-透明Fontsize：25Foreclosure：255,0,0时钟控件Timer1Interval：3000Timerl1. form1的init事件代码如下：do 菜单ma.mpr with this,jpublic ww=thisform2. timer1的timer事件代码如下：thisform.picture=c:usersadministratordesktopvisualfox13095623i040-1s14.jpgl 学生成绩查询.scx对象对象名属性事件窗体Form1Caption：查询InitShowwinsow：在顶层表单中标签Label1Caption：学生成绩查询无Backstyle：0-透明Fontsize：25Foreclosure：255,0,0文本框Txt姓名Value：无无组合框Cbo学号Controlsource：无无Rowsource：学生成绩表.学号Rowsourcetype：6Opt姓名Caption：按姓名查询命令按钮Cmd查询Caption：登录查询ClickCmd退出Caption：退出1.Form1的init事件代码如下：public pthisform.cbo学号.setfocusthisform.txt姓名.enabled=.f.2.optiongroup1的opt学号的click事件代码如下：if this.value=1 thenthisform.cbo学号.enabled=.t.thisform.cbo学号.setfocusthisform.txt姓名.enabled=.f.endif3. optiongroup1的opt姓名的click事件代码如下：if this.value=1 thenthisform.txt姓名.enabled=.t.thisform.txt姓名.setfocusthisform.cbo学号.enabled=.f.endif4. command1的click事件代码如下：if thisform.optiongroup1.opt学号.value=1 thenp=select * from 学生成绩表 where 学号=+thisform.cbo学号.value+ into cursor queDO FORM 成绩查询.scxendifif thisform.optiongroup1.opt姓名.value=1 then p=select * from 学生成绩表 where 姓名=+thisform.txt姓名.value+ into cursor quedo form 成绩查询.scxendif5. command2的click事件代码如下：release thisformn 运行结果按学号查询和按姓名查询的运行结果：学生信息查询l 学生基本信息查询.scx对象对象名属性事件窗体Form1Caption：学生信息查询InitShowwinsow：在顶层表单中标签Label1Caption：学生基本信息查询无Backstyle：0-透明Fontsize：25Foreclosure：255,0,0文本框Txt姓名Value：无无命令按钮Cmd查询Caption：登录查询ClickCmd退出Caption：退出1.Form1的init事件代码如下：thisform.txt姓名.enabled=.t.thisform.txt姓名.setfocusthisform.txt学号.enabled=.t2.cmd查询的click事件代码如下：select 学生生活基本信息表locate all for alltrim(thisform.txt姓名.value)=alltrim(学生生活基本信息表.姓名) and alltrim(thisform.txt学号.value)=alltrim(学生生活基本信息表.学号)if found()p=select * from 学生生活基本信息表 where 学号=+thisform.txt学号.value+ into cursor queDO FORM 成绩查询.scxelse=messagebox(没有找到所查信息！,64+0,提示)Endif3.cmd退出的click事件代码如下：Release thisformn 查询结果如下：学生信息查询l 学生照片管理对象对象名属性事件窗体Form1Caption：学生照片管理InitShowwinsow：在顶层表单中命令按钮Command1Caption：第一个ClickCommand2Caption：下一个Command3Caption：上一个Command4Caption：最后一个Command5Caption：添加Command6Caption：修改Command7Caption：删除Command8Caption：退出图片Oleboundcontrol1Controlsource：学生照片表.照片无l1. command1的click事件代码如下：select 学生照片表go topthis.enabled=.mand3.enabled=.mand2.enabled=.mand4.enabled=.t.thisform.txt学号.value=学生照片表.学号thisform.txt姓名.value=学生照片表.姓名thisform.txt性别.value=学生照片表.性别thisform.Oleboundcontrol1.refresh2. command2的click事件代码如下：select 学生照片表skip 1if eof()this.enabled=.mand4.enabled=.mand1.enabled=.mand3.enabled=.t.thisform.txt学号.value=学生照片表.学号thisform.txt姓名.value=学生照片表.姓名thisform.txt性别.value=学生照片表.性别thisform.Omand3的click事件代码如下：select 学生照片表skip -1if bof()this.enabled=.mand1.enabled=.mand2.enabled=.mand4.enabled=.t.thisform.txt学号.value=学生照片表.学号thisform.txt姓名.value=学生照片表.姓名thisform.txt性别.value=学生照片表.性别thisform.Omand4的click事件代码如下：select 学生照片表go bottomthis.enabled=.mand2.enabled=.mand1.enabled=.mand3.enabled=.t.thisform.txt学号.value=学生照片表.学号thisform.txt姓名.value=学生照片表.姓名thisform.txt性别.value=学生照片表.性别thisform.Oleboundcontrol1.refresh5. command5的click事件代码如下：ins