酒店管理系统计算机毕业论文

1、酒店管理系统目 录摘要IIIABSTRACTIV绪论11 酒店管理系统的开发与设计21.1 系统开发的背景21.2 系统的特点22. 系统开发涉与的主要技术32.1 数据库技术32.2 VB 6.0中文版概述33. 系统功能设计43.1 需求分析43.2实现目标53.3 系统结构与流程图54数据库设计94.1数据库设计概述94.2数据库设计周期94.3数据库的详细设计105 系统环境与软件安装125.1 硬件环境要求125.2 软件环境要求125.3 软件安装126 酒店管理系统的详细设计136.1 主界面设计136.2 系统登录模块设计146.3 住宿管理设计156.4追加押金模块设计176

2、5 调房登记模块设计1866 退宿结账模块设计1967 酒店管理设计226.8 查询统计设计256.9 报表管理266.10 系统设置设计27参考文献30致31摘 要当今社会，酒店种类和客流的不断增加，对于管理造成了困难。采用计算机来管理酒店的信息，提高了查询的速度，节约了人力和物力资源，达到了预期的要求。本文根据酒店服务管理的现状与未来的发展方向,结合有关酒店管理当中的管理学实践,设计了酒店管理系统。本系统的建立以计算机技术和信息技术为依托,规了管理系统中各要素的关系,使之规化、标准化、程序化、科学化,形成各要素之间相互制约、层层把关,逻辑严密的体系,从而克服原来手工系统的效率低、工作繁重的

3、缺点。本系统是用于酒店服务管理的系统软件。系统数据的管理采用了操作系统的最新管理方式，用户操作将会更简单、更直观、更方便。系统中各业务管理模块可以单机独立运行。使用本系统，可以大幅度提高酒店服务管理的工作效率。该系统应充分利用信息技术提高酒店的管理水平、服务水平。酒店客房管理系统要实现客房预定、住宿登记、调房登记、退房结账、挂账、查询统计、预收销售报表等等功能。将动态实时的住宿登记、客房调整、销售报表、追加押金等有机地联系在一起，对酒店客房进行全方位的管理。关键词： 酒店管理系统；数据库；Visual BasicAbstractAt present, the hotels category f

4、lows with increasing of the guests continuously, resulted in the difficulty to the management. Using the computer to manage the hotel and the resident information, enhanced the inquiry speed, saved the workforce and the resources and has met the anticipated requirements.In this article, we designs t

5、he hotel management system which accords to the present situation of the hotel service management and the way it develops in the future and hotel management study practice. The establishment of the system bases on the computer technology and the information technology. And it regulates the relations

6、hips of the various essential factors, making it logic, essential, scientic , and forms mutually restrict mutually, layer upon layer system between the factors. It reduces problem such as low efficiency former system has.This system is a software which is used for hotel service management. The manag

7、ement of the system data uses the operating system newest management method, so the user operation will be simpler. The various business management modules in this system may runs independently. These advantages can increase the biggest efficiency of the guest house management, is also a guest house

8、 to serve scientific and regular to turn the term of the management.This system may make full use of information technology to increase the management level, service level of the hotel. The system will realize the function such as he guest room to prearrange, the lodgings registration, the lodging a

9、llowance reminder, supplements the deposit, the accent room registration, returns a house ties the account, hangs account, inquiry statistics, advance receipt sale report form. The dynamic real-time lodgings registration, the guest room adjustment, the sales report form, will supplement the deposit

10、and so on organically to relate in together, will carry on the management well to the hotels room.Keywords the system of hotels management; database; Visual Basic33 / 34绪 论随着科学技术的不断提高,计算机科学日渐成熟,其强大的功能已为人们深刻认识,它已进入人类社会的各个领域并发挥着越来越重要的作用。用计算机来管理各种数据信息，是世界发展的需求，也是社会发展的趋势。在酒店服务管理中，也存在着这种问题，为了提高办事效率，需要开发一

