2022年餐饮管理系统分析 .pdf

《2022年餐饮管理系统分析 .pdf》由会员分享，可在线阅读，更多相关《2022年餐饮管理系统分析 .pdf（32页珍藏版）》请在淘文阁 - 分享文档赚钱的网站上搜索。

1、餐饮企业管理系统的设计与实现所在院 (系) ：学生：指导教师：研究起止日期：名师资料总结 - - -精品资料欢迎下载 - - - - - - - - - - - - - - - - - - 名师精心整理 - - - - - - - 第 1 页，共 32 页 - - - - - - - - - 安徽工业大学成教学院2011 届专科毕业论文摘 要随着我国经济的快速发展，人民生活水平日益提高，餐饮消费需求越来越高，餐饮业突飞猛进。但与此同时，其所面临的竞争也越来越激烈。餐饮业要想在白热化的竞争环境下生存，就必须运用科学的管理思想与先进的管理方法，使点餐与管理一体化。因此，餐饮企业的管理者需要一种综合

2、，实时的管理模式，减轻工作负担，提高工作效率、降低经营成本，从更科学的管理中取得竞争的优势，在竞争激烈的商业市场中取胜。首先分析了餐饮系统对现实餐饮运营管理的必要性，接着介绍了本系统所涉及到的相关技术和开发环境。在此基础之上介绍了系统的总体设计以及公共模块、主窗体模块、登入模块、开台管理模块、进货模块等典型模块的详细设计与实现。本系统主要包括前台管理、后台管理、财务管理、系统管理、报表打印等功能。实现了实时的管理模式，可以减轻工作负担、提高工作效率、降低经营成本。方便、快捷、易用，达到了设计的目的。关键词： 餐饮；管理信息系统; Visual Basic 6.0; SQL Server2000

3、 名师资料总结 - - -精品资料欢迎下载 - - - - - - - - - - - - - - - - - - 名师精心整理 - - - - - - - 第 2 页，共 32 页 - - - - - - - - - 安徽工业大学成教学院2011 届专科毕业论文Abstract With Chinese rapid economic development and increasing of peoples living standards, consumer demand higher and higher food and beverage. Food and beverage indu

4、stry is developing more and more quickly. At the same time, they face increasingly fierce competition. In order to survive in the intense competitive environment, the manager must use scientific management ideas and advanced management methods to make ordering and management be integrative. Therefor

5、e, managers need a comprehensive, real-time management model to reduce workload, improve efficiency, reduce operating costs. With a more scientific management, they will gain advantage in the competition and to be a winner. First, the food and beverage management system is very essential for real ca

6、tering enterprises. The paper introduces the relevant technology and developing environment. On this basis, it introduces the overall design of the system and public module, the main module, login module, the founding management module, purchasing module and other typical design and implementation o

7、f the module. The system includes front desk management, background management, financial management, system management, report printing. The system achieves real-time manage, reduce workload, improve efficiency and reduce operating costs. Besides, it realizes the goal which is convenient, fast, eas

8、y to use. Keywords: Food and beverage；Management information system; Visual Basic 6.0; SQL Server2000 名师资料总结 - - -精品资料欢迎下载 - - - - - - - - - - - - - - - - - - 名师精心整理 - - - - - - - 第 3 页，共 32 页 - - - - - - - - - 目录1 绪论.1 1.1 引言1 1.2 系统设计目的和现实意义1 1.3 开发工具介绍 1 2 餐饮企业管理系统分析 .4 2.1 设计目标 4 2.2 需求分析 4 2.3

