数据库课程设计Access版.docx
《数据库课程设计Access版.docx》由会员分享，可在线阅读，更多相关《数据库课程设计Access版.docx（19页珍藏版）》请在冰豆网上搜索。
数据库课程设计Access版
目录
第1章课程设计目的与要求1
1.1课程设计目的1
1.2课程设计的实验环境1
1.3课程设计的预备知识1
1.4课程设计要求1
第2章课程设计内容2
2.1系统设计2
2.2数据库模型3
2.3设计窗体和报表9
2.4窗体和报表模块主要代码11
第3章课程设计总结14
参考文献15
第1章课程设计目的与要求
本课程的课程设计实际是电子商务和计算机信息管理专业学生学习完《数据库原理及应用（ACCESS2003）》课程后，进行的一次全面的综合训练，其目的在于加深对数据库基础理论和基本知识的理解，掌握运用数据库应用系统开发软件的基本方法。
1.2课程设计的实验环境
硬件要求能运行WindowsXP操作系统的微机系统。
数据库应用系统开发软件可以选用MicrosoftAccess，或其他数据库管理系统。
1.3课程设计的预备知识
熟悉数据库的基本知识及一种以上数据库系统开发软件。
1.4课程设计要求
按课程设计指导书提供的课题，应根据下一节给出的基本需求独立完成八个方面的设计，标有“可选”的部分可根据设计时间的安排及工作量的大小适当选择。
选用其他课题或不同的数据库管理系统，可以组成设计小组，分模块进行,共同协作完成一个应用系统的开发任务。
要求书写详细的设计说明书，对复杂的代码段和程序段，应画出程序流程图。
在界面设计中，画出每个窗口的布局，有多个窗口时，按模块调用的方式画出窗口调用图，用手工画好报表和标签样式，严禁相互抄袭。
课程设计内容
2.1系统功能分析
2.1.1系统功能分析
酒店管理系统需要对入住的人员和客房情况进行详细的管理，其中主要针对客房情况和人员入住情况进行管理。
因此本系统分为如下两大个方面：
1.基本情况资料，而基本情况资料有分为1.职员资料2.客房类型3.客房资料4.会员管理5.消费结帐管理
此外,系统管理员还可以通过报表对系统的明细一目了然。
2.1.2系统功能模块设计
酒店管理系统包括职员资料管理，客房类型管理，客房资料管理，会员资料管理，帐目管理分为入住管理，预定管理，消费明细管理，消费结帐管理，而在查询界面，可以查到详细的各种管理系统，详细情况如图2.1所示：
图2.1
2.2数据库模型
2.2.1数据库需求分析
职员信息：
职员ID,姓名,职位,性别,籍贯,年龄,民族,健康状况,婚姻状况,省份证号,家庭住址,家庭电话,备注等.
客房类型:
类型ID,类型名称,客房价格,拼房价格,可超额定数.
客房资料:
客房ID,员工ID,类型名称,是否入住,是否预定，额定人数,房间单价,客房状态等.
2.2.2数据库概念结构设计
职员信息实体E-R图：
图2.2职员查询E-R图
客房资料E-R图：
图2.3客房类型E-R图
酒店管理系统总体E-R图如图2.4所示：
图2.4酒店管理系统总E-R图
2.2.3数据库逻辑结构设计
通过模块图分析可以知道,此系统由6个图表组成,具体图表如下：
职员资料表中包括职员ID,姓名,职位,性别,籍贯,年龄,民族,健康状况,婚姻状况,省份证号,家庭住址,家庭电话,备注等等详细情况如表2.2所示
字段名称
数据类型
职员ID
文本
姓名
文本
职位
文本
性别
文本
籍贯
文本
年龄
数字
民族
文本
健康状况
文本
婚姻状况
文本
身份证号
数字
家庭住址
文本
家庭电话
数字
备注
文本
表2.2
2.2.4数据库连接说明
酒店管理系统是一个要求连贯性很强的系统，所以根据上面的对数据库系统的概念模型的设计，我们能根据表里的主键，连接出各个表中的关系和分类，这样才给我们做下面的系统，每个主键，还有每个外主键，都是数据库的关键，必须做个关系明确，这样系统才能明了清晰，数据库关系图如下：
图2.5表之间的关系
2.3设计窗体和报表
通过以上模块和E-R图可知这个窗体是由基本资料、消费结帐、记录查询、用户管理、退出系统5部分组成，而基本资料又包括职员资料管理,客房资料管理,客房类型管理,会员资料管理,而消费结帐又包括预定记录管理,入住记录管理,消费明细管理,消费结帐管理,所以登陆窗体如图所示:
图2.6登录窗口
系统主体窗体是系统中唯一一个联系所有窗体的窗体，由基本资料，消费结帐，记录查询，用户管理，退出系统，所组成。
系统有很高的稳定性，能够稳定的完成酒店的所有日常管理，和酒店的新老职工进行合理的安排，对职员的信息一目了然，主窗体是用现在对规范的设计视图设计完成的，能够满足酒店的各种数据需要，如图2.7所示
图2.7系统主体界面
职员信息查询窗体可通过职员ID对职员进行详细信息的查询，通过创建一个按编号查找的查询，再以其作为数据来源创建一个职员信息查询窗体。
如图2.8所示
图2.8员工资料查询
会员作为收入的主要来源，需要分为不同等级，并记录在案。
如图2.9所示：
图2.9会员资料窗体
客房管理中包括对各个客房的描述，可以入住的客房和预订的记录，管理者。
这些可以让管理者清楚地帮助顾客订客房，顾客也可一览客房的各种资料。
如图3.0所示
图3.0客房管理窗体
入住记录可以查询入住的顾客以及利用此联系可入住的客房，并记录是否有会员并根据其消费提升会员标准。
如图3.1所示
图3.1入住记录管理窗体
消费结账窗体可以很清晰的显示出，客人在酒店里的结账情况和入住费用情况，如图3.2所示
图3.4消费结账窗体
2.4设计窗体和报表模块主要代码
本登陆窗口是系统的窗口，代码必须完善和使用，代码如下：
OptionCompareDatabase
PrivateSubcancel_Click（）
OnErrorGoToErr_login_cancel_Click
DoCmd.Close
Exit_login_cancel_Click:
ExitSub
Err_login_cancel_Click:
MsgBoxErr.Description
ResumeExit_login_cancel_Click
EndSub
PrivateSublogin_Click（）
DimuserIDAsInteger
IfIsNull（user）=FalseThen
IfDLookup（"[密码]","登陆","[账户]="""&user&""""）=idThen
DoCmd.Close
MsgBox（"欢迎使用酒店管理系统！
"）
DoCmd.OpenForm"面板"
'Form_主界面.user=userID
Else
user=""
id.SetFocus
MsgBox"帐户密码错误！
",vbCritical
EndIf
EndIf
EndSub
查询职员资料代码如下：
OptionCompareDatabase
PrivateSubCommand6_Click（）
OnErrorGoToErr_Command6_Click
DimstDocNameAsString
DimstLinkCriteriaAsString
stDocName=ChrW（-26782）&ChrW（26495）
DoCmd.OpenFormstDocName,,,stLinkCriteria
Exit_Command6_Click:
ExitSub
Err_Command6_Click:
MsgBoxErr.Description
ResumeExit_Command6_Click
EndSub
PrivateSubCommand7_Click（）
OnErrorGoToErr_Command7_Click
DoCmd.Close
Exit_Command7_Click:
ExitSub
Err_Command7_Click:
MsgBoxErr.Description
ResumeExit_Command7_Click
EndSub
查询会员资料如下：
OptionCompareDatabase
PrivateSubCommand7_Click（）
OnErrorGoToErr_Command7_Click
DoCmd.Close
Exit_Command7_Click:
ExitSub
Err_Command7_Click:
MsgBoxErr.Description
ResumeExit_Command7_Click
EndSub
查询客房资料如下：
OptionCompareDatabase
PrivateSubCommand3_Click（）
OnErrorGoToErr_Command3_Click
DimstDocNameAsString
DimstLinkCriteriaAsString
stDocName=ChrW（25353）&ChrW（23458）&ChrW（25151）&ChrW（26597）&ChrW（-29726）&ChrW（20837）&ChrW（20303）&ChrW（20449）&ChrW（24687）
DoCmd.OpenFormstDocName,,,stLinkCriteria
Exit_Command3_Click:
ExitSub
Err_Command3_Click:
MsgBoxErr.Description
ResumeExit_Command3_Click
EndSub
PrivateSubCommand4_Click（）
OnErrorGoToErr_Command4_Click
DimstDocNameAsString
DimstLinkCriteriaAsString
stDocName=ChrW（25353）&ChrW（20837）&ChrW（20303）&ChrW（73）&ChrW（68）&ChrW（26597）&ChrW（-29726）
DoCmd.OpenFormstDocName,,,stLinkCriteria
Exit_Command4_Click:
ExitSub
Err_Command4_Click:
MsgBoxErr.Description
ResumeExit_Command4_Click
EndSub
PrivateSubCommand7_Click（）
OnErrorGoToErr_Command7_Click
DimstDocNameAsString
DimstLinkCriteriaAsString
stDocName=ChrW（-26492）&ChrW（23450）&ChrW（32426）&ChrW（24405）
DoCmd.OpenFormstDocName,,,stLinkCriteria
Exit_Command7_Click:
ExitSub
Err_Command7_Click:
MsgBoxErr.Description
ResumeExit_Command7_Click
EndSub
PrivateSubCommand9_Click（）
OnErrorGoToErr_Command9_Click
DoCmd.Close
Exit_Command9_Click:
ExitSub
Err_Command9_Click:
MsgBoxErr.Description
ResumeExit_Command9_Click
EndSub
查询入住记录如下：
PrivateSubCommand23_Click（）
OnErrorGoToErr_Command23_Click
DimstDocNameAsString
DimstLinkCriteriaAsString
stDocName=ChrW（-26782）&ChrW（26495）
DoCmd.OpenFormstDocName,,,stLinkCriteria
Exit_Command23_Click:
ExitSub
Err_Command23_Click:
MsgBoxErr.Description
ResumeExit_Command23_Click
EndSub
PrivateSubCommand24_Click（）
OnErrorGoToErr_Command24_Click
DoCmd.Close
Exit_Command24_Click:
ExitSub
Err_Command24_Click:
MsgBoxErr.Description
ResumeExit_Command24_Click
EndSub
结账记录如下：
OptionCompareDatabase
PrivateSubCommand4_Click（）
OnErrorGoToErr_Command4_Click
DimstDocNameAsString
DimstLinkCriteriaAsString
stDocName=ChrW（28040）&ChrW（-29383）&ChrW（32467）&ChrW（-29402）
DoCmd.OpenFormstDocName,,,stLinkCriteria
Exit_Command4_Click:
ExitSub
Err_Command4_Click:
MsgBoxErr.Description
ResumeExit_Command4_Click
EndSub
PrivateSubCommand6_Click（）
OnErrorGoToErr_Command6_Click
DimstDocNameAsString
DimstLinkCriteriaAsString
stDocName=ChrW（28040）&ChrW（-29383）&ChrW（32467）&ChrW（-29402）&ChrW（26597）&ChrW（-29726）
DoCmd.OpenFormstDocName,,,stLinkCriteria
Exit_Command6_Click:
ExitSub
Err_Command6_Click:
MsgBoxErr.Description
ResumeExit_Command6_Click
EndSub
PrivateSubCommand7_Click（）
OnErrorGoToErr_Command7_Click
DimstDocNameAsString
DimstLinkCriteriaAsString
stDocName=ChrW（28040）&ChrW（-29383）&ChrW（32467）&ChrW（-29402）&ChrW（26597）&ChrW（-29726）
DoCmd.OpenFormstDocName,,,stLinkCriteria
Exit_Command7_Click:
ExitSub
Err_Command7_Click:
MsgBoxErr.Description
ResumeExit_Command7_Click
EndSub
PrivateSubCommand8_Click（）
OnErrorGoToErr_Command8_Click
DimstDocNameAsString
DimstLinkCriteriaAsString
stDocName=ChrW（-26782）&ChrW（26495）
DoCmd.OpenFormstDocName,,,stLinkCriteria
Exit_Command8_Click:
ExitSub
Err_Command8_Click:
MsgBoxErr.Description
ResumeExit_Command8_Click
EndSub
PrivateSubCommand9_Click（）
OnErrorGoToErr_Command9_Click
DoCmd.Close
Exit_Command9_Click:
ExitSub
Err_Command9_Click:
MsgBoxErr.Description
ResumeExit_Command9_Click
EndSub
第3章课程设计总结
数据库课程设计和实验都结束了，在这段时间我学到了很多知识。
通过这次的课程设计，使我增加了对数据库基本概念的理解，提高对知识的理解和应用能力，并且对数据库的应用都有了更深的了解，使我的数据库编写水平又有了明显的提高。
在WINDOWS的环境中，用ACCESS和VISUALBASIC代码构建一个库存管理系统。
让我了解到了在实际的环境下编写数据库的应用。
我做的课设题目是酒店管理系统，在做课设的过程当中，我充分运用我们所学的知识，当然其中肯定有不懂或者懵懂的问题，所有就去图书馆查看相关的资料，上课时也咨询了老师同学，最后问题也都迎刃而解了。
开始的登陆窗口,我们遇到了不会写代码的问题,这个登陆窗口是一个有用户名,有密码的界面,当你选择一个用户名,它有相应的口令,口令正确才可以进入.这是一个要有变量来实现的过程,当然也要对应的数据窗口.其实,这个问题不会写代码没有关系的,我们可以从数据窗口中的变量设置中找到SQL语句,这样就解决了问题。
我们的登陆窗口粗略的完成了.
在建立职工资料数据源时,我们发现了一个这样的问题,就是性别一栏可以填写除男,女以外的字,我们需要一个约束,可是在约束语句里,我们有语法错误,弄了半天还是没有弄懂,后来问别人知道了那是由于没有弄清楚一些符号是应该在英语还是中文条件下写出,PB的符号都是在英语的条件下实现的.我们一般设主键的时候都是设一个，这个主键在数据源中是不能重复的。
由于自己的分析设计和程序经验不足,该系统设计和实现过程中,还有许多没有完善的地方,比如数据冗余,文档组织不合理,帮助文档没有编写,用户界面设计不够美观,异常出错处理比较差等多方面问题,这些都有待进一步完善和提高。
总的来说，数据库的实验是我们上大学以来遇到的最大的课题，它不像以前的课题很容易就完成，它需要设计人有足够的耐心，超强的学习能力和坐的住的心态。
所以，这次实验中，我的许多毛病都有了改善。
这些都不是主要的，重要的是我们在这次实验中，以及平时上课的时候，从老师那里学到了很多做人做事的道理，这些金玉良言将对我们终身受用。
。
参考文献
[1]甘雷,《中文Access2002标准教程》，北京希望电子出版社,2008
[2]王珊，《数据库系统简明教程》，北京高等教育出版社，2004
[3]苏帅华，《中文版Access2002宝典》，北京人民邮电出版社，2004
[4]李春葆，曾平，《Access数据库程序设计》，北京清华大学出版社，2005
[5]罗小沛，《数据库技术》，武汉华中理工大学出版社，2000
[6]丁堡康，《数据库实用教程》，北京清华短信额出版社，2001
[7]梁书赋，《精通中文版Access2002数据开发与应用》，北京清华大学出版社，2001
[8]李禹生，《Access2002应用技术》，北京中国水利点出版社，2002
[9]张冕洲，《Access2002开发使用全书》，北京电子工业出版社，2002
[10]故名，《数据库原理与应用Access2002》，北京高等教育出版社，2004
塔里木大学课程设计评审表
学号：
姓名：
平时成绩
设计成绩
答辩成绩
综合成绩
等级
指导教师评语：
答辩小组评语：
组长签字：
年月日
答辩小组成员签字：
塔里木大学教学实习日志
学院
信息工程学院
姓名
课程名称
数据库原理课程设计
专业
计算机科学与技术
班级
指导教师
实习时间
2014/6/2—
2014/6/15
实习地点
日期
内容
备注
6月6日
案例讨论、讲解与分析；
6月7日
根据所选题目进行规划设计和需求分析
6月8日
：
用POWERDESIGNER辅助设计工具设计概念数据模型和物理数据模型
6月9日
数据库的物理设计和在ACCESS中建表
6月10日
在ACCESS中设计查询，窗体，报表
6月11日
功能模块代码的编写
6月12日
系统测试与试运行
6月13日
设计书明书撰写
6月14日
设计书明书撰写
6月15日
程序验收
升级会员 