VB课程设计（论文）-毕业生信息管理系统.doc

《VB课程设计（论文）-毕业生信息管理系统.doc》由会员分享，可在线阅读，更多相关《VB课程设计（论文）-毕业生信息管理系统.doc（34页珍藏版）》请在三一文库上搜索。

1、0 目录目录 一引言1 二系统设计的目标及思想2 三系统开发环境3 1.VISUAL BASIC语言的概述.3 2.工程3 3.窗体3 4.标准模块5 5.数据视图5 四数据库的设计9 1.数据库的简介及设计注意事项9 2.新建一个数据库10 3.外键约束12 4.E-R 模型及到关系模型的转化.13 五数据库的连接（ODBC）.14 1.ODBC 的概述及应用.14 2.ODBC 的组成.15 3.数据库与数据远远的连接16 六存在的问题及心的21 七参考文献22 附录23 1.各实体间 E-R 关系图23 2.代码24 交通运输学院课程设计 1 一引言一引言 随着经济化，管理现代化到来，人

2、们迫切利用计算机对大量数据的组织，存储， 维护和查询，为了更好有效的管理各类数据，数据库技术应用而安生，结合 Visual Basic 或者 Java 编程设计的数据管理系统更是现在企业，单位办公多不可缺少的。尽 管目前大部分高校都根据滋生学校的情况和特点建立了相关的学籍管理或是学生管理 系统，但随着学校的规模不断扩大，毕业生数量的增加，有关学生信息量也成倍的增 加，面对庞大的信息量，这样的管理难免会有些不足，对于信息的改动，查询都有一 定的困难，所以，需要有学生信息管理系统来提高学生管理工作的效率。 此次设计，运用 Visual Basic 语言编程结合数据库技术设计了一个毕业生信息管 理系

3、统，总体任务是实现学生信息关系的系统化，规范化和自动化，其主要人物使用 计算机对毕业生信息进行日常的管理，此系统可以记录保存毕业生的基本信息，就业 情况，及招聘企事业单位的相关信息，并能实现添加，删除，改动，查询等功能，将 大批量的学生信息数据分类管理，方便了管理者的管理。并且通过这次设计，提高了 我们对 Visual Basic 语言的认识及编写和能力，更深一步熟悉掌握了数据库，培养学 生综合运用所学知识与生产实践经验，分析和解决工程技术问题的能力。 在高校，计算机已非常普遍，用计算机来管理学生信息是必需的，毕业生管理信 息系统主要提高能够方便高效的管理功能及信息查阅平台，管理员可以管理所有

4、信息， 本系统的主要功能有： 1学生管理功能：为了方便学生信息的增加，删除，修改，查询。 2企业信息管理的功能：管理员可以通过填写表格来更新招聘单位的信息。 3招聘信息的管理：用来添加最新的招聘信息，便于毕业生查看。 4就业信息的管理功能：记录毕业生的就业情况。可以分析就业形势及就业去向。 交通运输学院课程设计 2 二系统设计的目标及思想二系统设计的目标及思想 高校教务系统是一项非常繁杂但有是非重要的工作，毕业设计信息管理又是高校 教务管理中的重要部分，这个系统的设计，可以使管理员轻松地完成对毕业生信息， 单位信息，招聘信息，就业信息等系统的管理工作，可以方便的查询，修改，增加， 删除信息。

5、系统的主界面主要有学生信息，企业信息，招聘信息，就业信息等四大类类构成， 点击不同的按钮可进入不同的服务界面， （如图 1 所示） 图 1 系统主界面 其中学生信息，学生就业信息是很重要的部分。 三系统开发环境三系统开发环境 1.Visual1.Visual BasicBasic 语言的概述语言的概述 运用 Visual Basic 语言编写程序，并通过 ODBC 桥的链接，实现系统的应用。 Visual Basic（VB）是一种由 微软 公司开发的包含 协助开发环境 的 事件驱动 编 程语言。它源自于 BASIC 编程语言。VB 拥有 图形用户界面 （ GUI ）和 快速应用程 序开发 （