9、系统可行性分析 4 3 餐饮企业管理系统设计 .5 3.1 系统功能分析 5 3.2 系统功能结构 5 4 餐饮企业管理系统数据库设计.6 4.1 数据库概念设计 6 4.2 数据库逻辑结构设计 8 4.3 数据库结构的实现 .11 5 餐饮企业管理系统实现 .12 5.1 公共模块设计 .12 5.1.1 数据库连接 .12 5.1.2 错误信息显示函数 .13 5.2 主窗体的创建 .13 5.3 系统登入模块的实现 .15 5.4 开台管理模块的实现 .17 5.5 进货管理模块的实现 .22 6 系统测试 .26 7 开发总结 .27参考文献 28 致谢.29名师资料总结 - - -精

10、品资料欢迎下载 - - - - - - - - - - - - - - - - - - 名师精心整理 - - - - - - - 第 4 页，共 32 页 - - - - - - - - - 安徽工业大学成教学院2011 届专科毕业论文-1- 1 绪论1.1 引言随着我国经济的快速发展，人民生活水平日益提高，餐饮消费需求越来越高，餐饮业突飞猛进。但与此同时，其所面临的竞争也越来越激烈，餐饮业要想在白热化的竞争环境下生存，就必须运用科学的管理思想与先进的管理方法，使点餐与管理一体化。因此，餐饮企业的管理者需要一种综合，实时的管理模式，减轻工作负担，提高工作效率、降低经营成本，从更科学的管理中取得

11、竞争的优势，在竞争激烈的商业市场中取胜，开发出一个信息管理系统- 餐饮管理系统便成为必然。1.2 系统设计目的和现实意义在金融危机的冲击下，我国改革开放不断深入，市场竞争日趋激烈，企业要想进一步发展，不得不进行现代化的管理。餐饮企业管理的自动化、信息化是必然选择。为了应对激烈的市场竞争，提高餐饮企业运作效率，建立餐饮管理系统已十分必要。通过对餐饮企业日常运作的了解，参考大量的资料，综合系统结构组织，功能实现，技术要求以及可行性等多方面的考虑，认为本课题是一个符合现今餐饮企业发展需要的计算机信息管理系统，具有一定的实际开发价值和使用价值。用计算机管理信息系统已成为现代化企业管理的重要标志，它给企

12、业管理来了明显的经济效益和社会效益。主要表现：极大提高了工作人员的工作效率，大大减少了人工操作的繁杂；基于餐饮企业管理的全面自动化，可以减少进货管理、销售管理及库存管理中的漏洞，可以减少管理开支，增加收益。餐饮企业管理的信息化有利于全面提高了餐饮企业的管理水平。因此，开发一个易于操作的餐饮企业管理软件对我国餐饮企业的发展具有重要意义，这正是本系统开发的目的和意义。1.3 开发工具介绍本系统基于Visual Basic 6.0 平台，完成对餐饮管理系统的开发，包括前台管理、后台管理以及系统配置管理；实现对工作人员的管理，访问权限管理；实现销售报表的生成。数据库采用SQL SERVER 2000，

13、ADO 连接方式，通过建立ODBC 数据源进行数据的访问，修改。(1)开发工具： Microsoft Visual Basic 6.0 。Visual Basic 6.0 简介Visual Basic 6.0 起源于 DOS 时代的 BASIC 语言，BASIC 语言曾是最流行的计算机编程入门语言及最主流的计算机教学语言。Visual Basic 6.0 是微软公司于1998 年推出的 Visual Studio 98 中的一个组件。 Visual Studio 98 主要包括 Visual c+ 6.0 、Visual Basic 6.0 、Visual Foxpro 6.0 、Visual

14、 J+ 6.0、名师资料总结 - - -精品资料欢迎下载 - - - - - - - - - - - - - - - - - - 名师精心整理 - - - - - - - 第 5 页，共 32 页 - - - - - - - - - 安徽工业大学成教学院2011 届专科毕业论文2 Visual Internet 6.0 和 MSDN Library 6.0 ，几乎囊括了当前应用程序开发的各个方面，从中总可以找到满足需要的工具，VB 是一种可视化的、面向对象的Windows 开发语言。 VB 从其问世之初，就有易用、通用和开发效率高的特点，这一特点VB 一直保持着。随着微软对它不断的改进以及计算

