vb课程设计报告书

学校名称：石家庄铁道大学学院名称：机械工程学院专业名称：机械设计制造及其自动化学生姓名：xx学生学号：xx学生班级：xx指导教师：xx设计时间：2012-9-4~~2012-9-13目录一、选题的意义1、选择的题目名称：2、选择该题的原因：3、运用的知识点：4、时间的安排：5、参考书籍：二、系统功能需求分析1、用户登录2、学生成绩的维护3、学生成绩的查询4、学生密码修改5、学生成绩录入6.修改学生成绩7、学生成绩查看8、教师密码修改9、添加学生用户10、删除学生用户11、添加教师用户12、删除教师用户13、添加管理员用户14、添加学生基本信息15、成绩管理页面三、系统功能需求分析1、用户登录2、学生成绩的维护3、学生成绩的查询4、下面是学生成绩管理系统结构图四、系统实现1、学生、教师、管理员不同身份登录2、学生查看成绩3、成绩管理页面4、学生成绩录入5、添加学生用户6、添加教师用户7、添加管理员用户8、学生密码修改9、删除学生用户10、删除教师用户11、退出12、教师密码修改13、学生个人信息查询14、教师登录成绩查询五、总结1、总结2、存在的主要问题一、选题的意义1、选择的题目名称：学生成绩管理系统2、选择该题的原因：现在我国的一些院校的学生成绩管理水平普遍不高，有的还停留在纸介质基础上，这种管理手段已不能适应时代的发展，因为它浪费了了许多的人力和物力。在当今信息时代这种传统的管理方法必然被计算机为基础的信息管理系统所代替。如果本系统能被学校所采用，将会改变以前靠手工管理学生成绩的状况，可以树立良好的办学形象，提高工作效率。学生成绩管理系统是为本校开发的，本系统所采用的语言是VisualBasic语言，通过本校内部的信息，依据统一数据信息进行管理，把任何一块信息所产生的数据变动及时地反映给其它相关信息，做到数据共享。我这次选的课程设计题目是小型学生成绩管理系统，该课程设计题目主要围绕学生成绩信息录入、管理与维护展开的，通过对系统的设置将各方面的信息联系在一起，使用户对学生成绩的信息一目了然，能够简洁、迅速的浏览信息，查询信息，快速的找到自己想要的信息。本次课程设计应达到的目的是通过对该题目的设计，掌握软件开发过程的问题分析，系统设计，程序编码，测试等基本方法和技能；掌握数据库的基础知识，利用数据库管理器进行数据库设计的方法，使用Data空间访问数据的方法和掌握利用VB开发数据库系统的方法。通过这次课程设计，我对VB课程设计有了更深入的了解。由于以前只是一些抽象的理论课程，所以对一些具体的课程设计没有具体的接触，对一些语言功能也不是很了解，没有独立完成一次真正的课程设计。通过这次实际操作，我收获很大，对VB的认识也不仅仅停留在以前的层面上，认识到自身存在很大的不足，对VB的认识还需要更深入的了解，进行更详尽的学习，并且需要多次的实践练习。这门课程设计是针对刚学完VisualBasic课程的本科专业学生的课程设计教学。VisualBasic设计是学生的一门计算机语言课程，课程结束后，学生已经对VisualBasic程序设计有了较全面的了解，但接触的基本上是为了阐述相关概念或知识点而列举的示例，都是较小的程序，程序功能单一，因此缺乏整体观点和编写一个具体实用的综合程序的思想。对于学生而言，登录学生成绩管理系统是司空见惯的事，所以也对其系统结构和功能有着较强的印象。但是，如果自己编写一个类似的成绩管理系统，不一定是件轻松的事。本生基于刚学完VisualBasic课程，所以就选择了这个题目，来测试自己所学的能力。如此一来，不但可以更深地了解这门课程的作用，还可以提高编写和修改VisualBasic程序的能力。顺便让同学们试一试我们所编的程序的可实用性。3、运用的知识点：⑴标签的使用；⑵文本框的使用；⑶命令按钮的使用；⑷图片的加载；⑸data控件的使用；⑹时钟控件的使用；⑺窗体的加载、显示和隐藏；⑻数据库的建立和链接：⑼不同身份访问权限的设置；⑽if语句的条件判断；⑾Msgbox对话框的使用；⑿密码的修改；⒀添加新用户。4、时间的安排：9月4号：进行VisualBasic课程设计题目的选择；9月5号：查询成绩管理系统的相关资料；9月6号：查询成绩管理系统的相关资料；9月7号：确定设计方案；9月8号：开始设计程序、编代码；9月9号：开始设计程序、编代码；9月10号：开始调试程序；9月11号：开始调试程序；9月12号：写课程设计报告书；9月13号：写课程设计报告书。5、参考书籍：1.《VisualBasic6.0编程案例精解》，张路平，电子工业出版社2.《VisualBasic6.0数据库编程思想与实践》，谭小丹，冶金工业出版社3.《VisualBasic+Access数据库项目开发实践》，周国民，中国铁道出版社4《VisualBasic程序设计》，王学军，张玉梅，中国铁道出版社二、系统功能需求分析1、用户登录通过输入用户名和密码登录学生信息管理系统。2、学生成绩的维护能够输入学生信息，实现对数据的添加、删除、修改功能。基础数据包括用户信息的添加和修改，学生高数、英语、计算机成绩的添加和修改，添加学生密码的录入，实现管理员管理。3、学生成绩的查询基础数据包括学生基本信息和其学科成绩信息的记录，可以按学生名称和按学生学号进行查询和浏览。由于在学校学生成绩管理系统运用的非常普遍，所以该系统有着强大的和广泛的用处。4、下面是学生成绩管理系统结构图三、系统设计1.登录页面PrivateSubForm_Load()Label2.Caption=欢迎进入成绩管理系统'设置标签的标题Label2.FontName=宋体'设置标签字体Label2.FontSize=22'设置字号登录学生用户教师用户管理员用户成绩查看基本信息修改密码成绩录入成绩修改学生成绩查看教师密码修改添加学生用户删除学生用户添加教师用户删除教师用户添加管理员删除管理员学生成绩查看Label2.ForeColor=vbBlue'设置字体颜色Text1.Text='初始化文本框Text2.Text=Combo1.AddItem学生'为combo1添加选择条件Combo1.AddItem教师Combo1.AddItem管理员Data1.DatabaseName=App.Path&\student.mdb'为data控件设置相对路径及数据库名称EndSubPrivateSubTimer1_Timer()'将标签设置为移动的IfLabel2.Left+Label2.Width0ThenLabel2.MoveLabel2.Left-24ElseLabel2.Left=frm_dl.ScaleWidth'当标签从左边出去后，使其再从右边出来EndIfEndSub2、学生成绩查看PrivateSubCommand1_Click()IfCombo1.Text=学生Then'学生登录IfTrim(Text1.Text)=Then'用户名为空，弹出警告对话框MsgBox用户名不能为空，请重新输入！,vbOKOnly+vbExclamation,警告Text1.SetFocus'为用户名设置焦点ElseData1.RecordSource=select*from学生密码where学号='&Text1.Text&'and密码='&Text2.Text&''从数据库学生密码表中读取学号密码Data1.Refresh'刷新数据库IfData1.Recordset.BOFAndData1.Recordset.EOFThen'没有该用户名或用户名与密码不一致，弹出警告对话框MsgBox用户名或密码输入错误，请重新输入！,vbOKOnly+vbExclamation,警告Text2.Text='清空该文本框数据Text1.SetFocus'清空该文本框数据ElseText2.Text='初始化文本框frm_dl.Hide'隐藏登录窗体frm_xscxcj.Show'弹出学生成绩查询窗体frm_xscxcj.Data1.DatabaseName=App.Path&\student.mdb'设置数据库路径及名称frm_xscxcj.Data1.RecordSource=select*from成绩单where学号='&frm_dl.Text1.Text&''从数据库中读取该学生成绩frm_xscxcj.Data1.Refresh'刷新数据库EndIfEndIfElseIfCombo1.Text=教师Then'教师登录IfTrim(Text1.Text)=Then'用户名为空，弹出警告对话框MsgBox用户名不能为空，请重新输入！,vbOKOnly+vbExclamation,警告Text1.SetFocus'设置焦点ElseData1.RecordSource=select*from教师密码where用户名='&Text1.Text&'and密码='&Text2.Text&''从数据库中读取教师用户名和密码Data1.Refresh'刷新数据库IfData1.Recordset.BOFAndData1.Recordset.EOFThen'没有该教师用户名或用户名与密码不一致，弹出警告对话框MsgBox用户名或密码输入错误，请重新输入！,vbOKOnly+vbExclamation,警告Text2.Text='清空该文本框数据Text1.SetFocus'清空该文本框数据Elsefrm_dl.Hide'隐藏登录窗体frm_cjgl.Show'弹出成绩管理窗体frm_cjgl.tjjsyh.Enabled=False'教师没有添加教师用户的权限frm_cjgl.scxsyh.Enabled=False'教师没有删除学生用户的权限frm_cjgl.scjsyh.Enabled=False'教师没有删除教师用户的权限frm_cjgl.tjxsyh.Enabled=False'教师没有添加学生用户的权限frm_cjgl.tjgly.Enabled=False'教师没有添加管理员的权限EndIfEndIfElseIfTrim(Text1.Text)=Then'用户名为空，弹出警告对话框MsgBox用户名不能为空，请重新输入！,vbOKOnly+vbExclamation,警告Text1.SetFocus'设置焦点ElseData1.RecordSource=select*from管理员密码where用户名='&Text1.Text&'and密码='&Text2.Text&''从数据库中读取管理员用户名和密码Data1.Refresh'刷新数据库IfData1.Recordset.BOFAndData1.Recordset.EOFThen'没有该管理员用户名或用户名与密码不一致，弹出警告对话框MsgBox用户名或密码输入错误，请重新输入！,vbOKOnly+vbExclamation,警告Text2.Text='清空该文本框数据Text1.SetFocus'清空该文本框数据Elsefrm_dl.Hide'隐藏登录窗体frm_cjgl.Show'弹出成绩管理窗体frm_cjgl.xscjlr.Enabled=False'管理员没有成绩录入的权限frm_cjgl.xscjxg.Enabled=False'管理员没有成绩修改入的权限frm_cjgl.jsmmxg.Enabled=False'管理员没有修改教师密码的权限EndIfEndIfEndIfEndSubPrivateSubCommand3_Click()'退出系统EndEndSubPrivateSubfrm_dl_Load()Label2.Width=frm_dl.ScaleWidth'设置标签的尺寸Label2.Left=frm_dl.ScaleWidthData1.DatabaseName=App.Path&\student.mdb'为data控件设置相对路径及数据库名称EndSubPrivateSubCommand1_Click()Ifcombo1.Text=按学