二、结构设计 根据上面的需求分析，设计好数据库系统，然后开发应用
程序可以考虑的窗体的系统，每一个窗体实现不同的功能，可以设计下面的几个模块。
● 图书管理模块:用来实现图书的登记、借阅、赔偿。
● 图书资料模块:用来实现图书的查询输出。
● 值班管理模块:用来实现管理人员的值班浏览。
● 投诉管理模块:用来实现对管理人员的投诉管理。
● 系统管理模块:用来实现用户的增加、删除和修改等操作。
三、数据库设计 这里的数据库采用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设置。