15、机本身在性能上的迅速提高， VB 在程序性能上的缺陷也变得不那么关键。这使 VB 越来越适合于一般的应用程序开发。 VB 在顶尖的开发场所是开发关键性任务的主要语言，几乎可以做任何想做的事情。VB 一个很大的优点是迅速有效地编制程序界面。VB 的快速程序开发环境在界面设计和程序开发中是很有效的。另外，在现代社会中，程序必须随着外界的变化而不断改变，VB 就很适合于这类工作。使用 VB 的一个有效方法是将VB 与其它开发工具结合起来。VB 可以用来做程序界面，以及其它一些经常变化的部分，而用C 语言来编制的动态链接库被VB 调用以优化速度。也可以用C语言产生自己的OLE 控件，然后在VB 中使用

16、。(2)后台数据库 :采用 Microsoft SQL Server 2000设计。SQL Server 2000 简介SQL Server 是由 Microsoft 公司开发和推广的高性能的客户端/服务器结构的关系数据库管理系统（DBMS ） ，最初由 Microsoft 、Sybase和 Ashton-Tate 三家公司共同开发，1988 年推出第一个版本。1990 年， Ashton-Tate 公司退出开发，1992 年，SQL Server 移植到 NT 上， 1994 年两家公司分别开发， Microsoft 公司专注于开发和推广SQL Server 的 Windows NT 版，而

17、 Sybase公司则专注于SQL Server 在 UNIX 操作系统上的应用。2000 年 Microsoft 公司正式发行了SQL Server 2000 版本， SQL Server 2000 在数据库性能、数据可靠性、易用性方面做了重大改进，并新增了许多新功能。SQL Server 2000 有七种不同的可用版本：企业版、企业评估版、标准版、开发版、个人版、Windows CE 版和桌面引擎版。由于企业版支持 SQL Server 2000 中的所有可用功能，并可根据支持最大的Web 站点和企业联机事务处理（OLTP）及数据仓库系统所需的性能水平进行伸缩，多作为生产数据库服务器使用，故

18、本系统采用企业版。SQL Server 采用二级安全验证、 登录验证及数据库用户帐号和角色的许可验证。SQL Server 支持两种身份验证模式：Windows NT 身份验证和SQL Server 身份验证。SQL Server 为公共的管理功能提供了预定义的服务器和数据库角色，可以很容易为某一特定用户授予一组选择好的许可权限。SQL Server 可以在不同的操作平台上运行，支持多种不同类型的网络协议如TCP/IP、IPX/SPX 、Apple Talk 等。SQL Server 提供服务器端的软件，这部分需要安装在NT Server 上， SQL Server 的用户端则可以安装在许多用

19、户端PC 系统中， Windows 可以让用户端进行数据库的建立，维护及存取等操作，SQL Server 可以最多定义32767 个数据库，每个数据库中，可以定义20 亿个表格，每个表格可以有250 个字段，每个表格的数据个数并没有限制，每一个表格可以定义250 个索引。SQL Server 所使用的数据库查询语言称为Transact-SQL， 它是 SQL Server 的核心，Transact-SQL名师资料总结 - - -精品资料欢迎下载 - - - - - - - - - - - - - - - - - - 名师精心整理 - - - - - - - 第 6 页，共 32 页 - - -

20、 - - - - - - 安徽工业大学成教学院2011 届专科毕业论文3 强化了原有的SQL 关键字以进行数据的存取，储存及处理等功能，Transact-SQL 扩充了流程控制指定，可以使你方便的编写功能强大的存储过程，他们存放在服务器端，并预先编译过，执行速度非常块，触发是一种特殊的存储过程，用来确保SQL Server 数据库引用的完整性，可以建立插入，删除和更新触发以控制相关的表格中对数据列的插入，删除和更新，还可以使用规则，缺省以及限制，来协助将新的数值套用到表格中去。名师资料总结 - - -精品资料欢迎下载 - - - - - - - - - - - - - - - - - - 名师

