数据库课程设计报告

来源：筏尚旅游网

勤学务实圆融卓越

第一章绪言

图书馆信息管理系统，是图书馆进行现代化的信息管理和提供信息服务的基础，是引导人们快速、准确地获取馆藏资源，并对馆藏资源进行有效管理的保证。

湖南工学院图书馆藏纸质文献总量为70.2万册；中文电子图书66.7万册；每年订购的中外文期刊1700多种。图书馆馆紧紧围绕学校教学和科研的需要，建立了较为系统和完整并具有鲜明学科特点的藏书体系。同时拥有CNKI系列全文数据库、重庆维普信息资源系统等多个与学院专业相关的期刊全文数据库，同时还是湖南省高校数字化图书馆的成员馆,共享网上资源有:国家法规数据库、中外专科信息服务平台、万方中国标准全文数据库等9个资源库。然而随着新馆的建成，现有的图书借阅系统不能很好的满足对读者借阅的管理，于是提出在原有的基础上，开发一套更为有效的图书借阅管理系统，以体现以人为本的服务宗旨，提高对读者的服务质量。

新的图书借阅系统的目标是希望通过新系统的应用，能促进图书管理工作的规范化、标准化和自动化，提高管理水平和管理效率，为读者提供更完善的信息服务，使馆藏资源得到有效的利用，最大范围的满足读者的借阅需求。

勤学务实圆融卓越

第二章系统分析

2.1系统介绍

本系统定位于小型图书馆，暂时考虑单机环境下的实现；操作系统选择目前常用的Windows 98/2000。系统性质为MIS管理信息系统。

本系统采用会员制管理，系统功能应包含图书管理、读者管理、图书借阅管理、系统管理等。系统界面力求简洁、易用，在标准化的基础上考虑界面的美观和新颖。

2.2系统面向的用户群体

系统面向小型图书馆，用户群体为这些图书馆的学生、老师或者工作人员等。 2.3系统的功能性需求功能序号功能名称 1 2 3 4 图书管理读者管理管理图书借阅管理系统管理功能说明包含图书类别、信息管理、查询图书信息等包含读者类别、读者信息、查询读者信息等包含借书管理、还书管理系统退出 2.4系统的非功能性需求 2.4.1用户界面需求

简洁、易用、易懂，美观、大方、标准，具备一定的兼容性。 2.4.2系统开发平台

前台：Microsoft Visual Basic6.0 后台：Microsoft SQL 2000 Server 2.4.3软件质量需求

易用、健壮、兼容性好、运行稳定、有一定安全保障。 2.5技术可行性

系统的性质为MIS或财务软件，因而数据库的设计与操纵是系统设计的核心。我们经过一个学期对数据库原理、VB6.0以及专业知识的学习，具备一定的系统分析与设计能力，熟悉数据库的设计与操纵；因而该系统的实现在技术上是可行的。 2.6项目规划

项目开发可分为两个阶段：

第一阶段用时约2周，进行系统初步调查、系统分析、需求分析、详细设计，

画出系统流程图，数据流程图，数据字典，程序流程图。

第二阶段用时约1周，进行程序的编写。利用VB进行程序的实际编写、测试

及程序打包。

勤学务实圆融卓越

第三章总体结构设计

数据库主要着重于数据对象的属性和数据对象之间的关系的分析。一般采用E-R图，即实体-关系模型来分析数据对象的属性和数据对象之间的关系。 3.1 E-R模型设计 3.1.1 实体列表实体读者图书借阅管理员描述所有借阅者，由读者号标识图书馆所有图书，由图书编号标识姓名、书名、借书日期等属性,由图书编号和读者号标识系统管理人员 3.1.2 系统的E-R模型有关实体及其属性图如下：

实体集实体属性实体之间的联系

该图书管理系统的E-R模型，如下图所示

勤学务实圆融卓越

3.2 设计数据库 3.2.1创建数据库

(1)在企业管理器中的数据库上右击。

(2)执行“新建数据库”命令,并在打开的“创建数据库”对话框中输入数据库名“图书馆数据库”。

