【文章內容簡介】 ney 8 是 結帳日期 結帳日 期 smalldatetime 4 是 第 7 頁 共 24 頁 付款方式 付款方式 varchar 20 是 表 2 “ 入住單歷史 ” 表的設計： 簡稱 列名 數(shù)據(jù)類型 長度 是否允許空 備注 入住單號 入住單號 varchar 36 PK 預定單號 預定單號 varchar 36 是 會員編號 會員編號 Int 4 是 客房類型 客房類型 varchar 4 是 抵店時間 抵店時間 smalldatetime 4 是 離店時間 離店時間 smalldatetime 4 是 單據(jù)狀態(tài) 單據(jù)狀態(tài) varchar 20 是 入住人數(shù) 入住人數(shù) int 4 是 客房編號 客房編號 varchar 12 是 客房價格 客房價格 money 8 是 入住價格 入住價格 money 8 是 折扣 折扣 decimal 5 是 折扣原因 折扣原因 varchar 60 是 是否加床 是否加床 bit 1 是 加床價格 加床價格 money 8 是 預收款 預收款 money 8 是 預定人 預定人 varchar 20 是 預定公司 預定公司 varchar 60 是 聯(lián)系電話 聯(lián)系電話 varchar 40 是 備注 備注 varchar 510 是 操作員 操作員 varchar 10 是 業(yè)務員 業(yè)務員 varchar 50 是 早餐 早餐 bit 1 是 叫醒 叫醒 bit 1 是 保密 保密 bit 1 是 vip vip bit 1 是 電話等級 電話等級 varchar 20 是 特要說明 特要說明 varchar 50 是 是否結帳 是否結帳 bit 1 是 結帳金額 結帳金額 money 8 是 結帳日期 結帳日期 smalldatetime 4 是 第 8 頁 共 24 頁 付款方式 付款方式 varchar 20 是 表 3 “客房信息”表的設計 簡稱 列名 數(shù)據(jù)類型 長度 是否允許空 備注 客房編號 客房編號 varchar 12 PK 類型編號 類型編號 varchar 4 樓層編號 樓層編號 Int 4 額定人數(shù) 額定人數(shù) int 4 是 床數(shù) 床數(shù) int 4 是 客房描述 客房描述 varchar 40 是 備注 備注 varchar 100 是 狀態(tài) 狀態(tài) varchar 4 是 是否可拼房 是否可拼房 bit 1 是 表 4 “客房類型”表的設計： 簡稱 列名 數(shù)據(jù)類型 長度 是否允許空 備注 類型編號 類型編號 varchar 4 PK 類型名稱 類型名稱 varchar 40 是 價格 價格 money 8 是 拼房價格 拼房價格 money 8 是 可超預定數(shù) 可超預定數(shù) decimal 5 是 是否可拼房 是否可拼房 bit 1 是 表 5 “帳單明細”表的設計： 簡稱 列名 數(shù)據(jù)類型 長度 是否允許空 備注 帳單編號 帳單編號 int 4 PK 入住單號 入住單號 varchar 36 消費內容 消費內容 varchar 40 是 消費金額 消費金額 money 8 是 消費時間 消費時間 smalldatetime 4 是 備注 備注 bit 80 是 表 6 “帳單明細歷史”表的設計： 簡稱 列名 數(shù)據(jù)類型 長度 是否允許空 備注 帳單編號 帳單編號 int 4 PK 入住單號 入住單號 varchar 36 消費內容 消費內容 varchar 40 是 消費金額 消費金額 money 8 是 第 9 頁 共 24 頁 消費時間 消費時間 smalldatetime 4 是 備注 備注 bit 80 是 表 7 “用戶清單”表的設計： 簡稱 列名 數(shù)據(jù)類型 長度 是否允許空 備注 用戶編號 用戶編號 char 6 PK 部門 部門 char 20 姓名 姓名 char 10 性別 性別 char 2 密碼 密碼 chair 10 是 表 8 “樓層信息”表的設計： 簡稱 列名 數(shù)據(jù)類型 長度 是否允許空 備注 樓層編號 樓層編號 int 4 PK 樓層名稱 樓層名稱 varchar 6 是 表 9 “預定表”的設計 : 簡稱 列名 數(shù)據(jù)類型 長度 是否允許空 備注 預定單號 預定單號 varchar 36 PK 會員編號 會員編號 Int 4 是 客房類型 客房類型 varchar 4 抵店時間 抵店時間 smalldatetime 4 離店時間 離店時間 smalldatetime 4 是 單據(jù)狀態(tài) 單據(jù)狀態(tài) varchar 20 是 入住人數(shù) 入住人數(shù) int 4 是 客房編號 客房編號 varchar 12 是 客房價格 客房價格 money 8 是 入住價格 入住價格 money 8 是 折扣 折扣 decimal 5 是 折扣原因 折扣原因 varchar 60 是 是否加床 是否加床 bit 1 是 加床價格 加床價格 money 8 是 預收款 預收款 money 8 是 預定人 預定人 varchar 20 是 預定公司 預定公司 varchar 60 是 聯(lián)系電話 聯(lián)系電話 varchar 40 是 備注 備注 varchar 510 是 第 10 頁 共 24 頁 操作員 操作員 varchar 10 是 業(yè)務員 業(yè)務員 varchar 50 是 表 10 “預定單歷史”表的設計： 簡稱 列名 數(shù)據(jù)類型 長度 是否允許空 備注 預定單號 預定單號 varchar 36 PK 會員編號 會員編號 Int 4 是 客房類型 客房類型 varchar 4 抵店時間 抵店時間 smalldatetime 4 離店時間 離店時間 smalldatetime 4 是 單據(jù)狀態(tài) 單據(jù)狀態(tài) varchar 20 是 入住人數(shù) 入住人數(shù) int 4 是 客房編號 客房編號 varchar 12 是 客房價格 客房價格 money 8 是 入住價格 入住價格 money 8 是 折扣 折扣 decimal 5 是 折扣原因 折扣原因 varchar 60 是 是否加床 是否加床 bit 1 是 加床價格 加床價格 money 8 是 預收款 預收款 money 8 是 預定人 預定人 varchar 20 是 預定公司 預定公司 varchar 60 是 聯(lián)系電話 聯(lián)系電話 varchar 40 是 備注 備注 varchar 510 是 操作員 操作員 varchar 10 是 業(yè)務員 業(yè)務員 varchar 50 是 酒店管理系統(tǒng) ER 圖 在該系統(tǒng)中，“客房信息”起到關鍵的作用，“客房信息”和其他表間的關系是 1:N 的關系。圖 2 為酒店管理系統(tǒng)關鍵實體 ER 圖。 第 11 頁 共 24 頁 圖 2 酒店管理系統(tǒng)關鍵實體 ER圖 4 具體 模塊設計 客房 信息設置 該模塊主要是對客房信息根據(jù)實際進行管理。在客房信息中，可設置 客房編號、類型編 號、樓層編號、額定人數(shù)、床數(shù)、狀態(tài)、是否可拼房、客房描述以及備注。 可根據(jù)需要添加、刪除、修改和搜索客房信息。 圖 3 新增客 房界面圖 第 12 頁 共 24 頁 圖 3 為新增一個編號為 061類型編號為普通房、樓層編號為六樓、額定人數(shù)為 2 人、床數(shù)為 2 床、客房描述為“木地板磚，窗戶外有花園”、備注為“電話尚未安裝”的房間的界面圖。 點擊“保存”按鈕，保存新增客房信息，點擊“取消”按鈕，取消保存新增客房信息。如圖 4 所示： 圖 4 “保存”或“取消”新增客房信息 其“添加”功能代碼如下： Public Overrides Sub SaveForAdd() Dim dr As DataRow = (客房信息 ).NewRow() Try dr(客房編號 ) = dr(類型編號 ) = dr(樓層編號 ) = dr(額定人數(shù) ) = dr(床數(shù) ) = dr(客房描述 ) = dr(狀態(tài) ) = dr(備注 ) = dr(是否可拼房 ) = Catch ex As Exception (數(shù)據(jù)格式不正確！ ) Exit Sub End Try Try (客房信息 ).(dr) If = True Then (DataSet11) End If Catch ex As Exception (數(shù)據(jù)添加失敗 !) End Try LoadData() 第 13 頁 共 24 頁 = End Sub 在“添加”客房信息中，其狀態(tài)默認設置為“空房”。 如需刪除一個房間，則用鼠標點中該房間編號，點擊“刪除”，彈出確認對話框，選擇“確定”即可刪除該房間信息。圖 5 為刪除客房編號為 0307 房間示例圖： 圖 5 刪除 客房編號為 0307的 房間示例圖 其“刪除”功能代碼如下： Public Overrides Sub DeleteData() Try 39。刪除當前行的數(shù)據(jù) (客房信息 ). _ Rows().Delete() If = True Then 39。更新 DataSet11 (DataSet11) End If Catch ex As Exception (數(shù)據(jù)刪除失敗 !) End Try End Sub 如果要修改一個房間的信息，選中該房間的客房編號，點擊“修改”按鈕，即可根據(jù)實際進行相應需要修改信息的修改。圖 6 為修改客房編號為 0301 的房間的示例圖，假設需要把“額定人數(shù)”由 5 人改為 2 人。 第 14 頁 共 24 頁 圖 6 修改客房編號為 0301房間信息的示例圖 “修改”功能代碼 Public Overrides Sub SaveForUpdate() Try Dim row As Integer row = = _ New DataGridCell((row + 1) Mod , 0) 39。判斷是否有更新的數(shù)據(jù) If = True Then (DataSet11) End If Catch ex As Exception (數(shù)據(jù)修改失敗 !) End Try End Sub “客房信息設置” 模塊界面如圖 7： 第 15 頁 共 24 頁 圖 7 客房信息設置界面圖 預定 管理功能 該功能模塊實現(xiàn)客人的預定管理。能根據(jù)實現(xiàn)進行添加、修改、刪除、搜索預定客房信息。如需要新增一個客人預定，點擊“新增”按鈕，在下面填入相應的入住信息。預定單號自動遞增生成。 圖 8 新增客房預定界