21、精心整理 - - - - - - - 第 7 页，共 32 页 - - - - - - - - - 安徽工业大学成教学院2011 届专科毕业论文4 2 餐饮企业管理系统分析2.1 设计目标餐饮企业管理系统开发的总体任务是实现餐饮企业管理的系统化和自动化，从而提高企业管理效率。餐饮管理系统以经济、实用、便捷、高效为原则，为企业管理者、员工提供一个便捷、轻松的工作环境。2.2 需求分析本系统是为方便餐饮企业管理而开发的，系统的用户对象是餐饮企业的工作人员，由于本系统界面友好，操作简单易学。本系统主要具有以下功能：（1）实现信息共享，相互之间的信息传递准确、快捷。（2）业务管理信息化，方便的数据查询

22、，提高准确性，减少人为失误。（3）如果系统的使用对象较多，则要求有较好的权限管理。（4）有效管理原材料及库存信息。（5）结算方便可靠。2.3 系统可行性分析2.3.1 经济上可行性目前，计算机的价格便宜，性能高，并且网络已普及。本系统的开发体现了以下几个特点：第一，本系统的运行可以提高餐饮企业管理的效率，为企业节省大量的人力物力，降低企业运作成本；第二，本系统操作简单，非计算机专业人士通过短期的学习就可熟练操作。所以，本系统在经济上是可行的。2.3.2 技术上可行性本系统前台采用VB 作为开发工具，后台数据库使用的是SQL Server 2000 ，该数据库系统具有安全性好、准确性高、运行速度

23、快、处理数据量大、效率高等优点。所以，本系统的设计开发在技术和硬件设备上的要求都可满足，因此，它在技术上也是可行的。2.3.3 运行上可行性本系统是为一个中小型餐饮企业而设计的管理系统，对电脑在硬件和软件的要求都不高，因此，本系统运行上是可行的。名师资料总结 - - -精品资料欢迎下载 - - - - - - - - - - - - - - - - - - 名师精心整理 - - - - - - - 第 8 页，共 32 页 - - - - - - - - - 安徽工业大学成教学院2011 届专科毕业论文5 3 餐饮企业管理系统设计3.1 系统功能分析餐饮管理系统是一个中小型而又实用的餐饮企业管

24、理软件，它对系统的要求不高，操作方便，简单实用，主要功能如下：（1）前台管理前台管理的使用最为频繁，可以实现开台管理、菜单管理、买单管理、当日结账等功能。（2）后台管理主要实现进货管理、进货查询、库存查询、原材料信息管理、员工信息管理、员工级别管理、部门信息管理、仓库信息管理等功能。（3）财务管理主要包括月结算管理、应付款管理、月营业分析、年营业分析等功能。（4）系统主要有权限管理、本单位定义等功能。3.2 系统功能结构本系统功能模块如图3-1 ：餐饮管理系统前台管理后台管理财务管理系统开台管理买单管理当日结算管理当日结账分析进货管理进货查询统计库存查询仓库信息管理房台类型设置房间台号管理原材

25、料管理员工信息管理员工级别管理部门信息管理供应商管理月结算管理应付帐管理月营业分析年营业分析权限管理本单位定义退出菜单管理图 3-1 功能模块图名师资料总结 - - -精品资料欢迎下载 - - - - - - - - - - - - - - - - - - 名师精心整理 - - - - - - - 第 9 页，共 32 页 - - - - - - - - - 安徽工业大学成教学院2011 届专科毕业论文6 4 餐饮企业管理系统数据库设计在开发餐饮管理系统之前，分析了本系统的数据量。由于后台的原材料信息和点餐的人数可能会很多，因此原材料信息、点单信息等数据量都比较大，要占用大量的数据空间，数据库

