学生管理系统.doc

上传人:人*** 文档编号:558654928 上传时间:2022-10-03 格式:DOC 页数:61 大小:1.65MB
返回 下载 相关 举报
学生管理系统.doc_第1页
第1页 / 共61页
学生管理系统.doc_第2页
第2页 / 共61页
学生管理系统.doc_第3页
第3页 / 共61页
学生管理系统.doc_第4页
第4页 / 共61页
学生管理系统.doc_第5页
第5页 / 共61页
点击查看更多>>
资源描述

《学生管理系统.doc》由会员分享,可在线阅读,更多相关《学生管理系统.doc(61页珍藏版)》请在金锄头文库上搜索。

1、学生管理系统一 系统功能分析系统开发的总体任务是实现学生信息关系的系统化,规范化和自动化。主要功能有:1 有关学籍等信息的输入,包括输入学生基本信息,所在班机,所学课程和成绩等。2 学生信息的查询,包括查询学生基本信息,所在班级,已学课程,和成绩等3 学生信息修改4 班级管理信息的输入,包括输入班级设置,年级信息等。5班级管理信息查询6 班级管理信息修改7 学校基本课程信息输入8 基本课程信息修改9 学生课程的设置和修改10学生成绩信息的输入11 学生成绩信息的修改12 学生成绩信息的查询13学生成绩信息的统计112 系统功能模块设计 学生信息管理系统成绩信息管理课程信息管理班级信息管理学籍信

2、息管理系统管理成绩信息查询成绩信息修改成绩信息添加年级课程设置课程信息修改课程信息添加班级信息修改班级信息添加学籍信息查询学籍信息修改学籍信息添加密码管理用户管理二 数据库设计1.2.1 数据库需求分析1 学生基本信息:学号 ,姓名,性别, 出生日期,班号,电话,入校日期,家庭住址,备注等。2 班级信息:班号,所在年级,班主任姓名,所在教室3 课程基本信息:课程号,课程名称,课程类别,课程描述4 课程设置信息:年级信息,所学课程等。5 学生成绩信息:考试编号,所在班级,学生学号,学生姓名,所学课程,考试分数 学生注册基本信息输入成绩信息输入班级课程设置学籍信息管理成绩信息管理班级课程管理课程基

3、本信息班级设置班级管理1.2.2数据库概念结构设计根据扇面的设计规划出的实体有:学生实体,班级实体,年级实体,课程实体各个实体具体的描述E-R图如下学生成绩信息 学 生学生基本信息学生班级信息学生课程信息班 级班 号所在年级班主任课程课程编号课程名称课程类型年级年级名称包括班级设置课程学生成绩信息所在教室课程描述实体和实体之间的关系E-R如下 班级设置学 生年级课程班 级年级设置课程设置考核过程三 数据库结构的实现1.3.1 创建数据库和数据表1 创建系统用户表格 user-InfoCREAT TABLE dbo.user-info( user-ID char (10) COLLATE Chi

4、nese-PRC-CI-AS NOT NULL, user-PWD char (10) COLLATE Chinese-PRC-CI-AS NULL, user-Des char (10) COLLATE Chinese-PRC-CI-AS NULL,)ON PRIMARY2 创建学生基本信息表格 student_InfoCREATE TABLE dbo. student_Info( student_ID int NOT NULL,student -ID char (10) COLLATE Chinese-PRC-CI-AS NULL,student -Sex char (2) COLLATE

5、 Chinese-PRC-CI-AS NULL,born_Date datetime NULL,class_NO int NULL,tele_Number char (10) COLLATE Chinese-PRC-CI-AS NULL,ru_Date datetime NULL,address varchar (50) COLLATE Chinese-PRC-CI-AS NULL,comment varchar (200) COLLATE Chinese-PRC-CI-AS NULL,)ON PRIMARY3创建班级信息表格 class_InfoCREAT TABLE dbo.class-i

