学籍管理系统资料

《学籍管理系统资料》由会员上传分享，免费在线阅读，更多相关内容在教育资源-天天文库。

1、前言通过使用MicrosoftVisualBasic6.0+Access数据库开发形成一个小型学生学籍管理系统，该系统可实现对学生成绩的查询、修改、添加、删除以及管理等功能，以此来巩固我们所学的数据库管理知识。使用系统时，可以通过系统菜单进行各种操作，菜单元素主要是表格和表单组成。表单的实现是经过程序实现的。目录1主题；2设计思想；3系统流程；4功能要求；5分析与设计：（1）数据库文件设计；（2）结构设计；（3）程序设计；6系统测试;7系统实施;8心得体会;9参考文献10附录【正文】1题目学生成绩管理系统2设计思想本课程设计的主要任务是通过使用

2、MicrosoftVisualBasic6.0+Access数据库编写一个小型的学生成绩管理系统，利用已学的vb知识以及一些基础的编程知识来完成对学生基本信息的添加、删除和修改，教师基本信息的添加，学生成绩的录入、排序和查询。3系统流程：输入学生的学号及密码后，可自动进入学生学籍管理系统进行相关的操作，具体的操作流程如下：首先打开用户登录界面，输入该学生的学号及密码，点击确定，进入主窗体界面，然后在已有的菜单提示下依次进入所要查询的信息，以及对已有的信息进行修改。4功能要求：学生管理系统实现如下信息的管理：学生基本信息管理用于班级信息和学生信息

3、的建立和修改以及查询；成绩管理用于成绩的查询、输入、修改、汇总；教师管理用于查看；5分析与设计分析：该系统可以达到以下几个目的：学生基本资料查询；档案添加与删除，学生个人信息查询，学生成绩修改、查洵、添加、汇总。在软件开发分析阶段，信息收集是决定软件项目可行性的重要环节。程序设计者要通过对开发项目信息的收集，确定系统目标，软件开发的总体思路。设计：一：数据库文件设计1用程序文件建立数据库文件“成绩.mdb”2用程序文件建立数据库文件“学生信息.mdb”3建立“登录.mdb”二：结构设计在结构设计中要求设计整体结构即菜单的结构，菜单下的各个环节的

4、结构以及各个环节又包含了什么元素等。在进入菜单以前系统具有安全性能，必须经过登录表单才能进入系统菜单。登录表单的结构如图1：各控件属性及程序：PrivateSubCombo1_Change()EndSubPrivateSubCommand1_Click()DimTxtsqlAsStringDimMrcAsADODB.RecordsetSetCmd.ActiveConnection=ConnIfTrim(txtusername.Text="")ThenMsgBox"没有这个用户,请重新输入用户名!",,"警告"txtusername.Text="

5、"txtusername.SetFocusElseIfCombo1.Text="学生"ThenTxtsql="select*from学生基本信息表where学号='"&txtusername.Text&"'"Cmd.CommandText=TxtsqlCmd.CommandType=adCmdTextSetMrc=Cmd.ExecuteIfMrc.EOF=TrueThenMsgBox"没有这个用户,请重新输入用户名!",,"警告"txtusername.Text=""txtusername.SetFocusElseIfTrim(Mrc.Fiel

6、ds(1))=Trim(txtpassword.Text)Thenok=TrueMrc.CloseMe.HideUsername2=Trim(txtusername.Text)UnloadMeForm2.ShowForm2.shuru.Enabled=FalseForm2.xiugai.Enabled=FalseForm2.Remove.Enabled=FalseForm2.tshuru.Enabled=FalseForm2.luru.Enabled=FalseSetMrc=NothingSetConn=NothingElseMsgBox"输入

7、密码不正确,请重新输入!",,"警告"txtpassword.Text=""txtpassword.SetFocusmicount=micount+1Ifmicount=3ThenMsgBox"你已经输入三次!",,"警告"EndEndIfEndIfEndIfEndIfIfCombo1.Text="课任教师"ThenTxtsql="select*from教师登录信息where姓名='"&txtusername.Text&"'"Cmd.CommandText=TxtsqlCmd.CommandType=adCmdTextSetMrc=Cmd.Ex

8、ecuteIfMrc.EOF=TrueThenMsgBox"没有这个用户,请重新输入用户名!",,"警告"txtusername.Text=""txt