教学管理系统设计说明模板

《教学管理系统设计说明模板》由会员上传分享，免费在线阅读，更多相关内容在行业资料-天天文库。

1、教学管理系统设计说明兰州交通大学课程设计(论文)题目名称教学管理系统课程名称数据库技术及应用学生姓名毛燕春学号201109118学院自然班自动化与电气工程学院电气2011-01指导教师甄兴华2013年6月14日SQL数据库课程设计26教学管理系统设计说明1.需求本系统主要用于学校的学生成绩管理。1.用户身份的验证2.学生基本信息管理3.按班级选课4.学生成绩的管理2.总体设计本系统包括：标准模块、系统登录模块、主界面模块、系统管理模块、学生基本信息管理模块、选课模块、成绩管理模块。1.标准模块定义公共变量和过程。2.系统登录模块进行用户

2、身份的验证。3.主界面模块作为系统总界面，供用户进行各项选择。4.系统管理模块用户管理及系统退出。5.学生基本信息管理模块学生基本信息的录入和查询。6.选课模块为班级选课。7.成绩管理模块进行学生成绩的录入及查询。3.数据库设计及配置3.1.数据库设计该数据库由以下几个表组成：用户表、学生基本信息表、班级课程表、学生成绩表。3.1.1用户表包括用户名、密码、是否是超级用户。字段名称数据类型用户名文本密码文本是否为超级用户布尔3.1.2学生基本信息表包括学号、姓名、电话、地址、班级名称、性别。字段名称数据类型学号文本SQL数据库课程设计2

3、6教学管理系统设计说明姓名文本电话文本地址文本班级名称文本性别文本1.1.1班级课程表包括班级名称、课程名称。字段名称数据类型班级名称文本课程名称文本1.1.2学生成绩表包括学号、课程名称、成绩。字段名称数据类型学号文本课程名称文本成绩数值（单精度浮点型）1.2.数据库中各表关系学生基本信息表与班级课程表通过班级名称字段相关联，学生基本信息表与学生成绩表通过学号字段相关联，班级课程表与学生成绩表通过课程名称字段相关联。2.系统实现2.1.标准模块（公有模块）2.1.1标准模块中的数据定义用于定义全局变量及过程。本系统定义了当前用户名及用

4、户类型。序号变量名数据类型1UserNameString2UserTypeBoolean2.1.2标准模块代码设计OptionExplicitPublicUserNameAsStringPublicUserTypeAsBoolean2.2.系统登录模块2.2.1说明进行用户身份的验证。特定的用户才能登录到系统。SQL数据库课程设计26教学管理系统设计说明1.1.1窗体设计系统登录窗体的窗体类型为Form，界面如下图所示：主要控件属性如下表所示：对象名类型属性值说明FrmLogin窗体Caption学生成绩管理系统登录学生成绩管理系统登录

5、窗体Label1标签Caption用户名：Label2标签Caption密码：Text1文本框Text用于输入用户名Text2文本框Text用于输入密码cmdOk命令按钮Caption确定确定当前输入的用户名和密码，进行用户登录。登录成功后进入主界面。如果三次输入错误的用户和密码，程序将自动退出cmdCancel命令按钮Caption取消取消操作，退出程序Adodc1AdodcConnectionString连接所使用的数据库，ConnectionString属性在界面中设置，RecordSource属性在代码中设置。1.1.2代码设计

6、l公共定义OptionExplicitDimCount1AsIntegerl窗体装载处理程序（Load）PrivateSubForm_Load()Count1=0‘错误次数清零EndSubl取消按钮（cmdCancel）处理程序（Click）SQL数据库课程设计26教学管理系统设计说明PrivateSubcmdCancel_Click()UnloadMe‘系统退出EndSubl确定按钮（cmdOk）处理程序（Click）PrivateSubcmdOk_Click()Dims1AsStringDimPasswordAsStringOnEr

7、rorResumeNextIfText1.Text=""Then‘用户名为空，则退出MsgBox("用户名不能为空,请重新输入")Text1.SetFocusExitSubEndIf‘按输入的用户名进行查询s1="SELECT*from用户表WHERE用户名='"&Text1.Text&"'"Adodc1.RecordSource=s1Adodc1.RefreshIfAdodc1.Recordset.EOF=FalseThen‘判断查询结果UserName=Adodc1.Recordset.Fields(0)‘有该用户名，即用户名正确P

8、assword=Adodc1.Recordset.Fields(1)UserType=Adodc1.Recordset.Fields(2)IfPassword=Text2.TextThen‘判断密码是否正确