6、RAD ）系统，可以轻易的使用 DAO 、 RDO 、 ADO 连接 数据库 ，或者轻 交通运输学院课程设计 3 松的创建 ActiveX 控件 。程序员可以轻松的使用 VB 提供的组仠快速建立一个 应用 程序 。 VB 中心思想就是要便于 程序员 使用，无论是新手或者专家。VB 使用亠可以简单 建立应用程序的 GUI 系统，但是又可以开发相当复杂的程堏。VB 的程序是一种基于 窗体 的可视化组件安排的联合，并且增加码来指定组建的属性和方法。因为默认方 法已经有一部分定义在了块件内，所以程序员不用写多少代码就尧以完成一个简单的 程序。过去的版本颂面 VB 程序的性能问题一直被放在了桌靠上，但是

7、随着 计算机 速 度的飞速增加，关于性能的争论已砏越来越少。 窗体控件的增加和改变叠以用 拖放 技术实现。一个排列满控件的工具箱用来显示可用控件（比如文本框或者按頮。每个 控件都有自己的 属性 和 事件 。默认的属性值会在控件创建的时候栐供，但是程序 员也可以进行更改。下面结合系统界面将 VB 的一些功能及属性加以介绍。 2.2.工程工程 工程文件的扩展名为 vbp，每个工程对应一个工程文件。用“文件”菜单中的“新 建工程”命令可以建立一个新的工程。用“打开工程”命令可以打开一个已有的工程， 而用“添加工程”命令可以添加一个工程，在工程中添加窗体，进行界面的设计。 3.3.窗体窗体 应用程序运

8、行过程中， 用户可用作定制应用程序界面的窗口，或用作从用户处收 集信息的对话框叫做窗体。窗体是一种对象，是 Visual Basic 应用程序的基本构造模 块，它有自己的属性，方法和事件，可通过属性来定义窗体的外观，通过方法来定义 窗体的行为，通过事件来定义窗体与用户的交互。窗体的属性大多用于设置窗体的外 观和尺寸，而且大都可以直接在属性窗口中直接设置，操作方便，简洁。窗体文件的 扩展名为 frm，每个窗体对应一个窗体文件，窗体及其空间的属性和其他信息都存放在 该窗体文件中。一个应用程序可以有多个窗体，因此就可以有多个以 frm 为扩展名的 窗体文件。 执行“工程”菜单中的“添加窗体”命令或单

9、击工具栏中的“添加窗体”按钮可 以增加一个窗体而执行“工程”菜单中的“移除按钮”命令可以删除当前的窗体。每 建立一个窗体，工程资源管理器窗口就增加一个窗体文件。将各个窗体之间用代码连 交通运输学院课程设计 4 接起来，就可以做成一个系统的窗体运行该界面，例如，本系统中的登录窗体（图 2） 图 2 主登录界面 双击确定控件，可出现代码窗口，在此窗口中输入代码，就可以与下一个窗口相 连接，代码如下： Private Sub Command1_Click() Dim Msg Dim frm1 As New Form2 If Text1.Text = “刘小芳“ And Text2.Text = “0

10、0868“ Then Me.Hide frm1.Show Else MsgBox “账号或密码不正确,请重新输入“ End If End Sub Private Sub Form_Load() End Sub 交通运输学院课程设计 5 4.4.标准模块标准模块 标准模块（文件扩展名为 .BAS）是应用程序内其它模块访问的过程和声明的 容器。它们可以包含变量、常数、类型、外部过程和全局过程的全局（在整个应用 程序范围内有效的）声明或模块级声明。写入标准模块的代码不必绑在特定的应用 程序上；如果不小心用名称引用窗体和控件，则在许多不同的应用程序中可以重用 标准模块。它是一个纯代码性质的文件，不属于