(3)单击“确定”按钮，则新建的数据库就会出现在企业管理器上。 3.2.2创建数据表

创建数据库后，为“图书馆数据库”添加数据表，步骤如下。

(1)在企业管理器中右击“图书馆数据库”下的“表”文件夹。在弹出的快捷菜单中执行“新建表”命令，出现表设计器。 (2)添加表的字段和其他详细资料。 3.2.3各表设计详解

[说明]：空缺位置表示无要求，主键在约束栏注明。视图/表名读者表图书表借阅表用户管理

基本表：[读者表] 字段借书证号姓名性别班级年龄基本表：[图书表] 字段图书编号书名作者出版社出版时间类别类型 varchar varchar varchar varchar varchar char 长度 25 10 20 25 50 24 4

类型基本表基本表基本表基本表说明读者信息图书信息借阅读者、书籍信息登陆账号、密码类型 int char char char int 长度 4 10 10 20 4 约束主键约束主键勤学务实圆融卓越

基本表：[用户管理] 字段用户名密码姓名性别所在部门备注

基本表：[借出表] 字段图书编号借书证编号读者姓名所借图书作者出版社出版时间类别借出时间

类型 varchar varchar varchar varchar varchar varchar datetime 长度 8 8 10 25 10 50 约束主键类型 varchar varchar varchar varchar datetime varchar 长度 10 25 10 25 约束主键

勤学务实圆融卓越

第四章 DB的详细设计

4.1数据库环境说明

考虑该系统的定位与现有技术力量,决定采用Microsoft SQL 2000 Server 作为系统的后台数据库开发环境。 4.2 DB逻辑设计

图4.1数据库逻辑结构图

查询图书图书编号 … user 用户ID … 读者表 … 读者信息读者类别 … 图书管理图书类别 … Book 图书信息 … 图书借阅借书还书 … 4．3程序流程图的设计程序流程图的代号如下：

起始、终止

判断

处理输入、输出

本系统的流程分析图如图4.2所示

勤学务实圆融卓越

还书管理系统管理借阅管理图书管理用户登录登陆系统图4.2 系统流程分析图

4．4 原代码设计 4.4.1 系统主界面代码 Private Sub Command1_Click() 登陆界面.Show 1 End Sub

Private Sub Command2_Click() Unload Me End Sub

Private Sub Command3_Click() 图书管理.Show 1 End Sub

Private Sub Command4_Click() 借阅管理.Show 1

勤学务实圆融卓越

End Sub

Private Sub Command5_Click() 还书管理.Show 1 End Sub

Private Sub Command6_Click() 系统管理.Show 1 End Sub

Private Sub Form_Load() Command3.Enabled = False Command4.Enabled = False Command5.Enabled = False Command6.Enabled = False

Skin1.LoadSkin App.Path & \"\\green.skn\" Skin1.ApplySkin Me.hWnd End Sub

4.4.2 登陆窗口代码

Private Sub Command1_Click()

Dim password As String, name As String

Adodc1.RecordSource = \"select * from 用户管理 where 用户名=\" & Text1.Text Adodc1.Refresh

