VB课程设计报告-高校毕业生管理系统.doc

Visual Basic课程设计报告高校毕业生管理系统班级：#1241 姓名：*学号：*指导教师：#设计日期:2013.6.24-2013.6.28成 绩： 目录1、本次课程设计的目的、意义12 、软件、硬件环境13、项目设计要达到的目标14、项目功能结构图25、数据库设计25.1数据库组成25.2表设计35.3表间关系35.4创建数据库45.5数据库联接说明86、项目详细设计说明96.1工程文件96.2窗体文件106.3报表(数据库) 227、项目打包258、总结269、教师评语、成绩27 VB课程设计 学生选课系统 1、 课程设计的目的、意义根据教学计划安排，对学生进行计算机VB、Access数据库等方面的综合强化训练，培养和提高学生独立操作和应用计算机的能力。通过为期一个星期的计算机实习在了解计算机VB的基础上，对与计算机应用密切相关的某一方面的管理业务活动进行详细调查和系统分析，建立业务管理信息系统的整体概念，学会运用专业知识去发现问题和解决问题的方法，增强业务实践能力。 课程设计的目的是为了加深学生对课堂所讲授的计算机基础知识及VB中的命令和程序设计方法的进一步理解与掌握,提高学生对所学内容的综合运用能力,同时增强学生程序设计能力，掌握一些编程技巧，并可培养学生实际上机调试程序的能力，使学生对开发信息管理系统有一个总体认识，可使学生得到很好锻炼，为以后学习、工作打下坚实基础。这次设计的意义在于学生通过实际上机调试程序，把平时学习的计算机基础知识及VB中的命令和程序设计方法由原来的书本知识转入实际操作当中。在此过程中，学生通过不断地发现错误，不断地改正错误，更进一步增强同学对这门学科的理解和提高学生的实际操作能力。本次实习我们主要完成的任务：课程设计。要求学生根据所学VB和Access数据库知识，设计开发一个中小型数据库项目或其它VB项目。本次任务的完成，使我受益匪浅，建立了一个小型的管理系统高校毕业生管理系统，在巩固学过的知识的基础上又一次挑战了自己。提高自己制作的作业的质量，加快完成作业的速度。2、软件、硬件环境硬件环境：方正 248M内存 80G硬盘 软件环境：WindowsXP 操作系统 Visual Basic 6.0 开发工具3 、项目设计要达到的目标高校毕业生管理系统这个项目设计要达到的目标有两个，一个是使教师能够通过查询毕业学生的基本信息，了解毕业生就业的一些基本信息；另一个是进而了解毕业生就业的公司及公司的信息。负责调查管理毕业生的老师根据学生的就业情况，及时将这些信息反馈给各个毕业生的任课老师及其同学，以便以后的联系。4 、项目功能结构图欢迎界面密码验证登陆正确登录失败主程序企业信息就业信息学生信息企业信息报表就业信息报表学生信息报表5、数据库设计5.1数据库组成数据库名称：高校毕业生管理系统数据库包含三个表:表1的名称: 学生信息表表2的名称: 企业信息表表3的名称: 就业信息表5.2表设计表1：课程基本信息表字段名类型长度是否是主键学生编号姓名性别电话专业地址是否就业毕业院校数字文本文本数字文本文本是/否文本长整型5050长整型50505050是否否否否否否否表2：企业信息表字段名类型长度是否是主键公司编号公司名称公司地址公司类型公司电话学生编号数字文本文本文本数字数字长整型50长整型50长整型长整型否否否否否是表3：就业信息表字段名类型长度是否是主键学生编号学生姓名年龄性别就业状态专业数字文本数字文本文本文本长整型50长整型505050是否否否否否5.3表间关系表2：就业信息表 主键为学生编号 表3：学生信息表 主键为学生编号表1：就业信息表 主键为学生编号 表3：企业信息表 主键为学生编号5.4创建数据库利用Access建立数据库表中的数据学生信息表表结构：设计视图：学生就业信息表表结构：设计视图：企业信息表表结构：设计视图：5.5 数据库联接说明添加ADO控件 利用ADO访问ACCESS数据库6、项目详细设计说明6.1工程文件工程的名称：高校毕业生管理系统.vbp包含的内容：窗体：Form1: 学生信息查询窗口 Form2: 企业信息查询窗口 Form3:学生就业信息查询窗口 Form4:欢迎界面窗口 Form5:选查信息窗口 Form6:主程序窗口 Form7: 密码验证窗口 设计器：数据环境：DataEnvironment1 DataEnvironment2 DataEnvironment3报表： 报表1名称 学生信息表 功能 显示学生信息 报表2名称 企业信息表 功能 显示学生所选企业的信息 报表3名称 就业信息表 功能 显示学生就业的信息6.2窗体文件窗体1名称：Form4.frm界面：功能：进入用户口令窗体属性设置表： 对象 属性 属性值Label1caption欢迎进入高校毕业生管理系统事件代码：Private Sub Form_Click()Form4.HideForm7.ShowTimer1.Enabled = FalseEnd Sub Private Sub Timer1_Timer()Form4.HideForm7.ShowTimer1.Timer = FalseEnd Sub窗体2名称：Form7.frm界面：功能：进入主程序属性设置表： 对象 属性 属性值Label1caption用户名：Label2caption口令：Text1text空text2text空Passwordchar*Command1caption确定Command2caption退出事件代码：“确定”命令按钮的click事件过程Private Sub Command1_Click()If Text1.Text = 教师 And Text2.Text = 1234 ThenForm6.ShowForm7.HideElsea= MsgBox (密码错误,5+48, 错误)End IfEnd Sub“退出”命令按钮的click事件过程Private Sub Command2_Click()Unload MeEnd Sub窗体3名称：Form6.frm界面：功能：进行信息的添加、删除、查询、保存以及查看报表 属性设置表： 对象 属性 属性值Label1caption高校毕业生Label2caption管理系统Command1caption查询Command2caption退出事件代码：Private Sub Command1_Click()Form6.HideForm5.ShowEnd SubPrivate Sub Command2_Click()b= MsgBox (确定退出？,3+32, 提示)End Sub窗体4名称：Form5.frm界面：功能：进行管理系统中选择性查询学生信息表、企业信息表、就业信息表属性设置表： 对象 属性 属性值Command1caption学生信息Command2caption企业信息Command3caption就业信息Command4caption退出事件代码：输入信息的事件代码：“学生信息”的click事件过程Private Sub Command1_Click()Form1.ShowForm5.HideEnd Sub “企业信息”的click事件过程Private Sub Command2_Click()Form2.ShowForm5.HideEnd Sub “就业信息”的click事件过程Private Sub Command3_Click()Form3.ShowForm5.HideEnd Sub“退出”的click事件过程Private Sub Command4_Click()Form6.ShowForm5.HideEnd Sub窗体5名称：Form1.frm界面：功能：进行学生信息的添加、删除、查询、保存以及查看报表属性设置表： 对象 属性 属性值Label1caption学生编号Label2caption姓名Label3caption性别Label4caption专业Command1caption首条记录Command2caption尾记录Command3caption上一条Command4caption下一条Command5caption添加Command6caption删除Command7caption保存Command8caption返回Command9caption报表事件代码：“首条记录”命令按钮的click事件过程Private Sub Command1_Click()Adodc1.Recordset.MoveFirst End Sub“尾记录”命令按钮的click事件过程Private Sub Command2_Click(Index As Integer)Adodc1.Recordset.MoveLastEnd Sub“上一条”命令按钮的click事件过程Private Sub Command3_Click()If Adodc1.Recordset.BOF Then MsgBox 已到记录头Else Adodc1.Recordset.MovePrevious End If End Sub“下一条”命令按钮的click事件过程Private Sub Command4_Click()If Adodc1.Recordset.BOF Then MsgBox 已到记录尾Else Adodc1.Recordset.MoveNextEnd IfEnd Sub“添加”命令按钮的click事件过程Private Sub Command5_Click()Adodc1.Recordset.AddNew End Sub“删除”命令按钮的click事件过程Private Sub Command6_Click()Adodc1.Recordset.DeleteEnd Sub“保存”命令按钮的click事件过程Private Sub Command7_Click()Adodc1.Recordset.UpdateEnd Sub “返回”命令按钮的click事件过程 Private Sub Command8_Click()Form1.HideForm6.ShowEnd Sub “报表”命令按钮的click事件过程Private Sub Command9_Click()DataReport1.ShowEnd Sub窗体6名称：Form2.frm界面：功能：进行企业信息的添加、删除、查询、保存以及查看报表属性设置表： 对象 属性 属性值Label1caption学生编号Label2caption公司编号Label3caption公司名称Label4caption公司地址Label5caption公司类型Label6caption公司电话Command1caption首条记录Command2caption尾记录Command3caption上一条Command4caption下一条Command5caption添加Command6caption删除Command7caption保存Command8caption返回Command9caption报表事件代码：“首条记录”命令按钮的click事件过程Private Sub Command1_Click()Adodc1.Recordset.MoveFirst End Sub“尾记录”命令按钮的click事件过程Private Sub Command2_Click(Index As Integer)Adodc1.Recordset.MoveLastEnd Sub“上一条”命令按钮的click事件过程Private Sub Command3_Click()If Adodc1.Recordset.BOF Then MsgBox 已到记录头Else Adodc1.Recordset.MovePrevious End If End Sub“下一条”命令按钮的click事件过程Private Sub Command4_Click()If Adodc1.Recordset.BOF Then MsgBox 已到记录尾Else Adodc1.Recordset.MoveNextEnd IfEnd Sub“添加”命令按钮的click事件过程Private Sub Command5_Click()Adodc1.Recordset.AddNew End Sub“删除”命令按钮的click事件过程Private Sub Command6_Click()Adodc1.Recordset.DeleteEnd Sub“保存”命令按钮的click事件过程Private Sub Command7_Click()Adodc1.Recordset.UpdateEnd Sub “返回”命令按钮的click事件过程 Private Sub Command8_Click()Form1.HideForm6.ShowEnd Sub “报表”命令按钮的click事件过程Private Sub Command9_Click()DataReport2.ShowEnd Sub窗体7名称：Form3.frm界面：功能：进行就业信息的添加、删除、查询、保存以及查看报表属性设置表： 对象 属性 属性值Label1caption学生编号Label2caption性别Label3caption学生姓名Label4caption就业状态Label5caption年龄Label6caption专业Command1caption首条记录Command2caption尾记录Command3caption上一条Command4caption下一条Command5caption添加Command6caption删除Command7caption保存Command8caption返回Command9caption报表事件代码：“首条记录”命令按钮的click事件过程Private Sub Command1_Click()Adodc1.Recordset.MoveFirst End Sub“尾记录”命令按钮的click事件过程Private Sub Command2_Click(Index As Integer)Adodc1.Recordset.MoveLastEnd Sub“上一条”命令按钮的click事件过程Private Sub Command3_Click()If Adodc1.Recordset.BOF Then MsgBox 已到记录头Else Adodc1.Recordset.MovePrevious End If End Sub“下一条”命令按钮的click事件过程Private Sub Command4_Click()If Adodc1.Recordset.BOF Then MsgBox 已到记录尾Else Adodc1.Recordset.MoveNextEnd IfEnd Sub“添加”命令按钮的click事件过程Private Sub Command5_Click()Adodc1.Recordset.AddNew End Sub“删除”命令按钮的click事件过程Private Sub Command6_Click()Adodc1.Recordset.DeleteEnd Sub“保存”命令按钮的click事件过程Private Sub Command7_Click()Adodc1.Recordset.UpdateEnd Sub “返回”命令按钮的click事件过程 Private Sub Command8_Click()Form1.HideForm6.ShowEnd Sub “报表”命令按钮的click事件过程Private Sub Command9_Click()DataReport3.ShowEnd Sub6.3报表(数据库) 数据环境文件名称：DataEnvironment1外观：数据环境文件名称：DataEnvironment2外观：报表1名称：学生信息表功能：显示学生选课信息，以便老师了解毕业生生信息运行界面：报表2名称：企业信息表功能：显示公司的基本信息，便于教师了解毕业生就业公司运行界面：报表2名称：就业信息表功能：显示毕业生的就业信息，便于教师了解毕业生就业状态运行界面7、项目打包打开工程在文件中选择“工程1206421125.Vbp”， 即可以生成可执行文件。8、总结 6月24日至6月28日五天的计算机VB课程设计实习结束了。期间，我们通过计算机上机的实践，这次的Visual Basic的课程设计不仅加深了我对VB中的命令和程序设计方法的进一步理解与掌握,更增强了我的程序设计能力与上机的实际操作设计能力，与此同时，还使我掌握了一些比较复杂的编程，加强了计算机设计及编程能力，培养了独立自主解决问题的技能和交流合作的意识。 随着社会的不断进步与发展，计算机作为信息交流的载体与平台，日益发挥着重要的作用。第一天实习的时候，根本就不知道应该从哪一点开始着手做起，在计算机VB课程设计实习中我认为如何将数据库与VB联系起来是任务的难点，后来，看到前几个系统有相关的提示及其系统大概的规划。老师建议我们去图书馆或者网上去查询一下与设计题目相关的一系列信息。第二天，通过多次向同学老师求教及自己对操作的摸索，终于成功设计出了一个小型的管理系统高校毕业生管理系统。在各个软件的应用中，我还学到了不少关于VB和Access的操作小技巧和任务完