11、套操作简单方便的管理系统。以往的酒店管理方法，查询速度慢，管理困难，容易丢失数据,占用了大量的人员和物资，已经不适合现在的要求。为克服酒店管理的困难和查询的不便。采用计算机来管理酒店的信息，大大提高了查询的速度，节约了人力和物力资源，达到了预期的要求。这样既不方便又容易发生错误，用计算机来管理可以非常容易的实现这些要求。作为计算机应用的一部分,使用计算机对酒店信息进行管理,具有手工管理所无法比拟的优点.例如:检索迅速、查找方便、可靠性高、存储量大、性好、寿命长、成本低等。这些优点能够极提高酒店服务管理的效率,也是酒店的科学化、正规化管理的条件。该系统应充分利用信息技术提高酒店的管理水平、服务水

12、平。酒店管理系统能够实现客房预定、住宿登记、追加押金、调房登记、退房结账、入住报表，客房状态报表等功能。1 酒店管理系统的开发与设计1.1 系统开发的背景在80年代初发展起来的国的酒店管理系统，充分吸收了国外管理系统的精华，再结合国的实际情况，逐步发展成熟，到90年代初期已形成了几个较成熟的软件系统，同时产生了几家专职从事宾馆业计算机管理系统的公司。到了90年代中后期，随着计算机在酒店中的普与应用，计算机技术的不断发展，酒店管理系统的发展到了一个新的时期，新的系统平台、新的系统特点与发展方向不断涌现，主要体现在系统基本转到客户机/服务器模式下的Windows版，功能更加细致完善，系统更加稳定可

13、靠。目前一些酒店对酒店管理系统的应用仍停留于记帐式，远未上升到对其管理模式的改变。酒店业涉与的信息系统和产品众多，却缺乏统一的行业标准使各个供应商相互协调，一方面造成资源浪费与互不兼容，另一方面也阻碍了整体水平的提高，无法完全符合酒店的需要。在某种程度上，酒店运用电脑以后，人工成本未必降低，甚至有可能增加。运用电脑以后，仅是管理的量化程度提高、数据的流转速度加快。然而酒店迫在眉睫的矛盾是，在行业不景气的情况下，总在权衡投入成本与产出效益的比重。在中国酒店行业尚处于比较困难的现阶段，开源节流尤为重要，直接对市场的技术要求日益凸显，而目前酒店直接面对市场的销售手段还停留在拜访、打、发 等传统形式，

14、现有的软件不能直接帮助开源节流，这是目前技术与需求的差距。随着我国经济的迅速发展，人们的生活水平有了显著提高，假日经济和旅游经济已成为人们消费的热点。各地也把旅游业当作本地经济发展的重要支柱之一，从而促进了酒店业的快速发展。对酒店的经营状况起决定作用的是酒店的服务管理水平。利用先进的管理手段，提高酒店的管理水平，已成为酒店业发展的当务之急。面对信息时代的机遇和挑战，利用科技手段提高企业管理无疑是一条行之有效的途径。虽然计算机管理并不是酒店管理走向成功的关键元素，但它可以最大限度地发挥准确、快捷、高效等作用，对酒店的服务管理提供强有力的支持。因此，采用全新的计算机网络和酒店管理系统，已成为提高酒

15、店的管理效率、改善服务水准的手段之一。在某种意义上，酒店管理方面的信息化已成为现代化酒店的重要标志。1.2 系统的特点1. 操作简单由于本系统所完成的操作主要是添加、修改、查询、删除和统计等基本操作，故无须进行深入细致的培训操作员就能完成日常的管理任务。2. 友好界面本系统采用统一的界面，界面简单、美观，支持鼠标和键盘操作，交互性强。3. 安全性强系统对管理员的权限进行了相应的设置，某些操作管理员无法完成。同时，在每个模块都对管理员进行登陆判断，有效防止了管理员与其他用户的非法登陆。2. 系统开发涉与的主要技术2.1 数据库技术Access提供了真正的关系数据库管理。Access具有主关键字和