password = Adodc1.Recordset.Fields(\"密码\") name = Adodc1.Recordset.Fields(\"用户名\")

If Combo1.Text = \"管理员\" Then

If Text1.Text = name And Text2.Text = password Then

勤学务实圆融卓越

r = MsgBox(\"欢迎进入湖南工学院图书借阅管理系统!\恭喜，登陆成功！\") Print r

主页.Command3.Enabled = True 主页.Command4.Enabled = True 主页.Command5.Enabled = True 主页.Command6.Enabled = True 主页.Command1.Caption = \"已登陆\" 主页.Command1.Enabled = False Unload Me Else

MsgBox \"帐号或密码错误，请重新登陆！\登陆失败\" End If End If

If Combo1.Text = \"普通用户\" Then If

Text1.Text

name

And

Text2.Text

password

And

Adodc1.Recordset.Fields(\"权限\") = 普通用户 Then

r = MsgBox(\"欢迎进入湖南工学院图书借阅管理系统!\恭喜，登陆成功！\") Print r

主页.Command3.Enabled = True 主页.Command4.Enabled = True 主页.Command5.Enabled = True 主页.Command6.Enabled = False 主页.Command1.Caption = \"已登陆\" 主页.Command1.Enabled = False Unload Me Else

MsgBox \"帐号或密码错误，请重新登陆！\登陆失败\" End If End If End Sub

勤学务实圆融卓越

Private Sub Command2_Click() Unload Me End Sub

Private Sub Form_Load()

Skin1.LoadSkin App.Path & \"\\green.skn\" Skin1.ApplySkin Me.hWnd End Sub

4.4.3 借阅管理代码

Private Sub Command1_Click()

Adodc1.RecordSource = \"select * from 图书表\" Adodc1.Refresh

If Not Text1.Text = \"\" Then

Adodc1.RecordSource = \"select * from 图书表 where 书名='\" & Text1.Text & \"'\" Adodc1.Refresh Else

MsgBox \"请输入所借图书的书名\提示\" End If End Sub

Private Sub Command2_Click()

Adodc1.RecordSource = \"select * from 图书表\" Adodc1.Refresh

Adodc2.RecordSource = \"select * from 读者表\" Adodc2.Refresh

Adodc3.RecordSource = \"select * from 借出表\" Adodc3.Refresh

If Not Text1.Text = \"\" And Not Text2.Text = \"\" Then

Adodc1.RecordSource = \"select * from 图书表 where 书名='\" & Text1.Text & \"'\"

Adodc1.Refresh

Adodc2.RecordSource = \"select * from 读者表 where 借书证编号=\" &

勤学务实圆融卓越

Text2.Text Adodc2.Refresh

Adodc3.Recordset.AddNew

Adodc3.Recordset.Fields(\"图书编号\") = Adodc1.Recordset.Fields(\"图书编号\")

Adodc3.Recordset.Fields(\"所借图书\") = Adodc1.Recordset.Fields(\"书名\") Adodc3.Recordset.Fields(\"读者姓名\") = Adodc2.Recordset.Fields(\"姓名\") Adodc3.Recordset.Fields(\"借书证编号\") = Adodc2.Recordset.Fields(\"借书证编号\")

Adodc3.Recordset.Fields(\"作者\") = Adodc1.Recordset.Fields(\"作者\") Adodc3.Recordset.Fields(\"出版社\") = Adodc1.Recordset.Fields(\"出版社\") Adodc3.Recordset.Fields(\"出版时间\") = Adodc1.Recordset.Fields(\"出版时间\")

Adodc3.Recordset.Fields(\"类别\") = Adodc1.Recordset.Fields(\"类别\") Adodc3.Recordset.Fields(\"借书时间\") = Left(Now, 10) Adodc3.Recordset.Update

Adodc1.RecordSource = \"select * from 图书表 where 书名='\" & Text1.Text & \"'\"

Adodc1.Refresh

Adodc1.Recordset.Delete 图书管理.Adodc1.Refresh 图书管理.Adodc2.Refresh

MsgBox \"借阅成功\成功提示\" End If End Sub

Private Sub Command3_Click() Unload Me End Sub

Private Sub Command4_Click()

Adodc2.RecordSource = \"select * from 读者表\" Adodc2.Refresh

勤学务实圆融卓越

If Not Text2.Text = \"\" Then

Adodc2.RecordSource = \"select * from 读者表 where 借书证编号=\" & Text2.Text Adodc2.Refresh Else

MsgBox \"请输入你的借书证编号\提示\" End If End Sub

Private Sub Command6_Click()

Adodc1.RecordSource = \"select * from 图书表\" Adodc1.Refresh

If Not Text3.Text = \"\" Then

Adodc1.RecordSource = \"select * from 图书表 where 书名 like '%\" & Text3.Text & \"%'\" Adodc1.Refresh Else

MsgBox \"请输入你要查询图书的关键字\提示\" End If End Sub

Private Sub Form_Load()

Skin1.LoadSkin App.Path & \"\\green.skn\" Skin1.ApplySkin Me.hWnd End Sub

4.4.4 还书管理代码

Private Sub Command1_Click()

Adodc1.RecordSource = \"select * from 图书表\" Adodc1.Refresh

If Not Text1.Text = \"\" Then

Adodc1.RecordSource = \"select * from 图书表 where 书名='\" & Text1.Text & \"'\"

勤学务实圆融卓越

Adodc1.Refresh Else

MsgBox \"请输入所借图书的书名\提示\" End If End Sub

Private Sub Command2_Click()

Adodc1.RecordSource = \"select * from 图书表\" Adodc1.Refresh

Adodc2.RecordSource = \"select * from 读者表\" Adodc2.Refresh

Adodc3.RecordSource = \"select * from 借出表\" Adodc3.Refresh

If Not Text1.Text = \"\" And Not Text2.Text = \"\" Then

Adodc1.RecordSource = \"select * from 图书表 where 书名='\" & Text1.Text & \"'\"

Adodc1.Refresh

Adodc2.RecordSource = \"select * from 读者表 where 借书证编号=\" & Text2.Text Adodc2.Refresh

Adodc3.Recordset.AddNew

Adodc3.Recordset.Fields(\"图书编号\") = Adodc1.Recordset.Fields(\"图书编号\")

Adodc3.Recordset.Fields(\"类别\") = Adodc1.Recordset.Fields(\"类别\") Adodc3.Recordset.Fields(\"借书时间\") = Left(Now, 10) Adodc3.Recordset.Update

勤学务实圆融卓越

Adodc1.RecordSource = \"select * from 图书表 where 书名='\" & Text1.Text & \"'\"

Adodc1.Refresh

Adodc1.Recordset.Delete 图书管理.Adodc1.Refresh 图书管理.Adodc2.Refresh

MsgBox \"借阅成功\成功提示\" End If End Sub

Private Sub Command3_Click() Unload Me End Sub

Private Sub Command4_Click()

Adodc2.RecordSource = \"select * from 读者表\" Adodc2.Refresh

If Not Text2.Text = \"\" Then

Adodc2.RecordSource = \"select * from 读者表 where 借书证编号=\" & Text2.Text Adodc2.Refresh Else

MsgBox \"请输入你的借书证编号\提示\" End If End Sub

Private Sub Command6_Click()

Adodc1.RecordSource = \"select * from 图书表\" Adodc1.Refresh

If Not Text3.Text = \"\" Then

Adodc1.RecordSource = \"select * from 图书表 where 书名 like '%\" & Text3.Text & \"%'\" Adodc1.Refresh

勤学务实圆融卓越

Else

MsgBox \"请输入你要查询图书的关键字\提示\" End If End Sub

Private Sub Form_Load()

Skin1.LoadSkin App.Path & \"\\green.skn\" Skin1.ApplySkin Me.hWnd End Sub

4.4.5图书管理代码

Private Sub Command1_Click() 添加新书.Show 1 End Sub

Private Sub Command2_Click() 修改图书信息.Show 1 End Sub

Private Sub Command3_Click() 删除图书信息.Show 1 End Sub

Private Sub Command4_Click()

Adodc2.RecordSource = \"select * from 图书表\" Adodc2.Refresh

If Not Combo1.Text = \"\" Then

Adodc2.RecordSource = \"select * from 图书表Combo1.Text & \"'\" Adodc2.Refresh End If End Sub

where 类别='\" & 勤学务实圆融卓越

Private Sub Command5_Click()

Adodc2.RecordSource = \"select * from 图书表\" Adodc2.Refresh

If Not Text1.Text = \"\" Then

Adodc2.RecordSource = \"select * from 图书表 where 书名 like '%\" & Text1.Text & \"%'\" Adodc2.Refresh End If End Sub

Private Sub Form_Load()

Skin1.LoadSkin App.Path & \"\\green.skn\" Skin1.ApplySkin Me.hWnd End Sub

4.4.6 删除图书信息代码 Private Sub Command1_Click()

Adodc1.RecordSource = \"select * from 图书表 where 书名='\" & Text5.Text & \"'\"

Adodc1.Refresh

Adodc1.Recordset.Delete 图书管理.Adodc1.Refresh 图书管理.Adodc2.Refresh

MsgBox \"图书信息删除成功\成功\" Text1.Text = \"\" Text2.Text = \"\" Text3.Text = \"\" Text4.Text = \"\" Text5.Text = \"\" Text6.Text = \"\" Text7.Text = \"\" End Sub

Private Sub Command2_Click()

勤学务实圆融卓越

Unload Me End Sub

Private Sub Command3_Click()

Adodc1.RecordSource = \"select * from 图书表\" Adodc1.Refresh

If Text5.Text = \"\" Then

MsgBox \"请输入要修改图书的书名\提示\" Text5.SetFocus Else

Adodc1.RecordSource = \"select * from 图书表 where 书名='\" & Text5.Text & \"'\"

Adodc1.Refresh

Text1.Text = Adodc1.Recordset.Fields(\"作者\") Text2.Text = Adodc1.Recordset.Fields(\"出版社\") Text3.Text = Adodc1.Recordset.Fields(\"出版时间\") Text4.Text = Adodc1.Recordset.Fields(\"类别\") Text6.Text = Adodc1.Recordset.Fields(\"图书编号\") Text7.Text = Adodc1.Recordset.Fields(\"书名\") End If End Sub

Private Sub Form_Load()

Skin1.LoadSkin App.Path & \"\\green.skn\" Skin1.ApplySkin Me.hWnd End Sub

Private Sub Label1_Click() End Sub

4.4.7 添加用户代码

Private Sub Command1_Click()

Adodc1.RecordSource = \"select * from 用户管理\"

勤学务实圆融卓越

Adodc1.Refresh

Adodc1.Recordset.AddNew

Adodc1.Recordset.Fields(\"姓名\") = Text1.Text Adodc1.Recordset.Fields(\"性别\") = Text2.Text Adodc1.Recordset.Fields(\"所在部门\") = Text3.Text Adodc1.Recordset.Fields(\"备注\") = Text4.Text Adodc1.Recordset.Fields(\"用户名\") = Text5.Text Adodc1.Recordset.Fields(\"密码\") = Text6.Text Adodc1.Recordset.Fields(\"权限\") = Combo1.Text Adodc1.Recordset.Update 系统管理.Adodc1.Refresh

MsgBox \"添加成功\成功提示\" Text1.Text = \"\" Text2.Text = \"\" Text3.Text = \"\" Text4.Text = \"\" Text5.Text = \"\" Text6.Text = \"\" Combo1.Text = \"\" End Sub

Private Sub Command2_Click() Unload Me End Sub

Private Sub Form_Load()

Skin1.LoadSkin App.Path & \"\\green.skn\" Skin1.ApplySkin Me.hWnd End Sub

Private Sub Label8_Click() End Sub

勤学务实圆融卓越

4.5人机界面设计

以下是系统的用户登录界面，选择好用户名后，在输入对应的用户名和密码后，则正确登录。

以下是系统的还书管理界面

勤学务实圆融卓越

以下是添加用户界面

以下是图书管理界面

勤学务实圆融卓越

以下是修改图书信息界面

以下是删除读者信息界面

勤学务实圆融卓越

以下是添加新书界面

勤学务实圆融卓越

第五章系统功能的实现

5.1 系统编程软件的特点

本系统的编程软件采用Visual Basic 6.0(以下简称VB ) 。VB 是Microsoft公司迄今为止最成功的开发工具。它之所以受到人们的青睐。原因是多方面的，但主要有几点：一是功能强大，VB具有工具丰富而且完整、质量高、界面友好等特点，是目前比较流行的数据库系统之一。二是容易掌握，在数据库操作、数据库管理、可视化和面向对象程序设计方面等方面有许多优点。 5.2 系统编程过程

刚接到老师布置下来的数据库课程设计时，一开始我们还不知道做个什么类型的题目，从图书管借了几本书参考，最后我们三个经我班班级成绩表的启发，决定做一个简单的学生成绩管理系统。经过对系统的各种分析，还是无从着手，一起摸索，请教同学，最后才慢慢的开始进入角色。 5.3 系统实施和测试方法

系统实施是在系统的详细设计以后才开始的，它是以系统分析和设计工作为基础的上，将技术的设计转化为可以实际运行的物理系统的阶段。 5.3.1系统实施的方法

本系统在实施阶段采用了快速原形法、结构化程序设计的方法以及在具体编程中采用的面向对象的软件设计三者相结合的系统实施方法。

·快速原型法

首先在明确了用户基本信息需求如报表格式、屏幕菜单设计等，建立了一个应用系统的框架作为应用开发的实验模型（即系统的模型）。然后针对用户运行这个模型后提出的更进一步的需求，尽快建立一个可以运行的、简单的功能模型作为初始原型，这个原型系统只响应用户最基本的需求，并交用户使用。用户在使用原型系统后取得经验和加深对系统的理解，评价系统的优点和不足，进一步确定对系统的需求，并提出对原型系统的变更与提高的具体意见。根据用户对系统的更高的要求，修改和完善原型系统，再交给用户，如此循环，就获得比较完善的系统了。

·结构化程序设计方法

进入程序设计阶段，系统流程图的分析，采用自顶向下的模块化设计。自顶向下模块化设计把一个程序分解为若干个层次模块，接着，对每一个模块逐步细化，力图分解为若干个更为简单的子功能。

·面向对象的方法的采用

由于VB是面向对象的设计方法软件，因此对整个软件形成由抽象到具体，

勤学务实圆融卓越

能够起到很好的描述作用，因此整个软件设计比较直观。 5.3.2 测试方法

对本系统的测试过程采用了对软件进行测试常用的方法，即人工测试和机器测试。人工测试又称代码复审，包括人工复查、走查、会审。机器测试即通过计算机来测试此系统的可行性。由于本系统的规模较小，所以人工测试主要采用的是人工复查，源程序编完后直接由我们自己进行检查。另外，如条件允许还可请经验丰富的同学对系统进行复查，看是否存在漏洞。。

测试数据：

测试除了采用正常的数据，还编造了一些异常和错误的数据，用来检验程序的正确性和容错能力 1.用正常数据进行测试

如输入正确的学号或者输入正确的姓名进行查询某某的各种信息。 2.用异常数据进行测试

如用不规范化的学号进行查询，则系统能自动检查学号是否存在，若不存在，并提示出错对话框“不存在这信息”。或者不输入内容进行查询，系统能自动检查，并提示“不存在这信息”。

系统测试工作的四个步骤 ·单元测试

采用条件覆盖的方法来进行测试，设计测试用例，使每个判断中的每个条件可能值至少满足一次。

·组装测试

对每个模块完成了单元测试以后，需要按照设计时的模块图连接起来，进行组装测试，发现模块之间协调性问题，进行局部修改，再次组装，得到了预期的正确结果。

·确认测试

确认测试是以整个软件作为测试对象，进一步检查软件是否符合软件需求规格说明的全部需求，因此又称为合格性测试或验收测试。按照这样的需要，对本系统的功能、性能和配置等做了进一步的测试，结果为符合要求。

·系统测试

系统测试是将信息系统所有的组成部分包括软件和硬件、用户和环境综合在一起进行测试，以检验系统的各个组成部分运行时的协调配套性。系统测试要在系统的实际运行环境现场，在用户的直接参与下进行。 5.4 系统运行与维护

勤学务实圆融卓越

5.4.1 系统的运行

新系统正式投入运行后，为了保证系统中的各个要素随着环境的变化始终处于最新的、正确的工作状态，必须加强对管理信息系统运行的日常管理。系统运行管理主要由系统运行值班人员来完成，对系统每天运行情况、数据输入和输入情况及系统的安全性与完备性及时地如实记录和处置。 5.4.2 系统的维护

软件维护是软件生命周期的最后一个阶段，它处于系统投入生产性运行以后的日期中，为了纠正错误或满足新的需要而进行修改软件的过程，即是软件维护也是为软件的升级提供详细的资料。

系统维护的目的是保证管理信息系统正常而可靠的运行，并能使系统不断得到改善和提高，以充分发挥作用。系统维护的内容和类型

·系统维护的内容

系统维护的主要内容：应用程序的维护、数据维护、代码维护和硬件设备的维护。

·系统维护的类型

系统维护的主要类型：纠错性维护、适应性维护、完善性维护、预防性维护。本系统维护工作主要是完善性维护和纠错性维护。系统维护的组织管理

系统维护工作并不仅仅是技术性工作，为了保证系统维护工作的质量，需要付出大量的管理工作。信息系统投入运行后，需要人员软件管理工作。由于本系统的功能简单，规模小，只要一般的机房人员进行维护工作就可以了。

勤学务实圆融卓越

第六章学习总结

6.1 系统开发的体会：

通过此次的数据库课程设计，使我们对自己所学专业有了更深一层次的提高，并且有了一些切身的体会。光有计算机理论的知识是不行的，还得有更丰富的实践经验，而这次的课程设计就提供了一次非常好的实践操作的机会，使我对编程开发有了一定的了解。

此次收获最大的有要开发软件，编写代码，开发一个好的系统，要具有一颗细心的心，激情的态度，且持之有恒。

我们用的是VB6.0和SQL Server2000开发这个系统的，这个学期刚刚接触这两种软件，但没有具体编译过。这个成绩管理系统的编成，可以说是我们用VB6.0来开发的第一次，不过这个系统还存在很多问题，可以有很多功能可以扩充。限于我们的编程技术水平，有很多更深层的技术未用上，但可以这样说，这次课程设计只是一个开始，只有以后通过不断的努力、不断的研究和学习、不断的实践，才能掌握更多的软件设计的技术和方法，才能设计出更好更完善的软件作品。

整个开发过程中我们深深体会到，团队之间要多做交流，要团结合作，要严格按照软件工程的开发思路，不能急于求成，一来就马上编程，应该多做分析和研究，理清思路。前一阶段的工作的好坏将直接影响后一阶段工作的开展。多学习多请教，更多新的技术不断的涌现，可以通过请教别人或者多上网学习别人的编程方法、参考编程案例，可以转变成你的知识，才能做的更好。这些经验是相当宝贵的，为我们以后能够编出更好的程序是一个良好的启发。

限于我们的技术水平有限这次的课程设计论文和编程软件的错误和不当之处在所难免，还得请老师多多指教！在这次的课程设计中虽然时间紧迫但我们学会了很多，也感到自身知识的贫乏，希望在日后的努力学习中把它做成更完善的系统，并能做其他完善的系统。 6.2 系统在调试中经常出现的问题

1、数据库的连接容易出错；

2、各种数据写入数据库时容易出错，主键唯一性； 3、在调度中经常出现数词不匹配。 6.3 解决问题的方法:

1、多找有关方面的书籍资料，进行自学；另外、还请教其他知道的同学和网上搜索相关资料。

2、反复更改代码，不断调试，测试种种可能性。

勤学务实圆融卓越

参考文献

【1】数据库原理，陈利平主编，中国铁道出版社，2007.1

【2】Visual Basic +SQL Server 数据库应用系统开发与实例，李晓黎张巍

等，人民邮电出版社，2003.3

【3】Visual Basic 程序设计教程（第三版）,刘炳文，清华大学出版社，2006.3 【4】数据库与控件程序设计实例丛书，段兴主编，人民邮电出版社【5】数据库混合编程丛书李晓黎主编，人民邮电出版社

【6】Visual Basic 数据库开发自学教程，孙越主编，人民邮电出版社

因篇幅问题不能全部显示，请点此查看更多更全内容

查看全文