学生信息管理系统VFP课程设计Word格式.docx
- 文档编号:6438992
- 上传时间:2023-05-06
- 格式:DOCX
- 页数:35
- 大小:427.40KB
学生信息管理系统VFP课程设计Word格式.docx
《学生信息管理系统VFP课程设计Word格式.docx》由会员分享,可在线阅读,更多相关《学生信息管理系统VFP课程设计Word格式.docx(35页珍藏版)》请在冰点文库上搜索。
使原本的旧的管理方法越来越不适应现在社会的发展。
许多人还停留在以前的手工操作。
这大大地阻碍了人类经济的发展。
为了适应现代社会人们高度强烈的时间观念,学校信息管理系统软件为学校办公室带来了极大的方便。
(一)教育系统学生管理现状分析
学校工作流程分析
学校工作总体规划由教务人员在学生信息管理系统中完成对运行教务处所需的基本数据的维护,包括这些信息的增加、修改及对各项信息的变动都将在这进行操作。
新的学年,教务人员首先加入年级信息,然后编排班级,再对来校学生进行基本的信息录入,新生入学后由教务人员在学籍系统中完成新学生信息的维护。
(二)学校具体需求分析
学生:
对各科成绩的查询
任课老师:
输入并维护所教科目的学生成绩
教务处:
学校全体成员的信息管理,并对任课老师,班主任等输入的信息进行存库,对学生的信息进行必要的维护。
通过研究调查,本系统需以下功能:
综合学生信息、学生成绩以及信息查询等信息。
方便用户了解和管理学生的全面动态信息。
良好的界面设计,更人性化的设计理念,使用户拥有更轻松的使用心情。
3.2可行性分析
目的:
可行性研究的目的是用最小的代价在尽可能的时间内确定问题是否能解决。
经济性:
由于学校等中小型管理系统并不复杂,且VisualFoxpro6.0本身要求的运行环境不高,所以一般Windows2000以上的系统环境都可以使用。
实用性:
本学生信息管理系统管理系统无太多复杂的操作要求,也没有过分花哨的装饰品,人性化的设计界面可以使操作者轻易运用自如
4总体设计
4.1设计目标
本系统可以能减少很多不必要的资源,不用象以前那样用冗余的纸张式的管理。
大节省了学校能源。
并且计算机的存储与快速查询功能大大提高了学籍管理的效率,并且还提高了学籍信息管理的精确度。
方便快速的操作,可减少学籍信息管理的漏洞,又减少因工作的冗余出现的错误,并且操作非常简单,可减少许多不很必要的人员,这无论从物质上还是工作人员的工资上都为学校节约了开支。
为学校增加了财富。
数据库分析
用户需求具体有学籍管理系统提供保存、更新、查询、维护,这就需求数据库结构能充分满足各种信息的输入与输出,实现有组织地、动态地存储大量关联数据,方便用户访问系统中的数据,它与文件系统的重要区别是数据的充分共享,交叉访问,与应用程序的高度独立性。
4.2项目规划
学生管理系统是各大中专院校不可缺少的一部分,是一个VF数据库开发应用程序,它主要包括用户登录、学生信息输入修改、学生信息查询以及学生成绩输入、学生成绩查询、系统用户管理等几个页面,因而该系统具有较强的实用性。
4.3系统功能图
5系统详细设计
5.1数据库设计
(1)deandma.dbf,见表1
表1
字段名
数据类型
备注
班级
Char(8)
主键Notnull
系
Char(10)
Notnull
专业
Char(14)
(2)grade.dbf,见表2
表2
学号
课程
Char(18)
成绩
Int(5)
学期
Char
(2)
Memo
Null
(3)stduents.dbf,见表3
表3
主键Notnull
姓名
性别
Char(6)
NotNull
出生日期
Datetime
政治面貌
身份证号码
Char(16)
入学时间
籍贯
家庭住址
Char(28)
邮政编码
照片
General
(4).dbf,见表4
表4用户信息表
密码
标识
Logical
5.2登陆界面设计
“进入”按钮的click事件添加如下的代码:
seleyonghu
ifallt(thisform.text1.value)=="
"
messagebox(left(allt(thisform.label1.caption),6)+"
为空,请输入!
64,"
提示"
)
thisform.text1.setfocus
else
ifallt(thisform.text2.value)=="
messagebox("
密码为空,请输入!
thisform.text2.setfocus
n=n+1
locateforallt(姓名)=allt(thisform.text1.value);
.and.allt(密码)=allt(thisform.text2.value)
iffound()
ifthisform.check1.value==1.and.标识
checked=1
thisform.release
domenu.mpr
ifthisform.check1.value==1.and.!
你不是管理员!
48,"
警告"
thisform.check1.value=0
checked=0
cyonghu=allt(姓名)
cmima=allt(密码)
endif
ifn>
=3
你不是合法用户,请与管理员联系!
clearevent
quit
或密码错误,请重新输入!
thisform.text1.value="
thisform.text2.value="
“取消”按钮的click事件添加如下的代码
nr=messagebox("
你选择了退出登录,是否退出?
68,"
用户登录"
ifnr=6
5.3学生信息录入
“增加”按钮的click事件添加如下的代码:
ifthis.caption=="
增加"
if(bo3.displayvalue=="
(选择)"
).or.(alltrim(thisform.text1.value)=="
);
.or.(alltrim(thisform.text2.value)=="
班级、学号和姓名必须填充!
!
locateforalltrim(thisform.text1.value)=alltrim(students.学号)
if!
eof()
=messagebox("
此学号已经存在,请重新输入!
selestudents
appendblank
replace班级withalltrim(bo3.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);
备注withalltrim(thisform.edit1.value),邮政编码withalltrim(thisform.text3.value)
ifalltrim(bo4.value)=="
replace性别withalltrim(bo4.displayvalue)
replace性别withalltrim(bo4.value)
ifalltrim(bo5.value)=="
replace政治面貌withalltrim(bo5.displayvalue)
replace政治面貌withalltrim(bo5.value)
&
if.not.alltrim(thisform.label17.caption)=="
pictemp=="
waitwindows"
正在导入相片,请等待!
......."
at100,40timeout2nowait
pictemp=thisform.label17.caption
appendgeneralstudents.照片from"
pictemp"
pictemp="
this.caption="
继续"
mand2.click
5.4学生信息修改
“修改”按钮的click事件添加如下的代码:
iththisform
locateforallt(学号)=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(.combo4.value),;
政治面貌withallt(.combo5.value),备注withallt(.edit1.value)
appendgeneral照片from"
selels
ifallt(学号)==allt(students.学号)
replace学号withstudents.学号,姓名withstudents.姓名,邮政编码withstudents.邮政编码,;
出生日期withstudents.出生日期,入学时间withstudents.入学时间,籍贯withstudents.籍贯,;
家庭住址withstudents.家庭住址,身份证号码withstudents.身份证号码,性别withstudents.性别,;
政治面貌withstudents.政治面貌,备注withstudents.备注,照片withstudents.照片
this.enabled=.f.
endwith
5.5学生信息查询
“定位查询”按钮的click事件添加如下的代码
请输入学号或姓名!
selestuls
locateforallt(学号)=allt(thisform.text1.value);
.or.allt(姓名)=allt(thisform.text1.value)
gorecn()
waitwindowat18,38nowait'
没有找到你要查询的信息!
'
thisform.grid1.refresh
thisform.refresh
“第一个”按钮的click事件添加如下的代码
skip-1
ifbof()
mand3.enabled=.f.
已经到第一条记录了!
gotop
mand2.enabled=.t.
mand4.enabled=.t.
“单个查询”按钮的click事件添加如下的代码
nxx=1
doformxxxg
5.6系管理表单设计
“增加”按钮的click事件添加如下的代码
setordertotag
setsafetyoff
ifalltrim(thisform.text1.value)=="
系名为空,请输入!
locatefordeandma.系=alltrim(thisform.text1.value)
if.not.eof()
系名已经存在,请重新输入!
replacedeandma.系withalltrim(thisform.text1.value)
thisform.list1.clear
thisform.list1.init&
重新显示list列表
thisform.list1.value="
“删除”按钮的click事件添加如下的代码
Setsafetyoff
取消"
thisform.text2.enabled=.f.
thisform.label3.enabled=.f.
删除"
mand1.enabled=.t.
mand2.caption="
修改"
缺少完整信息,无法删除!
0+48,"
thisform.list1.value=alltrim(thisform.text1.value)
nn=messagebox("
是否确定删除此系单位,其所属的专业班级的数据库都将删除!
1+48,"
ifnn==1
t=0
usedata\deandma
dowhile.not.eof()
ifalltrim(系)==alltrim(thisform.text1.value)
delete
pack
t=1
skip
enddo
ift==0
将删除的内容不存在,请重新输入。
60,"
thisform.list1.requery
重新显示List列表
thisform.text1.value=alltrim(thisform.list1.value)
5.7班级管理
班级名为空,请输入!
locatefordeandma.班级=alltrim(thisform.text1.value)
班级名已经存在,请重新输入!
locatefordeandma.专业=alltrim(bo2.value)
ifalltrim(deandma.班级)=="
replacedeandma.班级withalltrim(thisform.text1.value)
replacedeandma.系withalltrim(bo1.value)
replacedeandma.专业withalltrim(bo2.value)
bo2.click&
thisform.label5.enabled=.f.
usedeandmaexclusive
thisform.list1.value=al
- 配套讲稿:
如PPT文件的首页显示word图标,表示该PPT已包含配套word讲稿。双击word图标可打开word文档。
- 特殊限制:
部分文档作品中含有的国旗、国徽等图片,仅作为作品整体效果示例展示,禁止商用。设计者仅对作品中独创性部分享有著作权。
- 关 键 词:
- 学生 信息管理 系统 VFP 课程设计