第一中学学生管理系统 下载完整版：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.donghao.info/post/36.html 