11、任何一个窗体，主要在大型应用程 序中使用，它可以被不同的窗体所调用，在此系统中，表中模块被调用，来显示数 据库中的数据。 （如图 3 所示） 图 3 模块图 5.5.数据视图数据视图 视图的定义从放在数据库中，与此定义相关的数据并没有再存一份于数据库中， 通过视图看到的数据存放在基表中。视图看上去非常像数据库的物理表，对它的操 作同任何其他表一样，当通过视图修改数据时，实际上是在改变基表中的数据；相 反的，基表数据的改变也会自动反映在由基表产生的视图中，点击 VB 菜单栏里的 “数据视图窗口 ”会出现一个界面， （如图 4 所示） 交通运输学院课程设计 6 图 4 数据窗体向导-介绍 单击【下

12、一步】按钮，进（如图 5 所示）的界面 图 5 数据窗体向导-数据库类型 我是用 ODBC 来连接数据库的，所以这里选择 ODBC，然后点击【下一徐】按钮（图 6） 交通运输学院课程设计 7 图 6 数据窗体向导-连接信息 在 DSN（D）栏内选定自己所建的数据库名称，在【数据库】栏内再次填入数据库名称， 以保证与数据库下相连，点击【下一步】按钮，如（图 7）显示： 图 7 数据窗体向导-from 交通运输学院课程设计 8 在窗体布局中选择所需的窗体布局，再选中单选钮中的类，点击【下一步】如（图 8） 图 8 数据窗体向导-控件选择 在可用控件框中将添加按钮，编辑按钮，删除按钮，刷新按钮，关闭

13、按钮都选中，这 样在生成的表中就可以进行相应的操作，完成后点击【下一步】进入下一界面（如图 9 ） 交通运输学院课程设计 9 图 9 数据窗体向导-已完成 点击【完成】按钮，则完成了用数据视图功能将数据库中的数据导入 VB 界面中的操作， 此时运行界面就会有数据产生，并可以进行相关的操作， （如 10 所示） 图 10 数据视图 四数据库的设计四数据库的设计 1.1.数据库的简介及设计注意事项数据库的简介及设计注意事项 SQL Server2000 是 Microsoft 公司推出的 SQL Server 数据库管理系统，该 版本继承了 SQL Server 7.0 版本的优点，同时又比它增加

14、了许多更先进的功能。 具有使用方便可伸缩性好与相关软件集成程度高等优点，可跨越从运行 Microsoft Windows 98 的膝上型电脑到运行 Microsoft Windows 2000 的大型多 处理器的服务器等多种平台使用。 数据库（Database）是按照数据结构来组织、存储和管理数据的仓库，它产生 于距今五十年前，随着信息技术和市场的发展，特别是二十世纪九十年代以后，数 据管理不再仅仅是存储和管理数据，而转变成用户所需要的各种数据管理的方存储 式。数据库有很多种类型，从最简单的存储有各种数据的表格到能够进行海量数据 存储的大型数据库系统都在各个方面得到了广泛的应用。它是一种存储数

15、据并对数 据进行操作的工具。数据库的作用在于组织和表达信息，简而言之，数据库就是信 息的集合。是一个长期存储在计算机内的、有组织的、有共享的、统一管理的数据 集合。它是一个按数据结构来存储和管理数据的计算机软件系统。数据库的概念实 际包括两层意思： （1）数据库是一个实体，它是能够合理保管数据的 “仓库”，用户在该 “仓 交通运输学院课程设计 10 库”中存放要管理的事务数据， “数据”和“库”两个概念结合成为数据库。 （2）数据库是数据管理的新方法和技术，他能更合适的组织数据、更方便的维护数 据、更严密的控制数据和更有效的利用数据。 2.2.新建一个数据库新建一个数据库 创建任何一个数据库的

