学生档案管理系统(vb)_学生信息管理系统vb
学生档案管理系统(vb)由刀豆文库小编整理，希望给你工作、学习、生活带来方便，猜你可能喜欢“学生信息管理系统vb”。
莱 芜 职 业 技 术 学
院
毕业设计（论文）
所 在 系：计算机系 姓 名： 韩坤 论文题目：学生档案管理系统
专 业：软件应用技术 班 级：07级软件一班 指导老师：宋文敏
二零一零 年 四月 月 三十 日
摘 要
学生档案管理系统是典型的信息管理系统(MIS),其开发主要包括后台数据库的建立和维护以及前端应用程序的开发两个方面。对于前者要求建立起数据一致性和完整性强、数据安全性好的库。而对于后者则要求应用程序功能完备,易使用等特点。
经过分析,我们使用 MICROSOFT公司的 VISUAL BASIC开发工具,利用其提供的各种面向对象的开发工具,尤其是数据窗口这一能方便而简洁操纵数据库的智能化对象,首先在短时间内建立系统应用原型,然后,对初始原型系统进行需求迭代,不断修正和改进,直到形成用户满意的可行系统。
关键字：控件、窗体、域。
ABSTRACT The system of managing student file is a typical application of managing information system（know as MIS）,which mainly includes building up data-base of back-end and developing the application interface of front-end.The former required consistency and integrality and security of data.The later should make the application powerful and easily used.By looking up lots of datum, we selected Visual Basic presented by Microsoft because of its objective tools in Win32.VB offered a series of ActiveX operating a data-base.It can give you a short-cut to build up a prototype of system application.The prototype could be modified and developed till users are satisfied with it.Keywords: ActiveX , Form , Field.目 录
--------8-9--------
--------10-31--------
--------31-32--------
----------33----------
言学生档案管理系统是一个教育单位不可缺少的部分,它的内容对于学校的决策者和管理者来说都至关重要,所以学生档案管理系统应该能够为用户提供充足的信息和快捷的查询手段。但一直以来人们使用传统人工的方式管理文件档案，这种管理方式存在着许多缺点,如:效率低、保密性差,另外时间一长,将产生大量的文件和数据,这对于查找、更新和维护都带来了不少的困难。随着科学技术的不断提高,计算机科学日渐成熟,其强大的功能已为人们深刻认识,它已进入人类社会的各个领域并发挥着越来越重要的作用。作为计算机应用的一部分,使用计算机对学生档案信息进行管理,具有着手工管理所无法比拟的优点.例如:检索迅速、查找方便、可靠性高、存储量大、保密性好、寿命长、成本低等。这些优点能够极大地提高学生档案管理的效率,也是企业的科学化、正规化管理,与世界接轨的重要条件。
因此，开发这样一套管理软件成为很有必要的事情,在下面的各章中我们将以开发一套学生档案管理系统为例,谈谈其开发过程和所涉及到的问题及解决方法。
需求分析
计算机已经成为我们学习和工作的得力助手：
今天，计算机的价格已经十分低廉，性能却有了长足的进步。它已经被应用于许多领域，计算机之所以如此流行的原因主要有以下几个方面： 首先，计算机可以代替人工进行许多繁杂的劳动； 其次，计算机可以节省许多资源；
技术上可行性：
软件界面清晰，整洁。功能一目了然，操作简单，容易上手，对于一般网络操作者都能胜任。
综上所述，本系统的设计与开发在技术上和硬件设备上的条件都是满足的，因此，它在技术上是可行的。运行上可行性：
本系统为一个小型的编辑系统，所耗费的资源非常的小，具体的系统需求如下：
CPU:至少200MHz Intel Pentinm 处理器
操作系统：Windows 98 拉按钮和平滑按钮等。
选择“工程”下拉菜单中的“部件”选项，显示“部件”对话框。在“控件”选项卡列表中选择“Microsoft Windows Common Controls 6.0”后工具相中增加改控件。其属性及对象如下：
1． Align属性定义工具条在窗体中的位置
2． ToolTipText属性是字符串类型，定义控件的提示字符 3． Style属性定义按钮外观。
4． ImageList属性定义与数据条对应的ImageList控件名，该控件定义工具条按钮显示的图像。
5． HotImangeList属性设置一个ImageList控件名，该控件定义按钮获得热点时显示的图像。
6． DisabledImageList属性定义工具条按钮无效时显示的图像。创建工具条包括ImageList和Toolbar控件
ImageList用于为其他控件提供图像库，将ImageList控件加入到工具箱的操作于前述Toolbar控件相同。
3.3帮助
专业水平的软件通常都带有联机帮助功能。无论写出来的程序是要给大量的用户使用，还是仅仅局限于公司内部有限的使用者，我们都应该为用户提供详细的、易于理解的联机帮助文档。微软的Help Workshop4.0 是一套独立于Visual Basic 的用来协助我们创建、运行于32位Windows 操作系统下的帮助文件的工具。使用它我们可以为我们编写的应用程序生成一组帮助文件。
3.4关于版本
为了是程序显得更具有专业风格，首先可以在其中加入通常的应用程序信息。这些信息包括公司名称、版本号、修订号以及其他类似信息。Visual Basic允许你使用APP对象来保存这些信息，APP对象是一个预定义对象，不需要在程序中创建它。APP对象的大多数属性被应用程序用来提供常规的信息，通过使用这些APP提供的属性，可以在应用程序和用户之间交流重要信息，在项目属性框中可以设置它的属性。
使用Acce2000 实现关系型数据库
3.5数据库的概念
数据库是一种存储数据并对数据进行操作的工具。数据库的作用在于组织和表达信息，简而言之，数据库就是信息的集合。计算机的数据库可以分为两类：非关系数据库（flat-file）和关系数据库（relational）。关系数据库中包含了多个数据表的信息，数据库含有各个不同部分的术语，象记录、域等。
新建一个数据库
创建任何一个数据库的 6． 标识指定字段的信息； 7． 创建物理表。
修改已建的数据库
数据库的修改分为：添加、编辑和删除记录。这三种操作均可由Visual Basic 创建的程序来完成，下面的章节将详细描述实现的具体方法。
实现数据库之间的联系
数据库之间的关系指明两个库之间共享一个共同的关键字值。一个连接是指一种虚拟的表，这种表是在当用户要求从相互关联的各个不同的表中获取信息时建立的，关键字段用于在相互连接的不同表中查找匹配的记录。一个更高级的连接形式称为自连接。这种连接是指一个表被连接到它自己的一个字段，或在不同的纪录中由重复数据的组合字段。数据库中有三种不同类型的关键字：主关键字、组合关键字和外关键字。在表中使用的关键字类型用于描述库表示什么以及在数据库中如何与其它的库建立关系。系统总体规划
3.6系统功能
1． 可以进行文本操作； 2． 添加一个数据库项目； 3． 删除一个数据库项目； 4． 修改一个数据库项目； 5． 查询信息； 6． 察看课程表。
学号CodeInteger6No性别SexDate2No年龄AgeDate6No民族NationDate6No政治面貌Visage...Date2...Yes...家庭住址AddreDate10No备注RecordDate15No 学籍模块：
该模块主要完成学生基本信息的录入、删除、更新等功能。在此模块中定义了八个域名来进行学生的信息存储。如果用户修改某一纪录中的某一项，可单添加按钮进行学生记录的编辑，此窗口使用数据窗口的FREEDOM风格（典型的录入界面）。该种风格特点是列标题紧挨着数据列在此窗口还可以增加新学生纪录。
4.4．2成绩数据库
成绩数据库里存储了学生的成绩包括：学号、成绩、等
列名（中文）列名（英文）数据类型宽度小数点位数是否为空姓名Name Date8No学号CodeInteger6No成绩ScoreDate10No备注RecordDate15No 成绩模块：
该模块主要完成学生成绩的基本信息的录入、删除、更新等功能。在此模块中定义了四个域名来进行学生的信息存储。
4.4.3课程数据库
课程数据库利存储了课程的信息：课程名、作者、出版社等 列名（中文）列名（英文）数据类型宽度小数点位数是否为空课程IDCourseDate8No课程名NameDate15No出版社PublisherDate20No作者ScoreDate18No备注RecordDate15No
课程模块：
该模块主要完成存储课程的所有信息及录入、删除、更新等功能
与VB的连接
Visual Basic提供了与底层数据库系统紧密的连接。Visual Basic 支持不同的关系数据库管理系统并充分发挥每一个数据库的特长。生成独立应用或脱离服务器运行的服务以上的应用，Visual Basic连接数据库的方式有两种： ·通过使用Visual Basic的 DATA控件。
·通过使用由Visual Basic提供的专用的直接与数据库相连的接口
ImgUndo.Picture = ImageDisable.ListImages(“Undo”).Picture End Sub Private Sub ImgUndoEnable()'有效“Undo”按钮 ImgUndo.Enabled = True ImgUndo.Picture = ImageUp.ListImages(“Undo”).Picture End Sub Private Sub Check_ImgPaste()'设置粘贴按钮
If Len(Clipboard.GetText)> 0 Then ImgPaste.Enabled = True ImgPaste.Picture = ImageUp.ListImages(“Paste”).Picture Else ImgPaste.Enabled = False ImgPaste.Picture = ImageDisable.ListImages(“Paste”).Picture End If End Sub Private Sub Check_ImgCutCopy()'设置剪切、复制按钮 If Text1.SelLength > 0 Then ImgCut.Enabled = True ImgCut.Picture = ImageUp.ListImages(“Cut”).Picture
ImgCopy.Enabled = True ImgCopy.Picture = ImageUp.ListImages(“Copy”).Picture Else ImgCut.Enabled = False ImgCut.Picture = ImageDisable.ListImages(“Cut”).Picture ImgCopy.Enabled = False ImgCopy.Picture = ImageDisable.ListImages(“Copy”).Picture End If End Sub Private Sub BackColor_Click()CommonDialog1.ShowColor Text1.BackColor = CommonDialog1.Color End Sub Private Sub Box_Click()'显停工具栏 If Box.Checked Then '将停显工具栏 Box.Checked = False CoolBar1.Visible = False Else Box.Checked = True CoolBar1.Visible = True End If
Form_Resize '重新调整控件位置 End Sub Private Sub Close_Click()Dim FileNum As Integer
If Len(FileName)> 0 Then '有输入文件名
FileNum = FreeFile()'获得可用文件号
Open FileName For Output As FileNum '打开输出文件 '如果无指定文件，则创建新文件 Print #FileNum, Text1.Text '输出文本 Close FileNum '关闭文件 End If Text1.Text = “” FileName = “” End Sub Private Sub ComboSize_Click()Text1.FontSize = Val(ComboSize.Text)End Sub
Private Sub ComboFont_Click()Text1.FontName = ComboFont.Text End Sub Private Sub Copy_Click()Clipboard.SetText Text1.SelText '复制文本到剪裁板 End Sub Private Sub Cut_Click()Clipboard.SetText Text1.SelText '复制文本到剪裁板 Text1.SelText = “” '清选择的文本 End Sub Private Sub DataTime_Click()Text1.SelText = Now End Sub Private Sub Delete_Click()Text1.SelText = “” '清选择的文本 End Sub Private Sub Edit_Click()'当程序显示“编辑”子菜单前，触发该程序 If Text1.SelLength > 0 Then '文本框中有选中的文本 Cut.Enabled = True
Copy.Enabled = True Delete.Enabled = True Else Cut.Enabled = False Copy.Enabled = False Delete.Enabled = False End If
If Len(Clipboard.GetText())> 0 Then '剪裁板中有文本数据 Paste.Enabled = True Else '没有可粘贴的文本 Paste.Enabled = False End If End Sub Private Sub Exit_Click()Unload Me End Sub Private Sub FindText_KeyPre(KeyAscii As Integer)Dim BeginPos As Long
If KeyAscii = 13 Then BeginPos = InStr(1, Text1.Text, FindText.Text, vbTextCompare)If BeginPos > 0 Then Text1.SelStart = BeginPos1 ComboFont.AddItem Screen.Fonts(i)Next i End Sub Private Sub Form_Resize()Dim TextTop As Long
'修改工具条大小
CoolBar1.Top = Me.ScaleTop Me.ScaleLeft Text1.Width = Me.ScaleWidth If Me.ScaleHeight > CoolBar1.Height Then Text1.Height = Me.ScaleHeight“ + FileName '修改标题显示 End If End Sub Private Sub Paste_Click()Text1.SelText = Clipboard.GetText End Sub Private Sub Picture1_MouseMove(Button As Integer, Shift As Integer, X As Single, Y As Single)Label1 = ”工具栏“ End Sub Private Sub Picture1_Resize()If Picture1.Width > Label1.Left Then Label1.Width = Picture1.ScaleWidth” + FileName '修改标题显示 ImgUndoDisable End If End Sub Private Sub Text1_Change()If Not ImgUndo.Enabled Then '使“Undo”按钮可用 ImgUndoEnable
End If UndoString = UndoNew UndoNew = Text1 End Sub Private Sub Text1_Click()Check_ImgCutCopy End Sub Private Sub Text1_KeyUp(KeyCode As Integer, Shift As Integer)Check_ImgCutCopy End sub
也提供了数据存储库，可以使用桌面数据库文件把数据库文件置于网络文件服务器，与其他网络用户共享数据库。Acce 是一种关系数据库工具，关系数据库是已开发的最通用的数据库之一。如上所述，Acce 作为关系数据库开发具备了许多优点，可以在一个数据包中同时拥有桌面数据库的便利和关系数据库的强大功能。
二者的结合（DBA）
微软的JET数据库引擎提供了与数据库打交道的途径，我们是通过它以及Visual Basic 来访问数据库并对其进行各种操作。Visual Basic、Acce以及其他微软的软件产品都是通过共用JET数据库引擎，从而给用户提供了丰富的数据类型。
DATA 控件在数据库中的信息与将信息显示给用户看的Visual Basic程序之间架起了一座桥梁。我们可以设置DATA控件的各个属性，告诉它要调用那个数据库的哪个部分。缺省情况下，DATA控件根据数据库中的一个或多个数据表建立一个dynaset-type（动态集合）类型的记录集合。一个记录集合是动态的也就意味着，当原来的数据表中的容改变了以后，该记录集合中的记录也会随之改变。DATA控件还提供了用来浏览不同记录的各种跳转按钮。将DATA控件放置在窗体中之后，我们还必须在该控件与要处理的数据库之间建立联系。
