VB Access设计图书管理系统

二、结构设计

　　根据上面的需求分析，设计好数据库系统，然后开发应用程序可以考虑的窗体的系统，每一个窗体实现不同的功能，可以设计下面的几个模块。

　　● 图书管理模块:用来实现图书的登记、借阅、赔偿。

　　● 图书资料模块:用来实现图书的查询输出。

　　● 值班管理模块:用来实现管理人员的值班浏览。

　　● 投诉管理模块:用来实现对管理人员的投诉管理。

　　● 系统管理模块:用来实现用户的增加、删除和修改等操作。

　　三、数据库设计

　　这里的数据库采用Access，用ADO作为连接数据对象。

　　1、建立Access 数据库

　　启动Access，建立一个空的数据库book.mdb，如图8所示。

　　使用程序设计器建立系统需要的表格如下。

　　图书登记表，如图9所示。

　　
　　图8 建立数据库book.mdb 图9 图书登记表

　　图书借阅表，如图10所示。图书赔偿表，如图11所示。

　　
　　图10 图书借阅表 图11 图书赔偿表

　　图书资料表，如图12所示。系统管理表，如图13所示。

　　
　　图12 图书资料表 图13 系统管理表

　　投诉管理表，如图14所示。

　　
　　图14 投诉管理表

　　值班管理表，如图15所示。

　　
　　图15 值班管理表

　　2、连接数据

　　在Visual Basic环境下，选择“工程”→“引用”命令，在随后出现的对话框中选择“Microsoft ActiveX Data Objects 2.0 Library”，然后单击“确定”按钮，如图16所示。

　　
　　图16 引用ADO连接数据库

　　在程序设计的公共模块中，先定义ADO连接对象。语句如下:

　　Public conn As New ADODB.Connection ' 标记连接对象

　　然后在子程序中，用如下的语句即可打开数据库:

　　Dim connectionstring As String

　　connectionstring = "provider=Microsoft.Jet.oledb.4.0;" &_

　　"data source=book.mdb"

　　conn.Open connectionstring

　　3、设置ODBC

　　VB的ADO对象是通过ODBC来访问数据库，所以还要建立ODBC数据引擎接口。

　　打开控制面板中的“管理工具”→“数据源”(ODBC)，出现如图17所示的对话框。

　　
　　图17 ODBC对话框

　　单击“添加”按钮，出现“创建新数据源”对话框，如图18所示。

　　
　　图18 “创建新数据源”对话框

　　选择Microsoft Access Driver(*.mdb)，单击“完成”按钮，出现如图19所示对话框。

　　
　　图19 设置连接数据源

　　在“数据源名”文本框中添加一个名字，单击“确定”按钮完成系统默认连接设置。然后在ODBC对话框中单击“确定”按钮完成ODBC设置。