16、第一步是仔细的规划数据库，设计必须是灵活的、有逻辑 的。创建一个数据库结构的过程被认为是数据模型设计。数据库的设计以降低数据冗 余，保真数据完整新及一致性和提高数据并发行为原则，主要做到数据库个关系子模 式符合第三范式，消除数据冗余，利用事物级操作，保真数据的一致性和完整新，通 过触发器机制保证数据应用的完整性，各表之间通过外键相连，根据具体情况保留一 定的冗余，以提高访问速度。 本系统所用全部数据仅存放在 GIM 数据库中，该数据库中有五张表，介绍分别如下 表： a学生信息表 该表主要记录了毕业生本身的一些性质，有学号，姓名，性别，出生年月，专 业，英语，学历等信息在组成。 （如图 11 所

17、示） 图 11 学生信息图 b. 企业信息表 记录来我校招聘的一些企业的信息，由企业编号，企业名称，企业本质，企业成 立时间，企业总人数等组成，此信息表的建立方便于管理员对毕业生就业去向的的分 析，记录，管理。其信息（如图 12 所示） 。 交通运输学院课程设计 11 图 12 企业信息图 c.招聘信息表 这张表主要用来显示用人单位的招聘信息，为毕业生就业，找工作提供帮助。同 时也为单位招聘人才的信息起到一定的宣传作用，主要由企业编号，企业名称，所需 职位，工资，所招人员的专业要求等组成，其详细设计（如图 13 所示） 图 13 招聘信息表 c.就业信息表 此信息表记录了毕业生的毕业情况，便于

18、管理员的管理。主要由企业编号，企业名 称，所招学生的学好，姓名，就业职位，入职时间等组成，详细信息见（图 14） 图 14 招聘信息表 交通运输学院课程设计 12 d.管理员信息表 主要记录一些管理员的信息，具体见（图 15） 图 15 管理员信息图 3.3.外键约束外键约束 数据库之间的关系指明两个库之间共享一个共同的关键字值。一个连接是指一种 虚拟的表，这种表是在当用户要求从相互关联的各个不同的表中获取信息时建立的， 关键字段用于在相互连接的不同表中查找匹配的记录。一个更高级的连接形式称为自 连接。这种连接是指一个表被连接到它自己的一个字段，或在不同的纪录中由重复数 据的组合字段。数据库中

19、有三种不同类型的关键字：主关键字、组合关键字和外关键 字。在表中使用的关键字类型用于描述库表示什么以及在数据库中如何与其它的库建 立关系，总金额就需要外键的约束。 外键是用于建立和加强两个表数据之间的链接的一列或多列。通过将保存表中主 键值的一列或多列添加到另一个表中，可创建两个表之间的链接。这个列就成为第二 个表的外键。主键约束是指一个表通常可以通过一列和多列组合的数据来唯一标识表 中的每一列，这些列和列组合就被称为表上的主键，它可以用来强制实体完整性。当 一个表指定了主键约束时，SQL SERVER 通过为主键列上建立唯一索引来强制。数据 的唯一性。唯一性索引在主键被用于查询时可以对数据进

20、行快速访问外键也是由一列 或多列构成的，它用来建立和强制两个表间的关联。这种关联是通过将一个表中的组 成主键的列或组合列加入到另一个表中形成的，这个列或组合列就成了第二个表中的 外键，此为外键约束。 一个外键约束并不一定要求必须与另一个表上的主键约束相关联，它还 可以被 定义为对另一个列中的 UNIQUE 约束的一个引用。外键约束可以允许空值，但是形成外 键的列或组合列中出现空值时将跳过对外键约束的验证。当向表中添加新数据行或修 改已有的数据行时，在外键中的定义的列或组合列必须在其他表的主键中存在或是为 空，否则将会出错。需注意：外键约束可以对同一个数据库中的其他表上的列或组合 列进行引用，也