16、外部关键字定义，并且在数据库的引擎级提供了完全的引用完整性，可以避免不合理的更新和删除。Access 就是关系数据库开发工具，数据库能汇集各种信息以供查询、存储和检索。Access 的优点在于它能使用数据表示图或自定义窗体收集信息。数据表示图提供了一种类似于 Excel 的电子表格，可以使数据库一目了然。另外，Access 允许创建自定义报表用于打印或输出数据库中的信息。Access也提供了数据存储库，可以使用桌面数据库文件把数据库文件置于网络文件服务器，与其他网络用户共享数据库。Access 是一种关系数据库工具，关系数据库是已开发的最通用的数据库之一。如上所述，Access 作为关系数据库

17、开发具备了许多优点，可以在一个数据包中同时拥有桌面数据库的便利和关系数据库的强大功能。2.2 VB 6.0中文版概述在WINDOWS平台上所使用的程序是具有图形界面的,使用图形界面，使用户感到形象、生动，具有吸引力，一扫以往应用程序界面枯燥单调的感觉。在WINDOWS环境下设计具有图形界面的应用程序，如果用传统的高级语言进行，工作量将十分巨大，其中绝大部分的工作量花在界面设计上（用程序语句在屏幕上画出所需的界面），Visual Basic和其它可视化工具的出现，使应用程序的设计进入了一个新的阶段。Visual Basic是MICROSOFT公司推出的程序设计语言，具有功能强大、软件费用支出低、

18、见效快等特点。它提供了开发WINDOWS应用程序最迅速、最简捷的方法。Visual Basic增加了结构化和可视化程序设计语言的特点。3. 系统功能设计3.1 需求分析本系统假设某酒店设有豪华套间、标准间、普间、双人间，房间共65间，床位共120。有闭路电视、程控、国国际直拨、电梯、中央空调、现代消防设施、大小餐厅2个、停车场、大小会议室2个，同时能接待120人住宿、50人以的中小型会议，提供代购火车、汽车、飞机票等各种旅游观光服务。随着信息技术的发展和人们对酒店的要求越来越高，该酒店已明显觉得手工管理已不能适应当前酒店高速发展的需要，已意识到使用计算机网络和计算机管理的重要性。该系统应充分利

19、用信息技术提高酒店的管理水平、服务水平。酒店管理系统要实现客房预定、住宿登记、宿费提醒、追加押金、调房登记、退房结账、挂账、查询统计、预收销售报表等等功能。其中宿费提醒可以在住宿费超过押金时预警，提示前台要客人补交押金，该功能可明显提高对住宿人员宿费的有效管理。将动态实时的住宿登记、客房调整、销售报表、追加押金等有机地联系在一起，对酒店进行全方位的管理。根据该酒店的具体情况，系统主要功能包括：用户登录模块，主要用于用户的登录。用户权限分为管理员和普通用户。当用户输入用户名和密码后经过确认，才能进入酒店客房管理信息系统，并拥有相应的权限。如果不是用户，拒绝进入。房客管理模块，该模块是本系统的核心

20、所在。主要用于用户对房客与其业务的情况进行管理，其中包括：预定管理模块，主要包括预定信息的登记，查看，删除等基本操作。接待管理模块，主要用于客户入住信息的登记，查看，修改，删除等基本操作。结帐管理模块，主要用于用户退房操作。换房管理模块，主要用于入住用户的换房操作。押金管理模块，主要用于对入住客户押金的补交，查看等基本操作。3客房管理模块，该模块主要用于对客房的编辑操作和查看状态操作。客房的编辑操作主要有客房的添加，修改，删除等基本操作。4消费管理模块，该模块主要用于对客人在入住期间的消费进行入帐操作，包括消费入帐，话费入帐，餐费入帐等操作。5审查管理模块，主要用于该酒店管理者对酒店的基本数据