26、在一个信息管理系统中占有重要地位，数据库结构设计的好坏将直接影响系统的效率以及功能的实现。本系统使用SQL server 2000，数据库名称为CYGLXT 。下面主要从概念结构设计、逻辑结构设计和数据库实现这几方面介绍本系统的数据库设计。4.1 数据库概念设计通过对系统进行的需求分析、业务流程设计以及系统功能结构的确定，规划出系统中使用的数据库实体对象及实体E-R 图。用户权限信息实体的E-R 图如图 4-1 所示。用户权限信息编号员工级别权限密码操作员名称图 4-1 用户权限信息实体E-R 图部门信息实体的E-R 图如图 4-2 所示。名师资料总结 - - -精品资料欢迎下载 - - -

27、- - - - - - - - - - - - - - - 名师精心整理 - - - - - - - 第 10 页，共 32 页 - - - - - - - - - 安徽工业大学成教学院2011 届专科毕业论文7 部门信息部门编号负责人部门职能部门名称部门电话图 4-2 部门信息实体E-R 图房间台号信息实体的E-R 图如图 4-3 所示。房间台号信息编号可容纳人数简要说明类型说明状态房台名称所属部门服务费图 4-3 房间台号信息实体E-R 图点单临时信息实体的E-R 图如图 4-4 所示。名师资料总结 - - -精品资料欢迎下载 - - - - - - - - - - - - - - - -

28、 - - 名师精心整理 - - - - - - - 第 11 页，共 32 页 - - - - - - - - - 安徽工业大学成教学院2011 届专科毕业论文8 点单临时信息房台编号商品编号单据号服务员姓名,图 4-4 点单临时信息实体E-R 图商品基础信息实体的E-R 图如图 4-5 所示。商品基础信息商品编号商品名称商品单位商品单价,图 4-5 商品基础信息实体E-R 图4.2 数据库逻辑结构设计根据以上的实体关系E-R 图，设计出的表格结构如下。权限信息表根据用户登录系统的需求设计出权限信息表，用来存储用户登录系统的用户名、密码、权限信息等。表结构如表4-1 所示。表 4-1 权限信息

29、表的结构字段名数据类型长度编号varchar 10 操作员姓名varchar 12 员工级别varchar 20 密码varchar 50 权限varchar 20 部门信息表名师资料总结 - - -精品资料欢迎下载 - - - - - - - - - - - - - - - - - - 名师精心整理 - - - - - - - 第 12 页，共 32 页 - - - - - - - - - 安徽工业大学成教学院2011 届专科毕业论文9 部门信息表是根据餐饮店的实际情况设计出来的，其中包含所有部门的相关信息，在用户输入部门时可以以下拉列表框的形式列出所有部门，使其操作更方便、快捷。部门信息表

30、结构如表4-2所示。表 4-2 部门信息表结构字段名数据类型长度部门编号varchar 10 部门名称varchar 20 负责人varchar 10 部门电话varchar 10 部门职能varchar 50 房间台号信息表根据房间台号信息的特征构造了房间台号信息表。通过房间台号信息表可以让用户了解房间台号的信息，方便用户根据客人的实际情况为客人安排房间。房间台号信息表结构如表4-3 所示。表 4-3 房间台号信息表结构字段名数据类型长度编号varchar 10 房台名称varchar 30 类型说明varchar 20 部门varchar 20 服务费money 8 简要说明varchar

31、 30 状态varchar 10 容纳人数int 4 点单临时信息表因为客人的需求经常变化，点单以后常会改动，所以构建了一个点单临时表，用来存储客人的点单信息。点单临时表的结构如表4-4 所示。表 4-4 点单临时表的结构名师资料总结 - - -精品资料欢迎下载 - - - - - - - - - - - - - - - - - - 名师精心整理 - - - - - - - 第 13 页，共 32 页 - - - - - - - - - 安徽工业大学成教学院2011 届专科毕业论文10 字段名数据类型长度房台编号varchar 10 房台类别varchar 10 商品编号varchar 10