6、nfo(class_No int NOT NULL,grade char (10) COLLATE Chinese-PRC-CI-AS NULLdirector char (10) COLLATE Chinese-PRC-CI-AS NULLclassroom_No char (10) COLLATE Chinese-PRC-CI-AS NULL )ON PRIMARY4 创建课程基本信息表 course_InfoCREAT TABLE dbo.course-info(course_No int NOT NULL,course_Name char (10) COLLATE Chinese-PR

7、C-CI-AS NULLcourse_Type char (10) COLLATE Chinese-PRC-CI-AS NULLcourse_Des char (50) COLLATE Chinese-PRC-CI-AS NULL)ON PRIMARY5创建年级课程设置信息表 gradecourse_InfoCREAT TABLE dbo.gradecourse-info(grade char (10) COLLATE Chinese-PRC-CI-AS NULLcourse_Name char (10) COLLATE Chinese-PRC-CI-AS NULL)ON PRIMARY6 创

8、建学生成绩信息表 result_InfoCREAT TABLE dbo.result-info(exam_No char (10) COLLATE Chinese-PRC-CI-AS NOT NULstudent_ID int NOT NULLstudent Name char (10) COLLATE Chinese-PRC-CI-AS NULLclass_No int NULLcourse_Name char (10) COLLATE Chinese-PRC-CI-AS NULLresult float NULL)ON PRIMARY 四 系统用户管理模块的创建控 件属 性属性取值frmL

9、ogin(From)NamefrmLoginCaptionStartUpPostionCenterScreenWindowStateNomaltxtUserNameNametxtUserNametxtpasswordNametxtPasswordPassword* cmdOKNamecmdOKCaption确定cmdCancelNamecmdCancelCaption取消Label1Caption学生信息管理系统Label2Caption用户名Label3Caption用户密码LabelCaption版权提供主要实现:1 用户登录2 添加用户3 修改用户密码系统启动后,将首先出现如下图所示的用

10、户登录窗体,用户首先输入用户名,然后输入密码,如果用户3次输入密码不正确,将退出程序。用户登录窗体中放置两个文本文档(TextBox),用来输入用户名和用户密码;两个按钮(CommandButton)用来确定或取消登录;4个标签(Label)用来标示窗体的信息。为窗体定义全局变量OK,用来判断登陆是否成功;定义miCount,用来记载输入密码的次数,并且在载入窗体时初始化这两个变量,代码如下:用户登录窗体创建强制变量声明代码实现如下:Option ExplicitPublic OK As Boolean记录确定次数Dim miCount As IntegerPrivate Sub Form_L

11、oad()OK = False miCount = 0End SubOption Explicit 是用来规定所有变量使用前必须定义。这样可以避免由于输入错误而产生的新变量。 当用户输入完用户名和用户密码,单击cmdOK按钮将对用户输入信息进行判断。用户单击按钮,将触发按钮cmdOK的Click事件,代码如下:Private Sub cmdOK_Click()用来存放SQL语句 Dim txtSQL As String 用来存放记录集对象Dim mrc As ADODB.Recordset 用来存放返回信息 Dim MsgText As String ToDo: create test for

12、 correct password check for correct password UserName = If Trim(txtUserName.Text = ) Then 判断输入用户名为空 MsgBox 没有这个用户,请重新输入用户名!, vbOKOnly + vbExclamation, 警告 txtUserName.SetFocus Else txtSQL = select * from user_Info where user_ID = & txtUserName.Text & Set mrc = ExecuteSQL(txtSQL, MsgText) If mrc.EOF = True Then MsgBox 没有这个用户,请重新输入用户名!, vbOKOnly + vbExclamation, 警告 txtUserName.SetFocus Else If Trim(mrc.Fields(1) = Trim(txtPassword.Text) Then OK = True mrc.Close Me.Hide UserName = Trim(txtUserName.Text) Else MsgBox 输入密码不正确,请重新输入!, vbOKOnly + vbExclamation, 警告 txtPassword.SetFocus txtPassword.Text

展开阅读全文
相关资源
正为您匹配相似的精品文档
相关搜索

最新文档


当前位置:首页 > 生活休闲 > 科普知识

电脑版 |金锄头文库版权所有
经营许可证:蜀ICP备13022795号 | 川公网安备 51140202000112号