21、信息进行查看，以便制定策略。包括客房状态报表查看，客人入住信息报表查看，历史客人报表查看等等。3.2实现目标面对酒店行业的高速发展和酒店行业信息化发展的过程中出现的各种情况，酒店管理系统在实施后，应能够达到以下目标：1. 实现多点操作的信息共享，相互之间的信息传递准确、快捷和顺畅。2. 服务管理信息化，可随时掌握客人住宿、客房状态等情况。3. 系统界面友好美观，操作简单易行，查询灵活方便，数据存储安全。4. 客户档案、挂账信息、预警系统的结合，可对往来客户进行住宿监控，防止坏账的发生。5. 通过酒店管理系统的实施，可逐步提高酒店的管理水平，提升员工的素质。6. 系统维护方便可靠、有较高的安全性

22、，满足实用性、先进性的要求。3.3 系统结构与流程图3.3.1 系统结构图根据该酒店的业务情况与实现目标，系统结构图如图3-1所示。图3-1 酒店客房管理系统结构图系统功能划分的结构图结算信息实体住宿金额金额XX住宿日期结款方式图3-2 结算信息实体E图客房信息实体价格房间号房间类型房间配置图3-3 客房信息实体ER图客房住宿信息实体XX证件号码详细地址住宿事由房间号房间类型客房价格住宿日期客房类型联系 图3-4 客房住宿信息实体ER图房间标准信息房价登记房间信息管理房间住宿订房信息管理结算信息管理房间结算图3-5 实体之间关系ER图3.3.2 业务流程图图3-6 业务流程图4 数据库设计4.

23、1数据库设计概述计算机信息系统以数据库为核心，在数据库管理系统的支持下，进行信息的收集、整理、存储、检索、更新、加工、统计和传播等操作。对于数据库应用开发人员来说，为使现实世界的信息流计算机话，并对计算机话的信息进行各种操作，就是如何利用数据库管理系统、系统软件和相关硬件系统，将用户的要求转化成有效的数据结构，并使数据库结构易于实现用户新的要求的过程。确切的说，数据库设计是指对于一个给定的应用环境，提供一个确定最优数据模型与处理模式的逻辑设计，以与一个确定数据库存储结构与存取方法的物理设计，建立起既能反映现实世界信息和信息联系，满足用户数据要求和加工要求，有能被某个数据库管理系统所接受，同时能

24、实现系统目标，并有效存取数据的数据库。4.2数据库设计周期根据软件工程的思想，数据库设计的周期可以划分为六个阶段：（1） 规划阶段确定开发的总目标，给出计划开发的软件系统的功能、性能、可靠性以与接等方面的设想。 （2） 需求分析阶段认真细致地了解用户对数据的加工要求，确定系统的功能与边界。本阶段的最终结果，提供一个可作为设计基础的系统说明书，包括对软硬件环境的要求和一整套完善的数据流程图。（3） 设计阶段把需求分析阶段所确定的功能细化，主要工作是概念设计阶段、逻辑设计阶段、物理设计阶段，然后，对每个阶段部设计详细的流程。 （4） 程序编制阶段以一种或几种特定的程序设计语言表达上一阶段确定的各模

25、块控制流程。程序编制时应遵循结构化程序设计方法。（5） 调试阶段对已编好的程序进行单元调试（分调），整体调试（联调）和系统测试（验收）。（6） 运行和维护阶段这是整个设计周期最长的阶段，其工作重点是收集和记录系统实际运行的数据。在运行中，必须保持数据库的完整性，必须有效的处理数据故障和进行数据库恢复。同时解决开发过程的遗留问题，改正错误进行功能完善。4.3数据库的详细设计本酒店客房管理系统采用了Access数据库，数据库名称为kfgl数据库包含以下4个表：登记表d,客房基础信息表kf,客房预定表yd,权限设置表qxsz。下面分别介绍以上各表的结构。1登记表d登记表d用来保存客人住宿时的住宿登记

26、信息。字段名称数据类型字段大小房号文本20客人文本50标准价文本20折后价文本20押金文本20类别文本50证件名称文本10证件文本20证件地址文本8从何处来文本8到何处去文本8住宿原因文本8操作员文本8入住日期日期/时间8入住时间日期/时间8店消费文本8餐费文本50话费文本8表4-2 登记表2客房基础信息表kf客房基础信息表kf用来保存客房的基础信息。字段名称数据类型字段大小房间号文本30房间类型文本50价格货币8房态文本4容纳人数文本100楼层文本100表4-4 客房基础信息表3客房预定表kfyd客房预定表kfyd用来保存客人预定客房的登记信息。字段名称数据类型字段大小房号文本50文本20类