21、可以是对自身表中其他列或组合列的引用(自引用表) 交通运输学院课程设计 13 尽管外键的主要作用是用来限制可以输入到外键表中的数据，但是还可以限制对 主键表中数据的修改，外键约束也可以被用作索引，这是因为.对外键约束的修改或被 在其他表中的外键约束所检查。外键列或组合列也常常被用于查询中，对于在具有外 键约束的表和其他有主键或唯一键的表间进行查询时，可以在连接准则中使用外键列 或组合。外键约束防止这种情况的发生。如果主键表中数据的更改使之与外键表中数 据的链接失效，则这种更改是不能实现的，从而确保了引用完整性。如果试图删除主 键表中的行或更改主键值，而该主键值与另一个表的外键约束值相关，则该操

22、作不可 实现。若要成功更改或删除外键约束的行，可以先在外键表中删除外键数据或更改外 键数据，然后将外键链接到不同的主键数据上去。在 GIM 数据库中通过设置外键约束， 通过关系生成了（如图 15）约束关系 图 15 各实体关系图 4.E-R4.E-R 模型及到关系模型的转化模型及到关系模型的转化 实体-联系图(Entity Relationship Diagram)，提供了表示实体类型、属性和联系 的方法，用来描述现实世界的概念模型。E-R 方法是“实体-联系方法” （Entity- Relationship Approach）的简称。它是描述现实世界概念结构模型的有效方法。构成 交通运输学院

23、课程设计 14 E-R 图的基本要素是实体型、属性和联系，其表示方法为： 实体型(Entity)：具有相同属性的实体具有相同的特征和性质，用实体名及其 属性名集合来抽象和刻画同类实体;在 E-R 图中用矩形表示，矩形框内写明实体名；比 如学生张三丰、学生李寻欢都是实体。如果是弱实体的话，在矩形外面再套实线矩形。 属性(Attribute)：实体所具有的某一特性，一个实体可由若干个属性来刻画。 在 E-R 图中用椭圆形表示，并用无向边将其与相应的实体连接起来；比如学生的姓名、 学号、性别、都是属性。如果是多值属性的话，再椭圆形外面再套实线椭圆。如果是 派生属性则用虚线椭圆表示。 联系(Relat

24、ionship)：联系也称关系，信息世界中反映实体内部或实体之间的 联系。实体内部的联系通常是指组成实体的各属性之间的联系；实体之间的联系通常 是指不同实体集之间的联系。在 E-R 图中用菱形表示，菱形框内写明联系名，并用无 向边分别与有关实体连接起来，同时在无向边旁标上联系的类型（1 : 1，1 : n 或 m : n） 。 比如老师给学生授课存在授课关系，学生选课存在选课关系。如果是弱实体的联 系则在菱形外面再套菱形 E-R Mapping 是将数据库内独立的字段属性与软件架构里的对象联系起来的图，简明些 说就是将对象持久化的一种手段，对象里有属性，属性通过 ER 图对应联系到数据库中 的

25、表和字段。 E-R 图能更形象，更直接，更明确的表现需求分析人员意图。同时也是需求分析人 员对自己理解客户需求的再检查。 五数据库的连接（五数据库的连接（ODBC） 1.ODBC1.ODBC 的概述及应用的概述及应用 开放数据库互连（ ODBC)是 Microsoft 引进的一种早期数据库接口技术。它实 际上是我们要在本章后面加以讨论的ADO 的前身。Microsoft 引进这种技术的一 个主要原因是，以非语言专用的方式，提供给程序员一种访问数据库内容的简单方 法。换句话说，访问 DBF 文件或 Access Basic 以得到 MDB 文件中的数据时，无需 懂得 Xbase 程序设计语言。事

26、实上， Visual C+就是这样一个程序设计平台，即 Microsoft 最初是以 ODBC 为目标的。ODBC 本身也提供了对 SQL 语言的支持，用户 交通运输学院课程设计 15 可以直接将 SQL 语句送给 ODBC。一个基于 ODBC 的应用程序对数据库的操作不依赖 任何 DBMS，不直接与 DBMS 打交道，所有的数据库操作由对应的DBMS 的 ODBC 驱 动程序完成。也就是说，不论是 FoxPro、Access 还是 Oracle 数据库，均可用 ODBC API 进行访问。它本身就是为了是数据库的使用者不必考虑使用的是何种数据 库而只需要相同的操作而设计的。它是由Micros

