《毕业设计_学生档案管理系统的设计与实现_精品》由会员分享，可在线阅读，更多相关《毕业设计_学生档案管理系统的设计与实现_精品（46页珍藏版）》请在金锄头文库上搜索。
1、. . . .学生档案管理系统项目应用开发数据库应用程序的开发始终算得上是VB编程中的难点，这是因为你不仅要熟悉VB中关于数据库编程方面的知识（当然这是十分简单的）还要了解数据库的知识。本系统主要用来实现学生基本情况和学生成绩的录入、修改、查询、删除和打印等功能。通过本系统，可以了解如何使用Visual Basic来开发一个比较完整的数据库应用程序。用到的数据库控件有DATA、ADO，添加的一个数据环境。一、系统结构图本系统主要包括学生基本情况更新，学生基本情况维护和学生成绩维护3个大的模块，各个模块的具体功能如图所示：学生档案管理系统学生基本情况更新学生基本情况维护学生成绩维护添加删除修改查
2、询选择专业修改添加删除打印按专业查询添加成绩查找打印按学号查找按专业查找图1-1 应用程序的功能模块结构图二、数据库的建立本系统用到的数据库是用Visual Basic的外加工具Visual Data Manager(可视化数据管理器)创建，名为student.mdb（是access数据库），其中用到两个表，分别为：基本情况表和学生成绩表。两表的结构如下所示：表1-1 字段名类型宽度学号Text6姓名Test10性别Text2班级Text20出生年月Data/Time8政治面貌Text4家庭住址Text20电话Text8E_mailText20照片Binary0表1-2字段名类型宽度学号Tex
3、t6课程Test8成绩Long4学期Integer制作过程如下：1、 选择VB外接程序菜单中的可视化数据管理器，进入可视化数据管理器；2、 在可视化数据管理器中选择文件菜单中的新建选项建立数据库文件，然后从数据库厂家列表中选择要创建的数据库类型（本例选择Microsoft Access中的Version MDB 2.0版本）；3、 在选择要创建的Microsoft Access数据库对话框中，输入数据库名student，按确定按钮进入数据库窗口；4、 在数据库窗口中单击鼠标右键并从弹出式菜单中选择新建表来创建student.mdb数据库中的两个表（基本情况表和学生成绩表）。三、各个窗体的设计与
4、实现（一） 主窗体的设计与实现首先在VB中新建一个标准工程并起名为成绩管理，在标准工程中添加一个MDI窗体并起名为Frmmain。主窗体的设计界面如图1-2所示：图1-2 主窗体的设计界面 在主窗体中主要应用了菜单、工具栏和状态栏。下面分别介绍这些组成部分的功能。1、 菜单的设计菜单是Windows应用程序中的重要组成部分，这里将对每个菜单项及其子菜单的功能进行简单介绍，如表1-1所示。表1-3 应用程序的菜单项列表主菜单名子菜单项菜单功能数据维护（Repair）情况表更新（Edit）显示学生情况表更新窗体情况表维护（Cedit）显示学生情况表维护窗体成绩表维护（Cjwh）显示学生成绩表维护窗
5、口退出本系统（Quit1）退出应用程序帮助(Help)关于系统（Absystem）显示关于系统窗体系统帮助（Abhelp）显示系统帮助窗体退出(Exit)推出本系统（Quit）退出应用程序MID应用程序中，父窗体可以有自己的菜单，子窗体也可以有属于自己的菜单。这些菜单的创建都可以利用Menu Editor来进行创建。2、 Imagelist控件程序包括一个Imagelist控件，它用来为工具栏提供图片。在程序的基本控件中没有此项控件，添加此控件的方法是在基本控件的空白处点击鼠标右键，在出现的快捷菜单中选择部件，之后在部件对话框中的部件选项卡中选择Microsoft Windows common
6、 controls 6.0控件，确定即可。在窗体中添加一个Imagelist控件，名为默认的Imagelist1，再为此控件添加几个图标。3、工具栏设计工具栏提供了便捷的操作方式来完成应用程序常用的操作。在现在的Windows应用程序中，工具栏已经成为非常主要的组成部分。本例工具栏的设计步骤为：首先在窗体中添加一个toolbar控件，之后为此控件添加6个按钮，并把每个按钮分别和Imagelist1控件的图片绑定。4、状态栏设计在主窗体上添加一个Statusbar控件，用鼠标右键点击此控件，在属性页的对话框中为窗体添加6个窗格，分别放置窗口信息和显示当前日期和时间。5、主窗体界面的代码实现 菜单
7、的Click事件代码：Private Sub CEDIT_Click()Unload FrmjbgxUnload frmcjUnload FrmHELPUnload FrmwelcomeUnload frmaboutLoad FrmjbwhFrmjbwh.ShowEnd SubPrivate Sub cjwh_Click()Unload FrmjbgxUnload FrmjbwhUnload FrmHELPUnload FrmwelcomeUnload frmaboutLoad frmcjfrmcj.ShowEnd SubPrivate Sub EDIT_Click()Unload Frmjb
8、whUnload frmcjUnload FrmHELPUnload FrmwelcomeUnload frmaboutLoad FrmjbgxFrmjbgx.ShowEnd SubPrivate Sub Absystem_Click()Unload FrmjbgxUnload frmcjUnload FrmjbwhUnload FrmwelcomeUnload frmaboutLoad FrmHELPFrmHELP.ShowEnd SubPrivate Sub Ahelp_Click()Unload FrmjbgxUnload frmcjUnload FrmHELPUnload Frmwel
9、comeUnload FrmjbwhLoad frmaboutfrmabout.ShowEnd SubPrivate Sub quit_Click()Frmmain.HideUnload FrmmainEnd SubPrivate Sub quit1_Click()Frmmain.HideUnload FrmmainEnd Sub窗体的Load事件代码：Private Sub MDIForm_Load()Load FrmwelcomeFrmwelcome.ShowEnd Sub工具栏的Buttonclick事件代码： Private Sub Toolbar1_ButtonClick(ByVal
10、 Button As MSComctlLib.Button)Select Case Button.Index Case 1Unload FrmjbwhUnload frmcjUnload FrmHELPUnload FrmwelcomeUnload frmaboutLoad FrmjbgxFrmjbgx.Show Case 2Unload FrmjbgxUnload frmcjUnload FrmHELPUnload FrmwelcomeUnload frmaboutLoad FrmjbwhFrmjbwh.Show Case 3Unload FrmjbgxUnload FrmjbwhUnloa
11、d FrmHELPUnload FrmwelcomeUnload frmaboutLoad frmcjfrmcj.Show Case 4Unload FrmjbgxUnload frmcjUnload FrmHELPUnload FrmwelcomeUnload FrmjbwhLoad frmaboutfrmabout.Show Case 5Unload FrmjbgxUnload frmcjUnload FrmjbwhUnload FrmwelcomeUnload frmaboutLoad FrmHELPFrmHELP.Show Case 6Frmmain.HideUnload Frmmai
12、nEnd SelectEnd Sub(二)学生基本情况更新窗体的设计与实现首先在工程中添加一个标准窗体并起名为Frmjbgx。再在基本空间上添加一个通用对话框控件，方法是在基本控件的空白处按鼠标右键，选择部件，在部件对话框中选择Microsoft Common Dialog Control 6.0控件，按确定按钮。然后在窗体上添加各种控件，如图1-3设计屏幕，然后添加程序代码。在图中，其主要控件、主要属性、控件说明（一些次要控件如按钮、标签，次要属性如Height、Width除非特别，否则将不特别说明，读者可以根据具体情况来设定）如表1-4所示：图1-3 基本情况更新设计界面表1-3 控件、主
13、要属性、控件说明表控件名称主要控件属性名称属性值功能说明FrmjbgxCaption基本情况更新名称frmjbgxBorderStyle2 SizableMdichildTrue把此窗体作为子窗体WindowstateMaximized运行是最大化Frame名称Frame1Caption基本情况更新CommonDialog名称Commondialog1Data名称Data1ConnectAccess选择Access数据源DatabasenameStudent.mdb选择数据源的名称Recordsource基本情况和数据表进行绑定Image名称Image1StretchTrue调整图片大小以适应该控件EnabledFalse初始状态为不可用Text名称Text1Text9text1_text9和数据库Student.mdb的基本情况表的各个字段进行绑定DatasourceData1Datafield学号E_MAILEnabledFalse初始状态为不可用Command名称Command4Caption放弃EnabledFalse初始状态为不可用Command名称Command10Caption添加照片EnabledFalse初始状态为不可用注意：在设置Data1的Databasename属性时，不要stud