27、别文本30标准价文本100文本50押金文本10联系文本10操作员文本8摘要文本10表4-5 客房预定表4权限设置表qxsz权限设置表qxsz用来保存操作员的权限。字段名称数据类型字段大小编号文本50操作员文本50密码数字双精度角色名称是/否15 系统环境与软件安装5.1 硬件环境要求为运行本例，计算机的硬件应满足如下条件：486DX/66MHz或更高的处理器（推荐Pentium或更高的处理器），或任何运行于MicrosoftWindowsNTWorkstation的Alpha处理器。MicrosoftWindows支持的VGA或分辨率更高的监视器。16MB存以上。鼠标或其他定点设备。5.2 软

28、件环境要求本系统是在MicrosoftWindowsXP下开发的，所采用的开发工具是Microsoft公司的VisualBasic6.0企业版。推荐桌面显示方式为1024X768像素。5.3 软件安装1.建议用户在系统上安装Microsoft公司的VisualBasic6.0企业版。2.打开光盘中的“酒店管理系统”文件夹，将其中的“酒店管理系统”文件夹复制到机器，并去掉所有文件的只读属性。3.运行程序。打开VisualBasic6.0,运行“酒店管理系统”下的“酒店管理系统.VBP"工程，或执行“酒店管理系统.EXE”文件。6 酒店管理系统的详细设计6.1 主界面设计 主程序界面如图

29、6-1所示图6-1主程序界面6.1.1 实现目标程序启动后，在系统登录界面验证完操作员与操作员密码后，将进入主程序界面。主程序界面主要实现如下功能：1.选择菜单或工具栏，调用相应程序，进行相应操作。2.根据操作员不同，确定操作员的相应权限。3.显示系统时间、公司网址和操作员。6.1.2 实现过程1.新建一个标准工程，命名为“客房管理系统”，在该工程中会自动创建一个新窗体，将该窗体命名为main.2.单击“工程”菜单下的“部件”选项，在弹出的列表中，选定"MicrosoftWindows CommonControl6.0"选项，然后单击“确定”按钮，StatusBar控件将被

30、添加到工具箱中。3.在窗体中添加1个StatusBar控件，用鼠标右键单击StatusBar控件，在弹出菜单中选择“属性”。在属性页中，单击“窗格”选项卡，设置4个窗格。设置索引为1的窗格的样式为6-sbrDate；设置索引为2的窗格的样式为5-sbrTime；设置索引为3的窗格的样式为0-sbrtext,并输入文本“.mingrisoft.”；设置索引为4的窗格的样式为0-sbrtexto4)单击“工具”菜单下的“菜单编辑器”，在菜单编辑器中设置程序的菜单。6.2 系统登录模块设计6.2.1 实现目标程序启动后，首先进入系统登录界面验证操作员与密码。在系统登录模块中主要实现如下功能：可选择操

31、作员，支持鼠标和键盘操作。操作员和密码验证成功后，进入主界面。操作员错误或密码错误提醒并返回错误点。输入三次错误的密码，自动退出系统。系统登录界面如图6-2所示图6-2 登录界面6.2.2 实现过程1.在“客房管理系统”工程中，添加一个新窗体，命名为maInnllma。2.单击“工程”菜单下的“部件”选项，在弹出的列表中，选定“MicrosoftDat BoundListControl60”选项，然后单击“确定”按钮，DBCombo控件将被添加到工具箱中。3.在窗体中添加2个Data控件、1个DBC0mbo控件、2个Label控件、1个Text控件、2个Conunand控件。6.3 住宿管理设