27、oft 公司于 1991 年提出的一个 用于访问数据库的统一界面标准，是应用程序和数据库系统之间的中间件。它通过 使用相应应用平台上和所需数据库对应的驱动程序与应用程序的交互来实现对数据 库的操作，避免了在应用程序中直接调用与数据库相关的操作，从而提供了数据库 的独立性。 应用程序要访问一个数据库，首先必须用ODBC 管理器注册一个数据源，数据 源。数据源包含了数据库位置和数据库类型等信息，实际上是一种数据连接的抽象。 管理器根据数据源提供的数据库位置、数据库类型及ODBC 驱动程序等信息，建立 起 ODBC 与具体数据库的联系。这样，只要应用程序将数据源名提供给 ODBC，ODBC 就能建立

28、起与相应数据库的连接。在ODBC 中，ODBC API 不能直接访 问数据库，必须通过驱动程序管理器与数据库交换信息。驱动程序管理器负责将应 用程序对 ODBC API 的调用传递给正确的驱动程序，而驱动程序在执行完相应的操 作后，将结果通过驱动程序管理器返回给应用程序。 2.ODBC2.ODBC 的组成的组成 ODBC 主要由驱动程序和驱动程序管理器组成。驱动程序是一个用以支持 ODBC 函数调用的模块，每个驱动程序对应于相应的数据库，当应用程序从基于一 个数据库系统移植到另一个时，只需更改应用程序中由ODBC 管理程序设定的与 相应数据库系统对应的别名即可。应用程序 ODBC 管理器，该程

29、序位于 Windows 95 控制面板(Control Panel)的 32 位 ODBC 内，其主要任务是管理安装的 ODBC 驱 动程序和管理数据源。 驱动程序管理器 (Driver Manager)。驱动程序管理器包含在 ODBC32.DLL 中， 对用户是透明的。其任务是管理 ODBC 驱动程序，是 ODBC 中最重要的部件。驱动 程序管理器可链接到所有 ODBC 应用程序中，它负责管理应用程序中ODBC 函数 与 DLL 中函数的绑定。 ODBC 驱动程序。是一些 DLL，提供了 ODBC 和数据库之间 的接口。在访问 ODBC 数据源时需要 ODBC 驱动程序的支持。 交通运输学院

30、课程设计 16 ODBC 使用层次的方法来管理数据库，在数据库通信结构的每一层，对可能出 现依赖数据库产品自身特性的地方， ODBC 都引入一个公共接口以解决潜在的不一 致性，从而很好地解决了基于数据库系统应用程序的相对独立性。 3.3.数据库与数据远远的连接数据库与数据远远的连接 （1）双击【控制面板】中的 32 位 ODBC 小程序（如果当前系统上未安装 16 位驱动程 序，那么一些版本的 Windows 使用简单的 ODBC 小程序）。你会看到 ODBC Data Source Administrator（ODBC 数据源管理员）对话框，如下图所 DSN（用 户数据源名）选项卡。对系统级

31、数据库来说，使用 System DSN（系统数据源名）选项 卡。（如图 17 所示） 图 17 ODBC 数据源管理源 对本地数据库来说，通常要在 User DSN（用户 DSN）选项卡上创建一个项；对远程数 据库，则在 System DSN（系统 DSN）选项卡上创建。任何情况下，都不能在 User DSN（用户 DSN）和 System DSN（系统 DSN）选项卡上创建同名的项。通常会出现 的问题是，你试图访问远程数据库，但从 Web。 （2）.单击【添加】按钮。会看到（创建新的数据源）对话框，（如图 18） 交通运输学院课程设计 17 图 18 创建新的数据源 ODBC 技巧检查 OD