32、商品名称varchar 50 单位varchar 10 数量numeric 9 单价money 8 金额money 8 点单日期datetime 8 结账日期datetime 8 服务员编号varchar 10 服务员姓名varchar 12 状态varchar 10 单据号varchar 30 是否结账varchar 4 备注varchar 50 商品基础信息表为了了解每一种商品的基本特征性和详细信息，构建了一个用来存放商品信息的商品基础信息表。在用户进行进货登记时，商品基础信息表以辅助输入的形式显示，用户只需选中相应的信息即可把商品信息插入到进货统计中，方便、省时、省力。商品基础信息表的结

33、构如表4-5 所示。名师资料总结 - - -精品资料欢迎下载 - - - - - - - - - - - - - - - - - - 名师精心整理 - - - - - - - 第 14 页，共 32 页 - - - - - - - - - 安徽工业大学成教学院2011 届专科毕业论文11 表 4-5 商品基础信息表的结构字段名数据类型长度商品级别varchar 4 本级编号varchar 6 商品编号varchar 20 本级名称varchar 20 本级简称varchar 10 商品全称varchar 50 单位varchar 10 单价money 8 商品说明varchar 30 供应商v

34、archar 20 联系地址varchar 30 联系电话varchar 15 联系人varchar 12 4.3 数据库结构的实现经过之前的分析和概念结构设计，得到数据库的逻辑结构。然后，创建数据库。 运行 SQL Server 2000，选择菜单文件-新建，新建一个数据库文件，命名为CYGLXT 。名师资料总结 - - -精品资料欢迎下载 - - - - - - - - - - - - - - - - - - 名师精心整理 - - - - - - - 第 15 页，共 32 页 - - - - - - - - - 安徽工业大学成教学院2011 届专科毕业论文12 5 餐饮企业管理系统实现完

35、成前面的工作，下面就是具体地来实现本管理系统。本章将从公共模块、系统登入模块、开台管理模块、进货管理模块等方面介绍餐饮企业管理系统功能的具体实现方法。5.1 公共模块设计为了节省系统资源，在系统中新建一个module1 模块来存放整个工程项目中共用的函数、过程、全局变量等。整个工程中的任何地方都可以调用此模块中的函数、过程、变量。这样就实现代码的复用，减少代码的书写量以及维护的工作量。公用变量声明：系统中有多处要用到字符串、记录ADO的指针等的变量，其声明如下：Option Explicit 限制变量必须先声明后使用Public cn As ADODB.Connection 定义公用 ADO连

36、接变量Public Sql, sqlStr As String 定义公用字符串变量Public Bkm, FormNumber As Integer 用于记录 ADO指针位置的整形变量Dim myform As Form 定义窗体类型变量5.1.1 数据库连接在餐饮管理系统中频繁地使用了数据库连接，因此需要一个公共的数据库连接函数，用以数据库连接。代码如下：Public Function cnn() As String 定义函数 返回一个数据库连接cnn = Provider=MSDASQL.1;Persist Security Info=False;User ID=sa;Data Sourc

37、e=CYGLXT;Initial Catalog=CYGLXT 定义一个数据连接End Function 此过程定义了一个通过通用接口ODBC 连接数据库， 通过通用接口连接数据库时需要先创建一个新的 ODBC 数据源 CYGLXT 。系统中多处使用ADO控件动态地连接数据库，而ADO的数据库连接又比较麻烦，所以构造了一个用于 ADO控件连接数据库的函数。名师资料总结 - - -精品资料欢迎下载 - - - - - - - - - - - - - - - - - - 名师精心整理 - - - - - - - 第 16 页，共 32 页 - - - - - - - - - 安徽工业大学成教学院2

