第一篇：VB0033学生档案管理系统A 2（定稿）
摘要
学生档案管理系统是典型的信息管理系统(MIS),其开发主要包括后台数据库的建立和维护以及前端应用程序的开发两个方面。对于前者要求建立起数据一致性和完整性强、数据安全性好的库。而对于后者则要求应用程序功能完备,易使用等特点。
经过分析,我们使用 MICROSOFT公司的 VISUAL BASIC开发工具,利用其提供的各种面向对象的开发工具,尤其是数据窗口这一能方便而简洁操纵数据库的智能化对象,首先在短时间内建立系统应用原型,然后,对初始原型系统进行需求迭代,不断修正和改进,直到形成用户满意的可行系统。关键字：控件、窗体、域。
目 录
第1章 引言 错误！未定义书签。
第2章 开发本系统的意义 错误！未定义书签。
2.2 在中小学中用计算机管理学生档案的意义...错误！未定义书签。2.3 为将来学校上网做好准备.................错误！未定义书签。2.4 学生档案的设计分析.....................错误！未定义书签。
第3章 开发工具简介 错误！未定义书签。
3.1 关系型数据库的介绍.....................错误！未定义书签。3.2平台环境VB的介绍......................错误！未定义书签。3.3 关于数据库Access 2000的介绍...........错误！未定义书签。
第4章 需求分析 错误！未定义书签。第5章 系统总体设计 错误！未定义书签。
5.1 系统功能...............................错误！未定义书签。5.2 系统结构功能图.........................错误！未定义书签。5.2 系统总体设计的思想.....................错误！未定义书签。
第6章 系统详细设计 错误！未定义书签。
6.1 mdiFrm的建立...........................错误！未定义书签。6.2 Login窗体的建立........................错误！未定义书签。6.3 Register窗体的建立.....................错误！未定义书签。6.4 Manage窗体的建立.......................错误！未定义书签。6.5 frmSearch窗体的建立....................错误！未定义书签。
结论 错误！未定义书签。致谢 错误！未定义书签。参考文献 错误！未定义书签。
图6-2 主窗体mdiFrm的控件布局
图6-3 窗体Login的建立
图6-4 “注册为用户”对话框
图6-5 “属性页”对话框
图6-6 窗体Manage的建立
图6-7 “学生管理”界面
图6-8 “查询区”界面
Powered by 计算机毕业论文网http://www.xiexiebang.com 提供 如果需要详细内容请与QQ:4991024联系
第二篇：学生档案管理系统(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提供的属性，可以在应用程序和用户之间交流重要信息，在项目属性框中可以设置它的属性。
使用Access2000 实现关系型数据库
3.5数据库的概念
数据库是一种存储数据并对数据进行操作的工具。数据库的作用在于组织和表达信息，简而言之，数据库就是信息的集合。计算机的数据库可以分为两类：非关系数据库（flat-file）和关系数据库（relational）。关系数据库中包含了多个数据表的信息，数据库含有各个不同部分的术语，象记录、域等。
新建一个数据库
创建任何一个数据库的 6． 标识指定字段的信息； 7． 创建物理表。
修改已建的数据库
数据库的修改分为：添加、编辑和删除记录。这三种操作均可由Visual Basic 创建的程序来完成，下面的章节将详细描述实现的具体方法。
实现数据库之间的联系
数据库之间的关系指明两个库之间共享一个共同的关键字值。一个连接是指一种虚拟的表，这种表是在当用户要求从相互关联的各个不同的表中获取信息时建立的，关键字段用于在相互连接的不同表中查找匹配的记录。一个更高级的连接形式称为自连接。这种连接是指一个表被连接到它自己的一个字段，或在不同的纪录中由重复数据的组合字段。数据库中有三种不同类型的关键字：主关键字、组合关键字和外关键字。在表中使用的关键字类型用于描述库表示什么以及在数据库中如何与其它的库建立关系。系统总体规划
3.6系统功能
1． 可以进行文本操作； 2． 添加一个数据库项目； 3． 删除一个数据库项目； 4． 修改一个数据库项目； 5． 查询信息； 6． 察看课程表。
学号CodeInteger6No性别SexDate2No年龄AgeDate6No民族NationDate6No政治面貌Visage...Date2...Yes...家庭住址AddressDate10No备注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_KeyPress(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
也提供了数据存储库，可以使用桌面数据库文件把数据库文件置于网络文件服务器，与其他网络用户共享数据库。Access 是一种关系数据库工具，关系数据库是已开发的最通用的数据库之一。如上所述，Access 作为关系数据库开发具备了许多优点，可以在一个数据包中同时拥有桌面数据库的便利和关系数据库的强大功能。
二者的结合（DBA）
微软的JET数据库引擎提供了与数据库打交道的途径，我们是通过它以及Visual Basic 来访问数据库并对其进行各种操作。Visual Basic、Access以及其他微软的软件产品都是通过共用JET数据库引擎，从而给用户提供了丰富的数据类型。
DATA 控件在数据库中的信息与将信息显示给用户看的Visual Basic程序之间架起了一座桥梁。我们可以设置DATA控件的各个属性，告诉它要调用那个数据库的哪个部分。缺省情况下，DATA控件根据数据库中的一个或多个数据表建立一个dynaset-type（动态集合）类型的记录集合。一个记录集合是动态的也就意味着，当原来的数据表中的容改变了以后，该记录集合中的记录也会随之改变。DATA控件还提供了用来浏览不同记录的各种跳转按钮。将DATA控件放置在窗体中之后，我们还必须在该控件与要处理的数据库之间建立联系。
第三篇：vb课程设计档案管理系统代码
一、登陆界面
运行本系统需要进行用户名和密码验证，没有用户名的可以在登陆界面注册，详细注册方法在下文有介绍。登陆界面效果图如图1-1：
图1-1 登陆界面设计的代码如下：
Private Sub Command1_Click()str1 = Text1.Text str2 = Text2.Text STRSQL = “SELECT * FROM 密码表 WHERE 用户名='” & str1 & “'” + “ AND 密码='” & str2 & “ '” Data1.RecordSource = STRSQL Data1.Refresh If Data1.Recordset.EOF Then
MsgBox “用户名或密码错！”, 16, 提示“ Else
Form8.Show
Form1.Hide End If End Sub
Private Sub Command2_Click()
End End Sub
Private Sub Command3_Click()
Form6.Show End Sub
Private Sub Timer1_Timer()
Label1.Caption = Time End Sub
二、欢迎界面
当用户名和密码验证成功后即可进入欢迎界面如图2-1
图2-1 在欢迎界面的设计时用了一个时钟控件，让欢迎界面出现3秒后自动消失进入系统主界面，欢迎界面的代码设计如下：
Private Sub Timer1_Timer()
If Timer1.Enabled = True Then
Form8.Hide
Form2.Show
Timer1.Enabled = False
End If End Sub
三、系统主界面
系统主界面可以进行简单的信息浏览（如图3-1），在主界面设置了一些命令按扭，其中 “修改”、“删除”、“打印”可以在主界面直接进行，而“查询”和“添加”需要打开另一个窗体操作。代码设计如下：
Private Sub Command6_Click()
Data1.Recordset.MoveFirst End Sub Private Sub Command7_Click()
Data1.Recordset.MovePrevious
If Data1.Recordset.BOF Then Data1.Recordset.MoveFirst End Sub Private Sub Command8_Click()
Data1.Recordset.MoveNext
If Data1.Recordset.EOF Then Data1.Recordset.MoveLast End Sub Private Sub Command9_Click()
Data1.Recordset.MoveLast End Sub Private Sub Form_Load()
Timer1.Enabled = True
Label11.Left = Me.Width End Sub Private Sub Command10_Click()DataReport1.Show End Sub Private Sub Command3_Click()
ans = MsgBox(”确认修改Ä?“, 32 + 1, 提示”)
If ans = 1 Then
mbookmark = Data1.Recordset.Bookmark
Data1.Recordset.Edit
End If End Sub
Private Sub Command4_Click()
On Error Resume Next
Data1.Recordset.Delete
Data1.Recordset.MoveNext
If Data1.Recordset.EOF Then Data1.Recordset.MoveLast
MsgBox “确认删除?”, 32 + 1, “提示” End Sub
Private Sub Timer1_Timer()
Label11.Left = Label11.Left-200
If Label11.Left <=-Label11.Width Then
Form2.BackColor = vbRed
End If End Sub Private Sub Timer2_Timer()
Label12.Caption = Time End Sub
图3-1
四、查询
查询的效果图如图4-1
图4-1 代码设计如下：
Private Sub Command1_Click()
a = “select * from学生档案 where ”
n = 0 If Check1.Value = Checked Then
a = a + “ 姓名='” + DataCombo1 + “'”
Adodc1.RecordSource = a
Adodc1.Refresh
n = 1 End If If Check2.Value = Checked Then
If n = 1 Then
a = a + “ and ”
End If
a = a + “ 学号 ='” + DataCombo2 + “'”
Adodc1.RecordSource = a
Adodc1.Refresh
n = 1 End If If Check3.Value = Checked Then
If n = 1 Then
a = a + “ and ”
End If
a = a + “ 院系='” + DataCombo3 + “'”
Adodc1.RecordSource = a
Adodc1.Refresh
n = 1 End If
If Check4.Value = Checked Then
If n = 1 Then
a = a + “ and ”
End If
a = a + “ 专业='” + DataCombo4 + “'”
Adodc1.RecordSource = a
Adodc1.Refresh
n = 1 End If If Check5.Value = Checked Then
If n = 1 Then
a = a + “ and ”
End If
a = a + “ 班级='” + DataCombo5+ “'”
Adodc1.RecordSource = a
Adodc1.Refresh
n = 1 End If If Check6.Value = Checked Then
If n = 1 Then
a = a + “ and ”
End If
a = a + “ 入学时间='” + DataCombo6 + “'”
Adodc1.RecordSource = a
Adodc1.Refresh
n = 1 End If End Sub
五、添加
添加效果图如图5-1
图5-1
代码设计如下：
Private Sub Command1_Click()
If Command1.Caption = “Ìí¼Ó” Then
Command1.Caption = “È·ÈÏ”
mbookmark = Data1.Recordset.Bookmark
Data1.Recordset.AddNew
Data1.Recordset.MoveLast
Data1.Refresh
Text1(0).SetFocus
End If
MsgBox “È·ÈÏÌí¼Ó?”, 32 + 1, “Ìáʾ” End Sub
Private Sub Command2_Click()For i = 0 To 13
Text1(i)= “" Next i
Text1(0).SetFocus End Sub
Private Sub Command3_Click()
Unload Form4 End Sub
六、修改、删除、打印
这部分的效果图如图6-
1、图6-2
图6-1
图6-2
代码设计如下：
Private Sub Command4_Click()
On Error Resume Next
Data1.Recordset.Delete
Data1.Recordset.MoveNext
If Data1.Recordset.EOF Then Data1.Recordset.MoveLast
MsgBox ”确认删除?“, 32 + 1, ”提示“ End Sub
Private Sub Command3_Click()
ans = MsgBox(”确认修改?“, 32 + 1, ”提示“)
If ans = 1 Then
mbookmark = Data1.Recordset.Bookmark
Data1.Recordset.Edit
End If End Sub
Private Sub Command6_Click()
Data1.Recordset.MoveFirst End Sub
七、统计
必须添加一个MSFlexGrid控件与Data控件连接，用来保存统计的结果，统计的效果图如图7-1
图7-1
代码设计如下：
Private Sub Command2_Click(Index As Integer)
Data1.RecordSource = ”select 院系,count(*)as人数 from学生档案¸ group by 院系“
Data1.Refresh End Sub Private Sub Command3_Click()
Data1.RecordSource = ”select专业,count(*)as人数 from学生档案¸ group by 专业“
Data1.Refresh End Sub Private Sub Command4_Click()
Data1.RecordSource = ”select 入学时间,count(*)as人数 from学生档案¸ group by入学时间“
Data1.Refresh End Sub Private Sub Command5_Click()
Data1.RecordSource = ”select 籍贯,count(*)as人数 from学生档案¸ group by 籍贯“
Data1.Refresh End Sub Private Sub Command6_Click()
Data1.RecordSource = ”select 民族,count(*)as人数 from学生档案¸ group by 民族“
Data1.Refresh End Sub Private Sub Command7_Click()
Data1.RecordSource = ”select 政治面貌,count(*)as人数 from学生档案¸ group by 政治面貌“
Data1.Refresh End Sub Private Sub Command8_Click()
Unload Form9 End Sub
八、帐户管理
（一）帐号注册
由于本系统登陆需要用户名和密码验证，所以本系统设置了一个帐号注册的功能，其效果图如图8-
1、图8-2
图8-1
图8-2 帐号注册代码设计如下：
Private Sub Command1_Click()If Text1.Text = ”“ Then
MsgBox ”你没有输入用户名！“, 16, ”提示“
Exit Sub End If If Text2.Text = ”“ Then
MsgBox ”你没有输入密码！“, 16, ”提示“
Exit Sub End If If Text3.Text = ”“ Then
MsgBox ”你没有再次输入密码！“, 16, ”提示“
Exit Sub End If
If Text2.Text <> Text3.Text Then
MsgBox ”两次输入的密码不一致！“, 16, ”提示“
Exit Sub End If If Text2.Text = Text3.Text Then
If Command1.Caption = ”注册“ Then
Command1.Caption = ”确认“
mbookmark = Data1.Recordset.Bookmark
Data1.Recordset.AddNew
Text1.SetFocus
Else
Command1.Caption = ”注册“
Data1.Recordset.Update
Data1.Recordset.MoveLast
End If
Text3.Text = ”“
MsgBox ”恭喜你注册成功！“, 48, ”欢迎使用“ End If End Sub
（二）密码修改
密码修改的效果图如图8-
3、图8-4
图8-3
图8-4 密码修改代码设计如下：
Private Sub Command1_Click()If Text1.Text = ”“ Then
MsgBox ”你没有输入用户名！“, 16, ”提示“
Exit Sub End If If Text2.Text = ”“ Then
MsgBox ”你没有输入旧密码！“, 16, ”提示“
Exit Sub End If If Text2.Text <> Text3.Text Then
MsgBox ”旧密码错误！“, 16, ”提示“
Exit Sub End If If Text3.Text = ”“ Then
MsgBox ”你没有输入新密码！“, 16, ”提示“
Exit Sub End If If Text4.Text = ”“ Then
MsgBox ”你没有再次输入新密码！“, 16, ”提示“
Exit Sub End If If Text3.Text <> Text4.Text Then
MsgBox ”两次输入的密码不一致！“, 16, ”提示“
Exit Sub End If If Text3.Text = Text4.Text Then
prompt = ”确认修改?“
answer = MsgBox(prompt, 32 + 0, ”确认修改“)
If answer = vbYes Then
Data1.Recordset.Edit
Data1.Recordset.Fields(0)= Trim(Text1.Text)
Data1.Recordset.Fields(1)= Trim(Text3.Text)
Data1.Recordset.Update
Data1.Refresh
MsgBox ”密码修改成功！“, vbOKOnly, ”密码修改“
End If End If End Sub
（三）帐号注销
效果图如图8-5
图8-5 代码设计如下：
Private Sub Command1_Click()If Text1.Text = ”“ Then
MsgBox ”你没有输入用户名！“, 16, ”提示“
Exit Sub End If If Text2.Text = ”“ Then
MsgBox ”你没有输入旧密码！“, 16, ”提示“
Exit Sub End If If Text2.Text <> Text3.Text Then
MsgBox ”旧密码错误！“, 16, ”提示“
Exit Sub End If If Text2.Text = Text3.Text Then
On Error Resume Next
Data1.Recordset.Delete
Data1.Recordset.MoveNext
If Data1.Recordset.EOF Then Data1.Recordset.MoveLast
MsgBox ”确认注销该用户?“, 32 + 1, ”提示" End If End Sub
第四篇：VB学生信息管理系统
学生信息管理系统
前 言
学生籍管理系统是一个教育单位不可缺少的部分,它的内容对于学校的决策者和管理者来说都至关重要,所以学生学生信息管理系统应该能够为用户提供充足的信息和快捷的查询手段。但一直以来人们使用传统人工的方式管理文件学生信息，这种管理方式存在着许多缺点,如:效率低、保密性差,另外时间一长,将产生大量的文件和数据,这对于查找、更新和维护都带来了不少的困难。
随着科学技术的不断提高,计算机科学日渐成熟,其强大的功能已为人们深刻认识,它已进入人类社会的各个领域并发挥着越来越重要的作用。
作为计算机应用的一部分,使用计算机对学生学生信息信息进行管理,具有着手工管理所无法比拟的优点.例如:检索迅速、查找方便、可靠性高、存储量大、保密性好、寿命长、成本低等。这些优点能够极大地提高学生学生信息管理的效率,也是企业的科学化、正规化管理,与世界接轨的重要条件。
因此，开发这样一套管理软件成为很有必要的事情,在下面的各章中我们将以开发一套学生学生信息管理系统为例,谈谈其开发过程和所涉及到的问题及解决方法。
摘 要
学生学生信息管理系统是典型的信息管理系统(MIS),其开发主要包括后台数据库的建立和维护以及前端应用程序的开发两个方面。对于前者要求建立起数据一致性和完整性强、数据安全性好的库。而对于后者则要求应用程序功能完备,易使用等特点。
本系统主要完成对学生信息的管理，包括添加、修改、删除，查询，打印信息以用户管理等六个方面。系统可以完成对各类信息的浏览、查询、添加、删除、修改等功能。
系统的核心是添加、修改和删除三者之间的联系，每一个表的修改都将联动的影响其它的表，当完成添加或删除操作时系统会自动地完成学生信息的修改。查询功能也是系统的核心之一，在系统中主要根据学生姓名和学号进行查询，其目的都是为了方便用户使用。系统有完整的用户添加、删除和密码修改功能，并具备报表打印功能。
系统采用Microsoft Office中的Access 2000来设计数据库，并使用当前优秀的开发工具—VB 6.0，它有着最为灵活的数据库结构，对数据库应用有着良好的支持。
论文主要介绍了本课题的开发背景，所要完成的功能和开发的过程。重点的说明了系统设计的重点、设计思想、难点技术和解决方案
一、绪言
本软件使用Microsoft Visual Basic 6.0进行编写。数据库技术的产生与发展源于对于数据的组织和管理。数据库技术是数据管理的技术，它随着数据管理任务的需要而产生于20世纪60年代中期。这是一门综合性技术，涉及操作系统，数据结构，算法设计和程序设计等知识。数据库技术的基本思想是对数据实行集中，统一，独立的管理，用户可以最大限度的共享数据资源。
数据库系统实际上是一个应用系统，它是在计算机硬，软件系统支持下，由用户，数据库管理系统，存储在存储设备上的数据和数据库应用程序构成的数据处理系统。数据库系统是由数据，数据库管理系统，应用程序，用户组成。
数据库的特点：1.实现数据共享 2.实现数据独立3.减少了数据冗余度 4.避免了数据不一致性5.加强了对数据的保护。
数据库应用系统（DATABASE APPLICATION SYSTEMS DBAS）1．管理信息系统 2．开放式信息服务系统一个数据库应用系统通常是由数据库和应用程序两部分组成，它们是在数据库管理系统支持下设计和开发出来的。
二、系统分析
2.1开发背景
计算机已经成为我们学习和工作的得力助手：
今天，计算机的价格已经十分低廉，性能却有了长足的进步。它已经被应用于许多领域，计算机之所以如此流行的原因主要有以下几个方面：
首先，计算机可以代替人工进行许多繁杂的劳动； 其次，计算机可以节省许多资源；
第三，计算机可以大大的提高人们的工作效率； 第四，计算机可以使敏感文档更加安全，等等。_ 在大中专中用计算机管理学生信息信息的意义
现在我国的大中专校中学生信息的管理水平还停留在纸介质的基础上，这样的机制已经不能适应时代的发展，因为它浪费了许多人力和物力，在信息时代这种传统的管理方法必然被计算机为基础的信息管理所取代。我作为一个计算机应用的专科生，希望可以在这方面有所贡献。改革的总设计师邓小平同志说过“科学技术是第一生产力”，我希望能用我四年的所学编制出一个实用的程序来帮助大中专进行更有效的信息管理。
归纳起来，好处大约有以下几点：
1． 可以存储学生的基本信息以及历届的学生信息，安全、高效； 2． 只需一到二名信息录入员即可操作系统，节省大量人力； 3． 可以迅速查到所需信息。
2.2需求分析
21世纪以来，人类经济高速发展，人们发生了日新月异的变化，特别是计算机的应用及普及到经济和社会生活的各个领域。使原本的旧的管理方法越来越不适应现在社会的发展。许多人还停留在以前的手工操作。这大大地阻碍了人类经济的发展。为了适应现代社会人们高度强烈的时间观念，学校信息管理系统软件为学校办公室带来了极大的方便。我所开发的这个系统所采用的是当前较为流行的编程软件VISUAL BASIC 6.0作为实现语言，以数据库Microsoft SQL Server2000作为系统的后台操作，其功能在系统内部有源代码直接完成。我们只需按系统要求输入即可操作。为将来学校上网做好准备
跟据1999年中国电信的调查报告显示我国的上网人数已达到890万，互联网已经十分普及，学校往界的毕业生希望能在世界的任何一个角落查到自己校友的信息，本系统为学校将来的上网作了先期工作，比如数据库的建立。
根据实际情况，我们使用原型法（Rapid Prototyping）即以少量代价快速地构造一个可执行的软件系统模型。使用户和开发人员可以较快地确定需求，然后采用循环进化的开发方式，对系统模型作连续的精化，将系统需具备的性质逐渐增加上去，直到所有的性质全部满足。此时模块也发展成为最终产品了。设计一个数据库系统，首先必须确认数据库系统的用户和用途。由于数据库系统是一个组织部门的模拟，数据库系统设计者必须对一个组织部门的基本情况有所了解，比如该组织部门的组织机构、各部门的联系、有关事物和活动以及描述它们的数据、信息流程、政策和制度、报表及其格式和有关的文档等。收集和分析这些资料的过程称为需求分析。例如在一个大学，学生是按照系部、班级来进行组织，而课程则是按照专业、任课教师等进行组织。每个学生需要选修自己专业内的课程并取得信息，而校方则需要统计每门课的平均分和学生的平均信息，这就是学生和课程之间的联系和需要进行的处理。需求分析的目标是给出应用领域中数据项、数据项之间的关系和数据操作任务的详细定义，为数据库系统的概念设计、逻辑设计和物理设计奠定基础，为优化数据库系统的逻辑结构和物理结构提供可靠依据。设计人员应与用户密切合作，用户则应积极参与，从而使设计人员对用户需求有全面、准确的理解。
需求分析的过程是对现实世界深入了解的过程，数据库系统能否正确的反映现实世界主要取决于需求分析，需求分析人员既要对数据库技术有一定的了解，又要对组织部门的情况比较熟悉，一般由数据库系统设计人员和本组织部门的有关工作人员合作进行。需求分析的结果整理成需求分析说明书，这是数据库技术人员与应用组织部门的工作人员取得共识的基础，必须得到有关组织部门人员的确认。2．3 E-R图设计
E-R图设计模式分为两种：
① 一种是以局部E-R图为基础设计全局模式，称为集中式模式设计；
② 另一种是先设计局部E-R模型图，再由若干个局部E-R模型图综合成为全局E-R模型图，称为综合设计法。
这两种设计方法的设计思想是有区别的：综合设计法是以局部需求说明作为设计的基础，在集成时尽管对局部E-R图要做必要的修改，但局部E-R图是设计的基础，全局模式是局部E-R图的集成；集中式模式设计法是在统一需求说明的基础上，设计全局模式，全局模式是设计的基础。综合设计法比较适合于大型数据库系统的设计，可以多组并行进行，免除综合需求说明的麻烦。目前，综合设计法用得较多，下面将以综合设计法为主介绍概念模式设计。综合设计法分为两个步骤： ① 设计局部概念模式
② 由局部概念模式综合成全局概念模式。设计局部概念模式
局部概念模式设计可以由用户独立完成，也可以由数据库系统设计者协助完成。一般分为以下几个步骤： ①．根据局部需求分析的结果产生局部实体集。局部实体集应该是局部应用领域中的事物，能够满足局部应用的要求。局部实体集的产生包括确定局部实体集的属性和键码。在局部概念模式设计过程中，我们可能会发现有些事物既可以抽象为实体集也可以抽象为属性或实体集间的联系。对于这样的事物，我们应该使用最易于为用户理解的概念模型结构来表示。在易于被用户理解的前提下，既可抽象为属性，又可抽象为实体的的尽量抽象为属性。需要注意的是，每个事物必须由一种而且仅有一种概念模型结构表示。在设计局部实体集时，我们还需要确定哪些属性是单值属性、哪些属性是多值属性以及哪些属性是复合属性(指由多个数据项组成的属性)。
②、在确定了局部实体集后，根据局部分析的结果确定局部实体集间的联系及其结构约束。局部实体集间的联系要准确地描述局部应用领域中各事物之间的关系。同时，局部实体集间的联系也需要满足局部应用的各种要求。
③、最后，根据上面的分析来形成局部E-R图。学生信息管理系统局部E-R图设计：
第五篇：学生档案管理系统
目录 摘要 ABSTRACT 前言
第一章 为什么要开发一个学生档案管理系统？ 第二章 计算机已经成为我们学习和工作的得力助手 1．1 在中小学中用计算机管理学生档案的意义 1．2 为将来学校上网做好准备 1．4 学生档案的设计分析
第三章 怎样开发一个学生档案管理系统？ 2．1 编程环境的选择 2．2 关系型数据库的实现 2．3 二者的结合（DBA）
第四章 Windows下的Visual Basic 编程环境简介 3．1 告别“hello world”的年代 3．2 面对对象的编程 3．3 实现菜单选项 3．4 实现工具栏 3．5 帮助 3．6关于系统
第五章 使用Access2000 实现关系型数据库 4．1 数据库的概念 4．2 新建一个数据库 4．3 修改已建的数据库 4．4 实现数据库之间的联系 第五章 系统总体规划 5．1 系统功能 5．2 流程图
第六章 系统具体实现 6．1 用户界面的实现 6．1．1 封面 6．1．2 主界面 6．1．3 帮助系统 6．2 数据库的实现 6．2．1 学籍数据库 6．2．2 学生成绩库 6．2．3 课程库 6．3 与VB的连接 第七章 结束语 第八章 主要参考文献 附录
--------------摘要--------------学生档案管理系统是典型的信息管理系统(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.--------------前言--------------学生档案管理系统是一个教育单位不可缺少的部分,它的内容对于学校的决策者和管理者来说都至关重要,所以学生档案管理系统应该能够为用户提供充足的信息和快捷的查询手段。但一直以来人们使用传统人工的方式管理文件档案，这种管理方式存在着许多缺点,如:效率低、保密性差,另外时间一长,将产生大量的文件和数据,这对于查找、更新和维护都带来了不少的困难。随着科学技术的不断提高,计算机科学日渐成熟,其强大的功能已为人们深刻认识,它已进入人类社会的各个领域并发挥着越来越重要的作用。
作为计算机应用的一部分,使用计算机对学生档案信息进行管理,具有着手工管理所无法比拟的优点.例如:检索迅速、查找方便、可靠性高、存储量大、保密性好、寿命长、成本低等。这些优点能够极大地提高学生档案管理的效率,也是企业的科学化、正规化管理,与世界接轨的重要条件。
因此，开发这样一套管理软件成为很有必要的事情,在下面的各章中我们将以开发一套学生档案管理系统为例,谈谈其开发过程和所涉及到的问题及解决方法。第一章
为什么要开发一个学生档案管理系统？
计算机已经成为我们学习和工作的得力助手：
今天，计算机的价格已经十分低廉，性能却有了长足的进步。它已经被应用于许多领域，计算机之所以如此流行的原因主要有以下几个方面： 首先，计算机可以代替人工进行许多繁杂的劳动； 其次，计算机可以节省许多资源；
第三，计算机可以大大的提高人们的工作效率； 第四，计算机可以使敏感文档更加安全，等等。
在中小学中用计算机管理学生档案的意义
现在我国的中小学校中档案的管理水平还停留在纸介质的基础上，这样的机制已经不能适应时代的发展，因为它浪费了许多人力和物力，在信息时代这种传统的管理方法必然被计算机为基础的信息管理所取代。
我作为一个计算机应用的本科生，希望可以在这方面有所贡献。改革的总设计师邓小平同志说过“科学技术是第一生产力”，我希望能用我四年的所学编制出一个实用的程序来帮助中小学进行更有效的学籍管理。
归纳起来，好处大约有以下几点：
1． 可以存储历届的学生档案，安全、高效；
2． 只需一到二名档案录入员即可操作系统，节省大量人力； 3． 可以迅速查到所需信息。
为将来学校上网做好准备
跟据1999年中国电信的调查报告显示我国的上网人数已达到890万，互联网已经十分普及，学校往界的毕业生希望能在世界的任何一个角落查到自己校友的信息，本系统为学校将来的上网作了先期工作，比如数据库的建立。
学生档案的设计分析
根据实际情况，我们使用原型法（Rapid Prototyping）即以少量代价快速地构造一个可执行的软件系统模型。使用户和开发人员可以较快地确定需求，然后采用循环进化的开发方式，对系统模型作连续的精化，将系统需具备的性质逐渐增加上去，直到所有的性质全部满足。此时模块也发展成为最终产品了。第二章
怎样开发一个学生档案管理系统？
编程环境的选择
微软公司的Visual Basic 6.0是Windows应用程序开发工具，使目前最为广泛的、易学易用的面向对象的开发工具。Visual Basic提供了大量的控件，这些控件可用于设计界面和实现各种功能，减少了编程人员的工作量，也简化了界面设计过程，从而有效的提高了应用程序的运行效率和可靠性。故而，实现本系统VB是一个相对较好的选择。
关系型数据库的实现
Access2000 就是关系数据库开发工具，数据库能汇集各种信息以供查询、存储和检索。Access 的优点在于它能使用数据表示图或自定义窗体收集信息。数据表示图提供了一种类似于 Excel 的电子表格，可以使数据库一目了然。另外，Access 允许创建自定义报表用于打印或输出数据库中的信息。Access也提供了数据存储库，可以使用桌面数据库文件把数据库文件置于网络文件服务器，与其他网络用户共享数据库。Access 是一种关系数据库工具，关系数据库是已开发的最通用的数据库之一。如上所述，Access 作为关系数据库开发具备了许多优点，可以在一个数据包中同时拥有桌面数据库的便利和关系数据库的强大功能。
二者的结合（DBA）
微软的JET数据库引擎提供了与数据库打交道的途径，我们是通过它以及Visual Basic 来访问数据库并对其进行各种操作。Visual Basic、Access以及其他微软的软件产品都是通过共用JET数据库引擎，从而给用户提供了丰富的数据类型。
DATA 控件在数据库中的信息与将信息显示给用户看的Visual Basic程序之间架起了一座桥梁。我们可以设置DATA控件的各个属性，告诉它要调用那个数据库的哪个部分。缺省情况下，DATA控件根据数据库中的一个或多个数据表建立一个dynaset-type（动态集合）类型的记录集合。一个记录集合是动态的也就意味着，当原来的数据表中的容改变了以后，该记录集合中的记录也会随之改变。DATA控件还提供了用来浏览不同记录的各种跳转按钮。将DATA控件放置在窗体中之后，我们还必须在该控件与要处理的数据库之间建立联系。
Visual Basic应用程序基本的构建块是用户所创建的对象，每一个对象都具有一些特性和行为（属性、事件和 方法）。开发人员可以最有效利用所创建的每一个对象。使用应用程序具有可通用性可说扩展性和强有力的功能。
Visual Basic应用由一系列对象组成，包括有函数、菜单、函数、结构和数据窗口、用户对象、用户事件等等，对象中又包含若干控件如命令按钮、单行编辑器等这些对象和控件都可在许多应用中重复使用。实现菜单选项
菜单是程序最重要的特性之一，大多数程序都依赖一个定义良好的菜单使程序易于使用和维护，Visual Basic也提供了强大的创建菜单功能是程序更加标准。
您可以使用Visual Basic的Application Wizard也可以使用Visual Basic 的菜单编辑器建立菜单或者修改已经存在的菜单。
实现工具栏
CoolBar控件与Office97种看到的CoolBar是类似的。CoolBar就是一个可以在窗体上浮动的工具，同时也是其他ActiveX的容器。通过在CoolBar中迁入其他空间你局可以向用户提供更好的灵活性和义用性。
Toolbar 是工具条控件，是实现工具条的主体。其中的按钮可以显示图像和标题，并按功能分组或加入分隔符，还可以围棋设置鼠标停留在其上显示的提示字符。Toolbar也是一个控件容器且具有Style属性，并可以为其增加下拉按钮和平滑按钮等。
选择“工程”下拉菜单中的“部件”选项，显示“部件”对话框。在“控件”选项卡列表中选择“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控件相同。
帮助
专业水平的软件通常都带有联机帮助功能。无论写出来的程序是要给大量的用户使用，还是仅仅局限于公司内部有限的使用者，我们都应该为用户提供详细的、易于理解的联机帮助文档。微软的Help Workshop4.0 是一套独立于Visual Basic 的用来协助我们创建、运行于32位Windows 操作系统下的帮助文件的工具。使用它我们可以为我们编写的应用程序生成一组帮助文件。
关于版本
为了是程序显得更具有专业风格，首先可以在其中加入通常的应用程序信息。这些信息包括公司名称、版本号、修订号以及其他类似信息。Visual Basic允许你使用APP对象来保存这些信息，APP对象是一个预定义对象，不需要在程序中创建它。APP对象的大多数属性被应用程序用来提供常规的信息，通过使用这些APP提供的属性，可以在应用程序和用户之间交流重要信息，在项目属性框中可以设置它的属性。第四章
使用Access2000 实现关系型数据库
数据库的概念
数据库是一种存储数据并对数据进行操作的工具。数据库的作用在于组织和表达信息，简而言之，数据库就是信息的集合。计算机的数据库可以分为两类：非关系数据库（flat-file）和关系数据库（relational）。关系数据库中包含了多个数据表的信息，数据库含有各个不同部分的术语，象记录、域等。新建一个数据库
创建任何一个数据库的第一步是仔细的规划数据库，设计必须是灵活的、有逻辑的。创建一个数据库结构的过程被认为是数据模型设计。1． 标识需要的数据；
2． 收集被标识的字段到表中； 3． 标识主关键字字段； 4． 绘制一个简单的数据图表； 5． 规范数据；
6． 标识指定字段的信息； 7． 创建物理表。
修改已建的数据库
数据库的修改分为：添加、编辑和删除记录。这三种操作均可由Visual Basic 创建的程序来完成，下面的章节将详细描述实现的具体方法。
实现数据库之间的联系
数据库之间的关系指明两个库之间共享一个共同的关键字值。一个连接是指一种虚拟的表，这种表是在当用户要求从相互关联的各个不同的表中获取信息时建立的，关键字段用于在相互连接的不同表中查找匹配的记录。一个更高级的连接形式称为自连接。这种连接是指一个表被连接到它自己的一个字段，或在不同的纪录中由重复数据的组合字段。数据库中有三种不同类型的关键字：主关键字、组合关键字和外关键字。在表中使用的关键字类型用于描述库表示什么以及在数据库中如何与其它的库建立关系。第五章 系统总体规划
系统功能
1． 可以进行文本操作； 2． 添加一个数据库项目； 3． 删除一个数据库项目； 4． 修改一个数据库项目； 5． 查询信息； 6． 察看课程表。
流程图
第六章 系统具体实现
用户界面的实现 6．1．1 封面 具体实现见 图_6.1.1 图_6.1.1 6．1．2 主界面
具体实现见.图_6.1.2 图_6.1.2 主界面包含三方面的内容,以下一一介绍: 1.记录操作
打开记录操作,进入记录操作菜单项分别由文件、视图及帮助三个选项。1.1文件包括：新建 打开
打开写字板---------如图<6.1.4>(源程序见附录清单6.1)保存 另存 打印 退出 <图6.1.4> 1.2视图包括：状态条 工具栏 背景颜色 显示
课程表---------如图<6.1.5> 文本编辑器 网络浏览 <图6.1.5> 1.3帮助包括：内容 关于帮助 2．记录操作
打开记录操作进入记录操作选项页分别由浏览记录、查找等三个选项组成。2．1浏览记录： 学生学籍库 课程库 成绩库 2．2查找记录 2．3备注 3．系统信息
打开系统信息进入选项页分别由系统信息、信息采集等组成。6．1．3 帮助系统 具体实现见6.1.3
图6.1.3 数据库的实现 6．2．1学籍数据库
学籍数据库里存储了学生的档案包括：学号、姓名、年龄等 表如<6.2.6> 列名（中文）列名（英文）数据类型宽度小数点位数是否为空姓名Name Date8No学号CodeInteger6No性别SexDate2No年龄AgeDate6No民族NationDate6No政治面貌Visage...Date2...Yes...家庭住址AddressDate10No备注RecordDate15No 表<6.2.6> 学籍模块：
该模块主要完成学生基本信息的录入、删除、更新等功能。在此模块中定义了八个域名来进行学生的信息存储。如果用户修改某一纪录中的某一项，可单添加按钮进行学生记录的编辑，此窗口使用数据窗口的FREEDOM风格（典型的录入界面）。该种风格特点是列标题紧挨着数据列在此窗口还可以增加新学生纪录。6．2．2成绩数据库
成绩数据库里存储了学生的成绩包括：学号、成绩、等如表<6.2.7 > 列名（中文）列名（英文）数据类型宽度小数点位数是否为空姓名Name Date8No学号CodeInteger6No成绩ScoreDate10No备注RecordDate15No 表<6.2.7> 成绩模块：
该模块主要完成学生成绩的基本信息的录入、删除、更新等功能。在此模块中定义了四个域名来进行学生的信息存储。6．2．3课程数据库
课程数据库利存储了课程的信息：课程名、作者、出版社等如表<6.2.8> 列名（中文）列名（英文）数据类型宽度小数点位数是否为空课程IDCourseDate8No课程名NameDate15No出版社PublisherDate20No作者ScoreDate18No备注RecordDate15No 表<6.2.8> 与VB的连接
Visual Basic提供了与底层数据库系统紧密的连接。Visual Basic 支持不同的关系数据库管理系统并充分发挥每一个数据库的特长。生成独立应用或脱离服务器运行的服务以上的应用，Visual Basic连接数据库的方式有两种： ·通过使用Visual Basic的 DATA控件。
·通过使用由Visual Basic提供的专用的直接与数据库相连的接口 第七章 结束语 经过三个多月的设计和开发，中小学档案管理系统基本开发完毕。其功能基本符合用户需求，能够完成学生学籍的存储和成绩的查询以及各类相关报表的打印。并提供部分系统维护功能,使用户方便进行数据备份和恢复、数据删除。，对于数据的一致性的问题也通过程序进行了有效的解决。
但是由于毕业设计时间较短，所以该系统还有许多不尽如人意的地方，比如联机文档比较少，用户界面不够美观，出错处理不够等多方面问题。这些都有待进一步改善。致谢
在本次毕业设计中，我从指导老师雷震甲老师身上学到了很多东西。雷老师认真负责的工作态度，严谨的治学精神和深厚的理论水平都使我收益匪浅。他无论在理论上还是在实践中，都给与我很大的帮助，使我得到不少的提高这对于我以后的工作和学习都有一种巨大的帮助，感谢他耐心的辅导。
另外，在系统开发过程中雷老师的助手张彦明老师也给于我很大的帮助，帮助解决了不少的难点，使得系统能及时开发完成，还有同组的同学同样给与我不少帮助，这里一并表示感谢。
第八章
主要参考文献
[1] Visual Basic 6.0 使用指南
作者：Bob Reselman , Richard Peasley , Wayne Pruchniak.出版社：电子工业出版社
[2] 中文版Microsoft Office 97 自学通 作者：Ned Snell 出版社：机械工业出版社
[3] Visual Basic 6.0 中文版控件大全 作者：Microsoft 出版社；电子工业出版社
[4] 中文Access 2000 24学时教程 作者：Craig Eddy，Timothy Buchanan 出版社：机械工业出版社
点击咨询 