如果您无法下载资料,请参考说明:
1、部分资料下载需要金币,请确保您的账户上有足够的金币
2、已购买过的文档,再次下载不重复扣费
3、资料包下载后请先用软件解压,在使用对应软件打开
(1)可以实现图书的登记、借阅和赔偿的管理。(2)可以实现对图书的各种信息的查询,包括逐个浏览,以及对图书信息的增加、删除和编辑操作。另外,可以根据输入的信息来检索某个图书的信息。(3)可以实现对管理人员的投诉管理。(4)可以实现对值班人员的管理。系统的功能模块图如图1所示。本实例根据上面的设计规划出的实体有图书登记实体、图书借阅实体、图书赔偿实体、查询输出实体、值班管理实体、投诉管理实体。各个实体具体的描述E-R图如下。图书登记实体E-R图如图2所示。图书借阅实体E-R图如图3所示。图1系统的功能模块图图2图书登记实体E-R图图3图书借阅实体E-R图图书赔偿实体E-R图如图4所示。图4图书赔偿实体E-R图投诉管理实体E-R图如图5所示。图5投诉管理实体E-R图值班管理实体E-R图如图6所示。图6值班管理实体E-R图查询输出实体E-R图如图7所示。图7查询输出实体E-R图二、结构设计根据上面的需求分析,设计好数据库系统,然后开发应用程序可以考虑的窗体的系统,每一个窗体实现不同的功能,可以设计下面的几个模块。●图书管理模块:用来实现图书的登记、借阅、赔偿。●图书资料模块:用来实现图书的查询输出。●值班管理模块:用来实现管理人员的值班浏览。●投诉管理模块:用来实现对管理人员的投诉管理。●系统管理模块:用来实现用户的增加、删除和修改等操作。三、数据库设计这里的数据库采用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、连接数据在VisualBasic环境下,选择“工程”→“引用”命令,在随后出现的对话框中选择“MicrosoftActiveXDataObjects2.0Library”,然后单击“确定”按钮,如图16所示。图16引用ADO连接数据库在程序设计的公共模块中,先定义ADO连接对象。语句如下:PublicconnAsNewADODB.Connection'标记连接对象然后在子程序中,用如下的语句即可打开数据库:DimconnectionstringAsStringconnectionstring="provider=Microsoft.Jet.oledb.4.0;"&_"datasource=book.mdb"conn.Openconnectionstring3、设置ODBCVB的ADO对象是通过ODBC来访问数据库,所以还要建立ODBC数据引擎接口。打开控制面板中的“管理工具”→“数据源”(ODBC),出现如图17所示的对话框。图17ODBC对话框单击“添加”按钮,出现“创建新数据源”对话框,如图18所示。图18“创建新数据源”对话框选择MicrosoftAccessDriver(*.mdb),单击“完成”按钮,出现如图19所示对话框。图19设置连接数据源在“数据源名”文本框中添加一个名字,单击“确定”按钮完成系统默认连接设置。然后在ODBC对话框中单击“确定”按钮完成ODBC设置。界面设计设计好的界面如图20所示。图20图书管理系统界面这是一个多文档界面(MDI)应用程序,可以同时显示多个文档,每个文档显示在各自的窗体中。MDI应用程序中常有包含子菜单的“窗体”选项,用于在窗体或文档之间进行切换。菜单应用程序中,有5个菜单选项,每个选项对应着E-R图的一个子项目。1、创建主窗体首先创建一个工程,命名为图书管理系统,选择“工程”→“添加MDI窗体”命令,则在项目中添加了主窗体。该窗体的一些属性如表1所示。表1主窗体的属性属性值Caption系统管理图书NameMainMenuMainmenu1WindowstateMaxsizeWindowstate的值为Maxsize,即程序启动之后自动最大化。将“菜单”组件从“工具箱”拖到窗体上。创建一个Text属性设置为“文件”的顶级菜单项,且带有名为“关闭”的子菜单项。类似地创建一些菜单项,如表2所示。表2菜单项表菜单名称Text属性功能描述MenuItem1图书管理顶级菜单,包含子菜单MenuItem2图书登记调出图书登记窗体MenuItem3图书借阅调出图书借阅窗体MenuItem4图书赔偿调出图书赔偿窗体MenuItem5图书资料顶级菜单,包含子菜单MenuItem6查询输出调出查询输出窗体MenuItem7值班管理顶级菜单,没