38、011 届专科毕业论文13 Public Function FunAdo(ByVal ado As Adodc, ByVal Str As String) 构造连接ADO的连接执行函数On Error GoTo err1 执行过程中如果发生错误转向错误处理With ado .Visible = False .ConnectionString = cn.ConnectionString 设置 Ado的连接字符串.CommandType = adCmdText 设置 Ado 的命令类型.RecordSource = Str 设置 Ado 的记录源.Refresh 刷新 Ado的记录集End Wit

39、h Exit Function err1: ErrMessageBox 与数据库连接失败！ 显示错误信息End Function 5.1.2 错误信息显示函数处理程序中错误时经常要提示错误信息，为了减少代码的书写量以及维护的工作量，更好的实现代码重用，编写错误处理函数，代码如下：Public Sub ErrMessageBox(ByVal sPrompt As String) Dim msg As String 变量 msg用于记录要在弹出对话框中显示的信息Dim ErrMsg As String ErrMsg记录错误信息代码以及描述ErrMsg = 错误 # & CStr(Err.Numbe

40、r) & ： & Err.Description 错误信息代码以及描述msg = sPrompt & vbCrLf & ErrMsg 弹出对话框中显示的错误信息MsgBox msg, vbOKOnly + vbInformation 显示弹出对话框End Sub 5.2 主窗体的创建餐饮管理系统的主界面主要由菜单栏、工具栏、状态栏和部分空间组成。位于窗体顶端的菜单栏主要用来连接实现系统功能对应的窗体；菜单栏下面的工具栏主要用来连接常用的系统功能窗体；位于窗体底部的状态栏主要用来显示系统当前状态信息。窗体运行界面如图5-1 所示。名师资料总结 - - -精品资料欢迎下载 - - - - - -

41、- - - - - - - - - - - - 名师精心整理 - - - - - - - 第 17 页，共 32 页 - - - - - - - - - 安徽工业大学成教学院2011 届专科毕业论文14 图 5-1 主窗体运行图工具栏是Windows 窗口的组成部分，它为用户提供了应用程序中最常用的菜单命令的快速访问方式，大多数工具栏都是通过Toolbar控件实现的。在利用Toolbar控件创建工具栏时，还需要使用 ImageList控件为工具栏按钮添加图标。除了工具栏，界面还用到菜单、状态栏控件StatuBar控件、 TextBox 控件和 Timer 控件。各控件的属性设置值如表5-1 所

42、示。表 5-1 主窗体主要空间属性对象属性值功能Adodc 名称Visible AdoMemo False 连接数据库TextBox 名称Visible Text1 False 记录打开的窗体Timer 名称Interval Timer1 100 执行显示系统时间的过程关键代码的设计与实现：餐饮管理系统主窗体的功能主要是为用户提供进入其他窗体的接口。从主窗体进入其他窗体时通过菜单栏实现的，菜单栏主要是为其他窗体提供入口。名师资料总结 - - -精品资料欢迎下载 - - - - - - - - - - - - - - - - - - 名师精心整理 - - - - - - - 第 18 页，共 3

43、2 页 - - - - - - - - - 安徽工业大学成教学院2011 届专科毕业论文15 如打开“开台管理”窗体的实现过程如下：Private Sub ktgl_Click() 调入开台管理Load main_qtgl_ktgl 载入开台管理窗体main_qtgl_ktgl.Show 显示开台管理窗体frm_main.Enabled = False 设置主窗体不可用主界面载入以后可以在状态栏中显示当前系统的日期和时间，系统时间是通过Timer控件的Timer 事件来显示的。实现过程如下：Private Sub Timer1_Timer() 设置时间 St1.Panels(1).text =

44、 Format(Date, long date) & & Time 使用 Format 函数将系统当前日期格式为长日期格式，Date 返回系统当前日期，Time 返回系统当前时间 End Sub 5.3 系统登入模块的实现在“员工”文本框中输入用户名，“密码”文本框中输入密码，单击“确定”按钮，触发click事件，若用户名和密码都正确，即可进入系统主界面。若用户没有输入用户名，密码，或密码错误，系统都将给出错误提示信息，三次输入密码错误，自动退出系统。系统登录界面如图5-2 所示：图 5-2 登录窗体运行效果窗体涉及到的控件及其属性设置如表5-2 所述。名师资料总结 - - -精品资料欢迎下载

