VB课程设计报告模板0 本文作者:donghao 发布于:7/6/2010 分类:学习资料 点击:43 第一中学学生管理系统 下载完整版:VFP课程设计样式2.rar
2009级XX专业XX名 学号111 1.设计目的 完成一个小型应用系统的开发设计——第一中学学生管理系统。 进一步掌握Visual FoxPro面向对象程序设计中关于对象、属性、方法和事件的基本概念,熟悉常用对象的属性设置和使用方法。在实际应用设计中灵活运用所学知识。 2.系统功能设计 本系统拟实现对第一中学学生资料、学习成绩信息的添加、浏览、查询与修改等管理功能;实现对学生信息按出生日期或按分数进行统计计算并对所获资料进行报表式打印。 3.运行系统所需要的软件、硬件环境 软件环境:Windows XP操作系统;Visual FoxPro 6.0开发语言。 硬件环境:Intel P4或更高CPU;内存256MB以上,硬盘1GB以上。 4.系统总体设计 学生管理系统功能模块图,如图1所示。 图1 系统功能模块图 4.1资料浏览 实现对已有学生档案资料、学生各科目成绩及课程设置信息的浏览。 4.2资料管理 实现对学生档案资料、成绩资料以及课程设置资料的修改、添加,删除等功能。 4.3资料统计 实现按照学生的特定条件进行数据资料统计。 4.4资料打印 打印学生的相关资料信息。 5.详细设计 5.1数据库表 (1)学生档案表(XSDN.DBF) XSDN.DBF表结构见表1,表数据见图2。 表1 学生档案(XSDN.DBF)表结构 字段名 字段类型 字段宽度 小数点 索引类型 可否为空 学号 C 10 0 普通索引 否 姓名 C 8 0 否 性别 C 2 0 否 出生日期 D 10 0 否 民族 C 10 0 否 籍贯 C 20 0 否 政治面貌 C 4 0 否 班级 C 20 0 否 图2 XSDN表 (2)学生成绩表(XSCJ.DBF) XSCJ.DBF表结构见表2,表数据见图3。 表2 学生成绩(XSCJ.DBF)表结构 字段名 字段类型 字段宽度 小数点 索引类型 可否为空 学号 C 10 0 普通索引 否 数学 N 3 1 否 英语 N 3 1 否 信息技术 N 3 1 否 图3 XSCJ表 (3)课程设置表(KCSZ.DBF) KCSZ.DBF表结构见表3,表数据见图4。 表3 课程设置(KCSZ.DBF)表结构 字段名 字段类型 字段宽度 小数点 索引类型 可否为空 课程名称 C 10 0 普通索引 否 任课教师 C 8 0 否 备注 M 0 否 图4 KCSZ表 5.2表单设计 (1)主界面 学生管理系统主界面,如图5所示。表单属性及说明见表4。 图5 主界面 表4 主界面表单属性 对象 属性 属性值 说明 Form1 picture Administrator照片->风景06 表单背景 Label1 Caption Backcolor Fontname fontsize 学生档案管理 0—透明 隶体 20 Label2 Caption 进入系统 Label3 Caption 退出系统 相关程序代码如下: ①Label2_click Thisform.visible=.F. do form D:\学生档案.scx ②Label3_click Thisform.release (2)资料浏览设计 资料浏览界面,如图6、图7、图8所示。 图6 学生档案资料 图7 学生成绩资料 图8 课程资料 (3)档案管理设计 表单属性及说明见表5。表单界面如图9、图10所示。 表5 “学生档案”表单属性表 对象 属性 属性值 说明 Form2 picture Administrator照片->风景06 表单背景 Commandgroup1 Buttomcount AutoSize 8 .T. Command1- Command8 AutoSize caption FontSize .T. 下一条,上一条 9 Label1 Caption AutoSize 学生档案管理 .T. 图9 学生档案管理 程序代码: Form1_load: open database XS Foum1_unload: close database Commandgroup1_click: use XSDN do case case this.value=1 if recn()<recc() skip endif case this.value=2 if recn()>1 skip-1 endif case this.value=3 go top case this.value=4 go bottom case this.value=5 append blank case this.value=6 delete pack case this.value=7 thisform.release endcase thisform.refresh 图10 学生成绩管理 程序代码: Form1_load: open database XS Foum1_unload: close database Commandgroup1_click: use XSCJ do case case this.value=1 if recn()<recc() skip endif case this.value=2 if recn()>1 skip-1 endif case this.value=3 go top case this.value=4 go bottom case this.value=5 append blank case this.value=6 delete pack case this.value=7 thisform.release endcase thisform.refresh (4)资料统计设计 表单属性及说明见表6。表单界面如图11所示。 图11学生情况统计 程序代码: Optiongroup1_InteractiveChange: use XSDN count for 性别="男" to na count for 性别="女" to nv count to zs do case case this.value=1 thisform.text1.value=str(zs,4) case this.value=2 thisform.text2.value=str(nv,4) case this.value=3 thisform.text3.value=str(na,4) endcase use thisform.refresh Optiongroup2_InteractiveChange: use XSDN count for 出生日期>ctod(thisform.text4.value) to rq1 count for 出生日期<ctod(thisform.text5.value) to rq2 count for 出生日期<ctod(thisform.text7.value).and.; 出生日期>ctod(thisform.text6.value)to rq3 do case case this.value=1 thisform.text8.value=str(rq1,8) case this.value=2 thisform.text8.value=str(rq2,8) case this.value=3 thisform.text8.value=str(rq3,8) endcase use thisform.refresh Optiongroup3_InteractiveChange: use XSCJ count for 数学=allt(thisform.text10.value) to cj1 count for 数学<allt(thisform.text11.value) to cj2 count for 数学>allt(thisform.text12.value) to cj3 count for 数学>allt(thisform.text13.value).and.; 数学<allt(thisform.text14.value) to cj4 do case case this.value=1 thisform.text9.value=str(cj1,4) case this.value=2 thisform.text9.value=str(cj2,4) case this.value=3 thisform.text9.value=str(cj3,4) case this.value=4 thisform.text9.value=str(cj4,4) endcase use thisform.refresh 表6 学生情况统计表单属性表 对象 属性 属性值 说明 Form1 picture Administrator照片->风景06 表单背景 Label1 Caption AutoSize BackStyle Fontname fontsize 学生情况统计 .T. 0— 透明 隶体 24 Label2 Caption AutoSize BackStyle 按出生日期统计人数 .T. 0—透明 Label3 Caption AutoSize 按数学分数统计人数 .T. Optiongroup1 BackStyle buttomcount 0--透明 3 Option1 Option2 Option3 Caption Caption Caption 学生总数 女生人数 男生总数 Optiongroup2 BackStyle Buttomcount 0--透明 3 Option1 Option2 Option3 Caption backstyle Caption backstyle Caption backstyle 在---之前 0—透明 在---之后 0—透明 在---之间 0—透明 Optiongroup3 BackStyle Buttomcount 0--透明 3 Option1 Option2 Option3 Caption backstyle Backstyle backstyle 等于 小于 大于 在---之间 (4) 资料打印报表设计
报表见图12、图13、图14。 图12 XSDN表报表 图13 XSCJ表报表 图14 KCSZ表报表 6.结论 该程序能对有关学生的档案资料、成绩资料进行浏览、查询与管理。该程序能对学生进行人数统计并且能进行按出生日期和数学分数的统计工作。该程序可以对XSDN、XSCJ和KCSZ三表进行报表式打印。 7.参考文献 [1]康萍,王晓奇,张天雨.Visual FoxPro程序设计宾用教程习题解答与实验指导[M].北京:中国经济出版社,2006.6:95-136 [2]苗雪兰,刘瑞新,宋会群.数据库技术及应用实验指导与习题解答[M].北京:机械工业出版社,2005.3:104-128 [3]康萍,刘小冬.Visual FoxPro数据应用[M].北京:清华大学出版社,2007.1:297-311 [4]求是科技.Visual FoxPro信息管理系统开发[M].北京:人民邮电出版社,2005.4:135-158 [5]赵歆. Visual FoxPro程序设计教程[M].北京:清华大学出版社,北京交通大学出版社,2005.2:355-376 本人签字: 下载: 201007061954038484.rar 本文出自: 东昊信息网, 原文地址: http://www./post/36.html |
|