毕业设计 毕业论文 VB课程设计 客房管理系统.docVIP

PAGE PAGE 1 第1章 系统设计的目的与意义: 客房管理系统用于宾馆旅客入住情况登记,包括旅客的姓名及身份证号的登记,以及入住房间信息.当旅客离开时,需要办理退房结帐手续.对于一定时间没的旅客入住情况实现基本查询,报表打印功能.对于宾馆本身也实现了客房增减,入住情况查询等功能. 无论各种等级的宾馆,使用客房管理系统都具有非常实用的价值.使用该系统可以大大节省时间,提高办公效率,而且非常方便的实现旅客信息的查询,以及对宾馆本身客房入住情况及时了解.因此,客房管理系 统的开发无疑具有深远的意义. 系统功能设计 系统设计包括数据库设计,主界面设计,菜单设计以及功能设计.而其他功能设计包括系统登录设计,旅客信息登记,旅客信息查询,退房信息处理设计以及报表输入等功能设计,系统功能设计流程图如图所示 开始启动图1.1 开始启动 用户登录 用户登录 SHAPE \* MERGEFORMAT 系统主界面 系统主界面 信息查询旅客基本信息客房基本信息 信息查询 旅客基本信息 客房基本信息 客房信息查询旅客信息查询旅客退房处理浏览客房信息添加旅客信息旅客信息浏览 客房信息查询 旅客信息查询 旅客退房处理 浏览客房信息 添加旅客信息 旅客信息浏览 第2章 数据库设计 旅客信息表为旅客的个人信息加入住客房信息，数据结构如表 旅客信息表设置 字段名 类型 大小 说明 登记号 Text 8 旅客入住号 姓名 Text 8 旅客姓名 身份证号码 Text 18 旅客身份证号 房间号 Text 3 入住房间号 登记日期 Text 日期/时间 旅客入住时间 性别 Text 3 旅客性别 籍贯 Text 8 旅客籍贯 表2.1 客房信息表为客房入住情况的基本信息，数据结构如表 客房信息表设置 字段名 类型 大小 说明 房间号 Text 3 房间号 客房等级 Text 8 客房等级 客房类型 Text 8 客房类型 客房价格 Text 单精度型 客房价格 客房状态 Text 3 客房状态 客房备注信息 备注 8 客房备注信息 表2.2 旅客退房记录表为旅客退房相关的一些记录信息，数据结构如表 旅客退房记录表设置 字段名 类型 大小 说明 登记号 Text 8 旅客入住号 登记日期 日期/时间 旅客登记时间 退房时间 日期/时间 旅客退房时间 付款金额 Text 单精度型 付费金额 退房备注信息 Text 8 退房备注信息 表2.3 管理人员信息表存储宾馆管理人员使用该系统的帐号密码，数据结构表 第一章 主界面的设计(余蕾) 主体内容 3．1 设计标准模块 本系统设计过程中，创建一个通用函数模块，用于实现数据库连接及按需要打开一个数据表。程序代码如下： Option Explicit Public Sub opentable(pado As Adodc, precordsource As String) With pado .ConnectionString = Provider=Microsoft.Jet.OLEDB.4.0;Data Source= App.Path /Total.mdb .CommandType = adCmdUnknown .RecordSource = precordsource .Refresh End With End Sub 3.2 户登录界面设计 用户登录的作用是判断使用本程序的用户是否是合法用户。在程序进入登录界面时要求输入用户名和密码，如果用户名，密码正确程序继续执行。当密码错误输入的次数超过设定次数时，给出提示信息退出程序，这样防止了非法用户对本程序的使用。 3．2．1工作界面设计 图3.1登录窗体 程序代码如下： Private Sub cmdok_Click() 检查正确的密码 首先要对用户名特殊字符的过滤 防止非授权用户的登陆访问 Dim s1 As String Dim i As Integer Dim j As Integer Dim a(18) As String j = Len(txtUserName.Text) s1 = txtUserName.Text Dim c As Integer c = 1 For i = 1 To j a(i) = Mid(s1, i, 1) 逐一判断字符的合格化 If a(i) = Then MsgBox Error, vbOKOnly, Error