45、 - - - - - - - - - - - - - - - - - - 名师精心整理 - - - - - - - 第 19 页，共 32 页 - - - - - - - - - 安徽工业大学成教学院2011 届专科毕业论文16 表 5-2 登入窗体中主要控件的属性对象属性值功能Adodc 名称Visble Adodc1 False 连接数据库ComboBox 名称BackColor Czy &H00C0FFFF& 显示可以操作系统员工的名称TextBox 名称Text Texttime 空值记录登入次数名称PasswordChar Text1 * 输入登录密码CommandButton 名称

46、Caption LabLogin 确定登录系统名称Caption LabExit 退出退出系统Label 名称BackStyle Label 0 显示提示信息如果员工的登录信息正确，根据员工的权限赋予员工权限。登录流程图如5-3 下：NO YES NO YES图 5-3 登录流程图选择员工名，输入密码信息是否正确进入系统主界面登 录 次 数为 3 登录次数加 1 登录退出系统名师资料总结 - - -精品资料欢迎下载 - - - - - - - - - - - - - - - - - - 名师精心整理 - - - - - - - 第 20 页，共 32 页 - - - - - - - - - 安

47、徽工业大学成教学院2011 届专科毕业论文17 实现员工登录的代码如下：Textime.text = TIM Sql = select * from 权限信息表where 操作员姓名= + Trim(czy.text) + 查询记录集Call FunAdo(Adodc1, Sql) 调用 ADO 的执行函数Adodc1.Refresh 刷新 ADO的记录集If Adodc1.Recordset.RecordCount = 0 Then MsgBox ( 您还没有设置操作员密码和权限，请设置员工密码和权限!) 显示错误信息Me.Show 显示本窗体TIM = TIM + 1 错误登录次数加1 I

48、f TIM = 2 Then 如果登录次数等于3 MESSAGE = MsgBox( 密码输入错误 ,请向系统管理员查询!, 0, ) 提示错误If MESSAGE = vbOK Then End 结束程序End If Exit Sub End If 判断操作员及密码If czy.text And Text1.text = Trim(Adodc1.Recordset.Fields(密码 ) Then 如果密码正确Load frm_main 载入主窗体frm_main.Show 显示主窗体 设置操作员权限If Trim(Adodc1.Recordset.Fields( 权限 ) = A Then

49、 如果用户的权限为A frm_main.qtgl.Enabled = True 前台管理菜单可用5.4 开台管理模块的实现在主窗体中选择“前台管理”/ “开台管理”命令，将进入开台管理模块。在开台管理模块中主要实现如下功能：（1）查看空闲房台、营业房台、维修房台信息。（2）以列表形式显示营业房台和已定菜谱信息。（3）汇总当前空闲、营业、维修房台数量。开台管理运行界面如图5-4 所示。名师资料总结 - - -精品资料欢迎下载 - - - - - - - - - - - - - - - - - - 名师精心整理 - - - - - - - 第 21 页，共 32 页 - - - - - - - -

50、 - 安徽工业大学成教学院2011 届专科毕业论文18 图 5-4 开台管理运行界面关键代码设计与实现：在系统主界面中单击工具栏中的“开台管理” 按钮，或者在菜单栏中选择“前台管理 / 开台管理”命令打开开台管理窗体。系统载入开台管理窗体时，首先初始化当前房台信息。实现的代码如下：For a = 0 To 7 设置房台信息初始值Label4(a).Caption = 房台信息初始值为空Next a Call list_change 调用房台列表函数i = SSTab1.Tab If ListView1(i).ListItems.Count 0 Then 如果 ListView控件中的列表不为空