32、计6.3.1 住宿登记模块设计实现目标程序启动后，选择“住宿管理”菜单下的“住宿登记”项，将进入住宿登记模块。在住宿登记模块中主要实现如下功能：自动生成住宿登记凭证。提供空闲房间供用户选择。实现客人住宿登记，收取客人预交宿费。自动计算折前宿费、实际宿费、宿费提醒时间、退宿时间。打印住宿登记单据。住宿登记界面如图6-3所示。图6-3 住宿登记界面2实现过程（l） 在“客房管理系统”工程中，添加一个新窗体，命名为main_kfdj。（2）程序代码：Private Sub ZSDJ_Change(Index As Integer) Select Case Index Case 6 ZSDJ(7).T

33、ext=Format(Val(ZSDJ(6).Text)*Val(ZSDJ(5).Text), "0.00") '计算折前宿费 ZSDJ(9).Text = ZSDJ(7).Text '赋值给ZSDJ(9) ZSDJ(8).Text = 100 DTP3.Value = DTP1.Value + Val(ZSDJ(6).Text) '计算退宿日期 Case 8 ZSDJ(9).Text=Format(Val(ZSDJ(7).Text) * Val(ZSDJ(8).Text) / 100, "0.00") '计算实际宿费 C

34、ase 10 If ZSDJ(10).Text <> "" Then ZSDJ(10).Text = Val(ZSDJ(10).Text) '用val函数将字符串转换为数字 DTP2.Value=DTP1.Value+Int(Val(ZSDJ(10).Text)/ If (Val(ZSDJ(10).Text) - Int(Val(ZSDJ(10).Text) / Val(ZSDJ(5).Text) > 0.5 * Val(ZSDJ(5).Text) Then tim2.Value = #6:00:00 PM# Else tim2.Value = #

35、12:00:00 AM# End If End If End SelectEnd Sub6.4追加押金模块设计追加押金界面如图6-4所示图6-4 追加押金界面6.4.1 实现目标程序启动后，选择“住宿管理”菜单下的“追加押金”项，将进入追加押金模块。在追加押金模块中主要实现如下功能：提供凭证列表供用户选择。收取客人的续交押金，自动计算宿费提醒日期和宿费提醒时间。6.4.2 实现过程1.在“客房管理系统”工程中，添加一个新窗体，命名为main_zjyj2.在窗体中添加3个Data控件、1个DBCombo控件、6个DTPicker控件、8个Text控件、5个Command控件等。65 调房登记模块

36、设计6.5.1 实现目标程序启动后，选择“住宿管理”菜单下的“调房登记”项，将进入调房登记模块。在调房登记模块中主要实现如下功能：可以选择客人住宿房和空闲房。实现客户调房登记（系统只允许调换等价客房）。调房登记界面如图6-5所示。图6-5 调房登记界面6.5.2 实现过程1.在“酒店管理系统”工程中，添加一个新窗体，命名为mainesjdj。2.在窗体中添加4个Data控件、2个DBCombo控件、l个Combo控件、7个Text控件、4个COnunand控件等。6.5.3 调房的实现方法由于客人的住宿习惯不同，有些客人会在住宿过程中要求调房，例如客人要求换一个的房间或空调房等，这就要求酒店管

37、理系统有调房的功能。调房模块的思路是：首先查看目标客房是否空闲，如果空闲，查看目标客房的房价（本系统只允许用户调换等价的房间），如果房价与客人原住客房等价，则可确认客人调房。调房后，应对原客房、目标客房的状态进行编辑，再对住宿登记表中的信息进行编辑。Data1.Recordset.FindFirst房间号Like”Chr(34)DBCombo4.TextChr(34)"andd.标志like“Chr(34)”1”Chr(34)"andlike"Chr(34)Textl8.Text”Chr(34)"and凭证like"Chr(34)bh.Text