32、BC 数据源管理员对话框的 About 选项卡，可以确定你正在使用的 ODBC 驱动程序的最新版本。 （3）.选择一个数据源。对本练习来说，我选择了 SQL SERVER 数据源。单击【完成】， 会看到某种类型的配置对话框，（如图 19） 图 19 创建到 SOL Server 的新数据源 交通运输学院课程设计 18 ODBC 注释如果你选择的数据源和我在本实例中选择的不同，那么所需的配置步骤也和 这里说明的不同 ODBC 驱动程序都要求不同类型的配置。 （4）.在 DataSource Name（数据源名）域内输入数据源名称。一定要选择意义明确 但又不过于冗长的名称。我选择 GIM（毕业生信

33、息管理系统），因为我最终要创建一个 与毕业生信息管理有关的数据库的链接。 （5）.在 Description（描述）域内输入一段说明性文字。可以让这个项比上一个项稍 长一些，因为它描述数据库的用途。对本练习，我选择不输入。 （6）.单击【下一步】按钮。你会看到一个创建到 SOL Server 的新数据源对话框， （如图 20 所示） 图 20 创建到 SOL Server 的新数据源 因为我安装数据库是没有设置 sa 密码，所以我选择使用网络登录的 ID 的 Windows NT 验证。其它选项都不改变，然后单击【下一步】。会出现(如图 6 所示)对话框，选择 更【改默认的数据库为(D)】选项