38、Chr(34)”Datal.Recordset.EditIfDBCombol.Text”“ThenDatal.Recordset.Fields("房间号)Val(DBCombol.Text)IfDBCombo2.Text”ThenDatal.Recordset.Fields（”客房类型”）DBCombo2.TextIfDBCombo3.Text”ThenDatal.Recordset.Fields("客房价格”）Val(DBCombo3.Text)IfTextlO.Text”“ThenDatal.Recordset.Fields("备注”）TextlO.TextD

39、atal.Recordset.Fields("标志”)”1”Datal.Recordset.Field（“摘要”）=”由源房”DBCombo4.Text&“调到目标房”&DBCombol.Text66 退宿结账模块设计6.6.1 实现目标程序启动后，选择“住宿管理”菜单下的“退宿结账”项，将进入退宿结账模块。在退宿结账模块中主要实现如下功能：提供需结账客人的凭证供用户选择。实现现金结账、现金打折结账、挂账结账等功能。自动计算住宿费用（宿费、费、杂费、会议费、停车费、赔偿费等）和退还费用。退宿结账界面如图6-6所示。图6-6 退宿结账界面6.6.2 实现过程1.在“酒店

40、管理系统”工程中，添加一个新窗体，命名为main_tf.2.在窗体中添加5个Da1La控件、4个DBCombo控件、4个DTPieb控件、3个Colllbo控件、21个Text控件、5个Coand控件等。3.程序代码：本部分为该系统的关键：在开发酒店管理系统过程中，从客人入住到客人退宿涉与到酒店管理的方方面面，如处理不当，便会给酒店造成很大的损失。客房宿费的算法由于每个酒店的管理方法不同，所以宿费算法也有不同，如果采用人工运算既耽误时间，又容易出现运算错误，很容易给酒店和客人造成不必要的麻烦和损失。如果使用程序计算宿费，那么既方便又规，同时也避免了运算错误。下面是针对酒店管理设计的宿费运算公式

41、：宿费房价x天数如果客人退宿结账时间在住宿当天，可以按如下算法：如客人退宿结账时间早于18:00,那么住宿天数为0.5天；如客人退宿结账时间超过18:00,那么住宿天数为1天。如果客人退宿结账时间不在住宿当天，可以按如下算法（定义A为天数）：如客人退宿结账时间在中午12:00之前，住宿天数为（退宿日期一住宿日期）+0.5天；如客人退宿结账时间在中午12:00之后，住宿天数为（退宿日期一住宿日期）+1天。PublicSubJSQ定义计算住宿天数的函数IfDTP2.ValueDTP1.ValueThenIftim2.Value#11:59:00PM#ThenIftim2.Value#12:00:0

42、0PM#ThenIftim2.Value#6:00:00PM#ThenTexts.TextDTP2.Value一DTP1.Value1ElseTexts.TextDTP2.Value一DTP1.Value0.5EndIfFlseTexts.TextUTP2.Value一DTP1.ValueEndIfRIePTexts.TextDTP2.Value一DTP1.ValueEndIfElseIftiml.Value#2:00:00AM#ThenIftim2.Value#2:00:00AM#ThenIftim2.Value#12:00:00PM#ThenIftim2.Value#6:00:00PM#T

43、henTexts.Text11ElseTexts.Text10.5EndIfElseTexts.Text1FnriIfFlanTexts.Text1EndIfEISeTextsTextlElldlfEndlfEndSubPublicSubssje（）定义计算实收金额和退还金额的函数TexssjeTextVal（TexzhjeText）Val（TexzfText）Val（TexdhfText）Val（TexpefText）Val（Texh江Text）Val（TextefText）TexthjeTextVal（Texyj·Text）一Val（Texssje·Text）EndSu

44、b67 酒店管理设计6.7.1 客房设置模块设计实现目标程序启动后，选择“客房管理”菜单下的“客房设置”项，将进入客房设置模块。在客房设置模块中主要实现如下功能：完成客房基本信息的录入、保存、修改。完成客房基本信息的查询。客房设置界面如图6-7-1所示。图6-7-1客房设置6.7.2 客房查询模块设计1实现目标程序启动后，选择“客房管理”菜单下的“客房查询”项，将进入客房查询模块。在客房查询模块中主要实现如下功能：按房间号检索所需的客房基本信息。完成客房基本信息的修改与删除。客房查询界面如图6-7-2所示图6-7-2客房查询2实现过程(1)在“酒店管理系统”工程中，添加一个新窗体，命名为mai

45、nwekrcxa(2)程序代码：Data1.DatabaseName = App.Path & "KFGL.MDB"End SubPrivate Sub Form_Unload(Cancel As Integer) main.Enabled = TrueEnd SubPrivate Sub Frame1_DragDrop(Source As Control, X As Single, Y As Single)End SubPrivate Sub Text1_Change()'查询客房信息 Data1.RecordSource = "select *

46、 from kf where kf.房间号 like " + Chr(34) + Text1.Text + "*" + Chr(34) + "" Data1.RefreshEnd SubPrivate Sub Command1_Click() '允许修改客房信息 DBGrid1.AllowUpdate = TrueEnd SubPrivate Sub Command2_Click() '删除客房信息 If Data1.Recordset.RecordCount > 0 Then Data1.Recordset.Delete

47、 Data1.Refresh End IfEnd SubPrivate Sub Command3_Click() main.Enabled = True Unload MeEnd Sub6.7.3 房态查看模块设计1实现目标程序启动后，选择“客房管理”菜单下的“房态查看”项，将进入房态查看模块。在房态查看模块中主要实现如下功能：以图形方式显示入住房、空闲房、维修房。计算当前客房入住数、空闲数、维修数、客房的使用率。点击入住图形的按钮，查看客人详细的住宿信息。房态查看界面如图6-7-3所示图6-7-3 房态查看界面2实现过程（1）在“酒店管理系统”工程中，添加一个新窗体，命名为mainftcx.

48、（2）在窗体中添加1个Commandl数组(1-25)、2个Image控件、1个Text控件等。6.8 查询统计设计6.8.1 住宿查询模块设计1实现目标程序启动后，选择“查询统计”菜单下的“住宿查询”项，将进入住宿查询模块。在住宿查询模块中主要实现输入客人检索住宿信息的功能。住宿查询界面如图6-9所示。图6-9 住宿查询界面2实现过程（1）在“客房管理系统”工程中，添加一个新窗体，命名为main_zscx.（2）程序代码：PrivateSubFormesLoed（）DatalDatabaseNameAppPath入KI息lMD丑”自动识别数据库路径EndSubPrivateSubFormes

49、Unfoad（CaneelAsInteger）rnainEnabledTrueEndSUbPrivateSubCommandl_cliek（）查询住宿信息DatalReeordsource”seleetfromonldwherelike”Chr（34）textltext”Chr（34）”“DatalRefreshEndSllbPrlvateSubCornrnand2_Cliek（）mainEnabledTrueUnloadMeEndSub6.9报表管理该部分包括客人入住报表模块、客房信息报表模块和客房销售统计模块。便于酒店对于业务进行管理。其中：在客人入住报表模块中主要实现对客人住房信息统计功

50、能。在客房销售报表模块中主要实现按任意时间汇总客人结账后所需费用的总额的功能。图6-11-1 登记预收报表界面图6-11-2 客房销售报表界面图6-11-3酒店客房销售统计界面6.10 系统设置设计6.10.1 操作员设置模块设计程序启动后，选择“系统设置”菜单下的“操作员设置”项，将进入操作员设置模块。在操作员设置模块中主要实现如下功能：完成操作员与密码的设置。支持鼠标和键盘操作。操作员设置界面如图6-12-1所示。图6-12-1 操作员设置界面6.10.2 密码设置模块设计程序启动后，选择“系统设置”菜单下的“密码设置”项，将进入密码设置模块。在密码设置模块中主要实现如下功能：完成操作员密

51、码的修改。支持鼠标和键盘操作。密码设置界面如图6-12-2所示。图6-12-2 密码设置界面程序代码： Private Sub label1_Click() '修改操作员密码 Data1.RecordSource = "select * from qxsz where 操作员='" & Text1.Text & "'" Data1.Refresh If Text1.Text <> "" And Text2.Text <> "" And Text2.Text = Data1.Recordset.Fields("