34、，然后在下拉菜单中选择前面创建的“GIM”系统 交通运输学院课程设计 19 (。 图 21 创建到 SOL Server 的新数据源 （7）单击【下一步】按钮，打开（如图 22 所示）的对话框，保持默认设置。 图 22 建到 SOL Server 的新数据源 （8）.直接单击【完成】按钮，打开（如图 23，24 所示）的对话框，在该对话框中提 示了数据源连接的各种配置，其中【测试数据源】按钮可以对掐面的配置进行测试。 组后单击【确定】按钮完成配置，便完成了数据库与数据源的连接。 交通运输学院课程设计 20 图 23 ODBC Mircrosoft SOL Server 安装 图 24 SOL

35、Server ODBC 数据源测试 交通运输学院课程设计 21 六存在的问题及心的六存在的问题及心的 随着信息技术和市场的发展，人们发现关系型数据库系统虽然技术很成熟，但其 局限性也是显而易见的：它能很好地处理所谓的“表格型数据”，却对技术界出现的 越来越多的复杂类型的数据无能为力。九十年代以后，技术界一直在研究和寻求新型 数据库系统。但在什么是新型数据库系统的发展方向的问题上，产业界一度是相当困 惑的。数年的发展表明，面向对象的关系型数据库系统产品的市场发展的情况并不理 想。理论上的完美性并没有带来市场的热烈反应。其不成功的主要原因在于，这种数 据库产品的主要设计思想是企图用新型数据库系统来

36、取代现有的数据库系统。这对许 多已经运用数据库系统多年并积累了大量工作数据的客户，尤其是大客户来说，是无 法承受新旧数据间的转换而带来的巨大工作量及巨额开支的。另外，面向对象的关系 型数据库系统使查询语言变得极其复杂，从而使数据库的开发从在这一些无法排出的 干扰。 但是，这次设计也提高了我们对 Visual Basic 语言的认识及编写和能力，更深一 步熟悉掌握了数据库，培养了我们综合运用所学知识与生产实践经验，分析和解决工 程技术问题的能力，在遇到技术困难的时候，想尽一切办法将这个问题解决，培养了 认真对待，永不放弃的学习态度，并且将理论运用于实践，是一次真正的实践过程， 学到了好多东西，为

37、以后更好的运用数据库知识奠定了很好的基础。 交通运输学院课程设计 22 七参考文献七参考文献 1周星，魏应彬， 动态网页与 VB 数据库 ，北京大学出版社， 2001 2 俞波，周皓峰，一种基于 VB 的学生信息管理系统， 计算机与现代化，2000 年第 2 期， 5560 3 王华，VB 开发信息服务系统示例， 太原科技，2003 年 第 4 期 ，52 4 李世杰Active Server Pages 2.0 设计手册 ，清华大学出版社，2000.1 5 闫华文， SQL Server 2000 与 VB 数据库编程技术 ，北京大学出版社，2001.4 6 康博， VB 应用程序开发新技术

38、 ，人民邮电出版社，1999.7 交通运输学院课程设计 23 附录附录 1. 各实体间各实体间 E-R 关系关系图图 Student Sname Tel Birthday English Sno Sdept Sex Eterprise Zpxx Estnum Eno Eessence Etime Ename Eno Education Position Sdept Salary English Ename N N 浏览 工作 发布 N 1 11 交通运输学院课程设计 24 2.2.代码代码 （1）.主界面余个窗口连接的代码 Private Sub Command1_Click(Index As

39、 Integer) Dim Form2 As New frmStudent Form2.Show End Sub Private Sub Command2_Click(Index As Integer) Dim frmStudent As New frmEterprise frmEterprise.Show End Sub Private Sub Command3_Click(Index As Integer) Dim frmEterprise As New frmZpxx frmZpxx.Show End Sub Private Sub Command4_Click(Index As Int

40、eger) Dim frmZpxx As New frmJyxx frmJyxx.Show End Sub （2）主模块代码 Public Function ConnectString() As String ConnectString = “Provider=SQLOLEDB.1;Initial Catalog=GIM;“ Data Sourse End Function Public Function ExecuteSQL(ByVal SQL As String, MagString As String) As ADODB.Recordset Dim cnn As ADODB.Connec

41、tion Dim rst As ADODB.Recordset Dim sTokens() As String 交通运输学院课程设计 25 On Error GoTo ExecuteSQL_Error sTokens = Split(SQL) Set cnn = New ADODB.Connection cnn.Open ConnectString If InStr(“INSERT,DELETE,UPDATE,EXECUTE“, UCase$(sTokens(0) Then cnn.Execute (SQL) MagString = sTokens(0) “ dsn=GIM;uid=;pwd=

42、;database=GIM;“ Set adoPrimaryRS = New Recordset adoPrimaryRS.Open “select Eno,Ename,Eessence,Btime,Stnum from Eterprise“, db, adOpenStatic, adLockOptimistic DataMembers.Add “Primary“ End Sub Private Sub Class_GetDataMember(DataMember As String, Data As Object) Select Case DataMember Case “Primary“

43、Set Data = adoPrimaryRS End Select End Sub Private Sub adoPrimaryRS_MoveComplete(ByVal adReason As ADODB.EventReasonEnum, ByVal pError As ADODB.Error, adStatus As 交通运输学院课程设计 31 ADODB.EventStatusEnum, ByVal pRecordset As ADODB.Recordset) RaiseEvent MoveComplete End Sub Private Sub adoPrimaryRS_WillCh

44、angeRecord(ByVal adReason As ADODB.EventReasonEnum, ByVal cRecords As Long, adStatus As ADODB.EventStatusEnum, ByVal pRecordset As ADODB.Recordset) 验证代码置于此处 下列动作发生时该事件被调用 Dim bCancel As Boolean Select Case adReason Case adRsnAddNew Case adRsnClose Case adRsnDelete Case adRsnFirstChange Case adRsnMov

45、e Case adRsnRequery Case adRsnResynch Case adRsnUndoAddNew Case adRsnUndoDelete Case adRsnUndoUpdate Case adRsnUpdate End Select If bCancel Then adStatus = adStatusCancel End Sub Public Property Get EditingRecord() As Boolean EditingRecord = (adoPrimaryRS.EditMode 0 Then Beep 已到最后返回 adoPrimaryRS.MoveLast End If End Sub Public Sub MovePrevious() If Not adoPrimaryRS.BOF Then adoPrimaryRS.MovePrevious If adoPrimaryRS.BOF And adoPrimaryRS.RecordCount 0 Then Beep 已到最后返回 adoPrimaryRS.MoveFirst End If End Sub