【文章內(nèi)容簡介】 0 客人 姓名 文本 50 標準價 文本 20 折后價 文本 20 押金 文本 20 類別 文本 50 證件名稱 文本 10 證件號碼 文本 20 證件地址 文本 8 從何處來 文本 8 到何處去 文本 8 住宿原因 文本 8 操作員 文本 8 入住日期 日期 /時間 8 入住時間 日期 /時間 8 店內(nèi)消費 文本 8 餐費 文本 50 話費 文本 8 表 42 登記表 2．客房基礎(chǔ)信息表 kf 客房基礎(chǔ)信息表 kf 用來保存客房的基礎(chǔ)信息。 字段名稱 數(shù)據(jù)類型 字段大小 房間號 文本 30 房間類型 文本 50 價格 貨幣 8 房態(tài) 文本 4 容納人數(shù) 文本 100 樓層 文本 100 表 44 客房基礎(chǔ)信息表 3．客房預定表 kfyd 畢業(yè)論文 14 客房預定表 kfyd 用來保存客人預定客房的登記信息。 字段名稱 數(shù)據(jù)類型 字段大小 房號 文本 50 姓名 文本 20 類別 文本 30 標準價 文本 100 身份證號碼 文本 50 押金 文本 10 聯(lián)系電話 文本 10 操作員 文本 8 摘要 文本 10 表 45 客房預定表 4．權(quán)限設(shè)置表 qxsz 權(quán)限設(shè)置表 qxsz 用來保存操作員的權(quán)限。 字段名稱 數(shù)據(jù)類型 字段大小 編號 文本 50 操作員 文本 50 密 碼 數(shù)字 雙精度 角色名稱 是 /否 1 5 系統(tǒng)環(huán)境與軟件安裝 硬件環(huán)境要求 為運行本例，計算機的硬件應(yīng)滿足如下條件： 486DX/66MHz 或更高的處理器（推薦 Pentium 或更高的處理器），或任何運行于 MicrosoftWindowsNTWorkstation 的 Alpha 處理器。 MicrosoftWindows 支持的 VGA 或分辨率更高的監(jiān)視器。 16MB 內(nèi)存以上。 鼠標或其他定點設(shè)備。 畢業(yè)論文 15 軟件環(huán)境要求 本系統(tǒng)是在 MicrosoftWindowsXP下開發(fā)的，所采用的開發(fā) 工具是 Microsoft公司的 企業(yè)版。推薦桌面顯示方式為 1024X768 像素。 軟件安裝 Microsoft 公司的 企業(yè)版。 “ 酒店 管理系統(tǒng) ” 文件夾，將其中的 “ 酒店管理系統(tǒng) ” 文件夾復制到機器內(nèi)，并去掉所有文件的只讀屬性。 。打開 ,運行 “ 酒店管理系統(tǒng) ” 下的 “ 酒店管理系統(tǒng) .VBP工程，或執(zhí)行 “ 酒店管理系統(tǒng) .EXE” 文件。 6 酒店管理系統(tǒng)的詳細設(shè)計 主 界面設(shè)計 主程序界面如圖 61所示 畢業(yè)論文 16 圖 61主程序界面 實現(xiàn)目標 程序啟動后，在系統(tǒng)登錄界面驗證完操作員及操作員密碼后，將進入主程序界面。主程序界面主要實現(xiàn)如下功能： ，調(diào)用相應(yīng)程序，進行相應(yīng)操作。 ，確定操作員的相應(yīng)權(quán)限。 、公司網(wǎng)址和操作員。 實現(xiàn)過程 ，命名為 “ 客房管理系統(tǒng) ” ，在該工程中會自動創(chuàng)建一個新窗體，將該窗體命名為 main. “ 工程 ” 菜單下的 “ 部件 ” 選項， 在彈出的列表中，選定MicrosoftWindows 選項，然后單擊 “ 確定 ” 按鈕，StatusBar 控件將被添加到工具箱中。 1 個 StatusBar 控件，用鼠標右鍵單擊 StatusBar 控件，在彈出菜單中選擇 “ 屬性 ” 。在屬性頁中，單擊 “ 窗格 ” 選項卡，設(shè)置 4個窗格。設(shè)置索引為 1 的窗格的樣式為 6sbrDate；設(shè)置索引為 2 的窗格的樣式為 畢業(yè)論文 17 5sbrTime ；設(shè)置索引為 3 的窗格的樣式為 0sbrtext, 并輸入文本“ om” ；設(shè)置索引為 4的窗格的樣式為 0sbrtexto4)單擊 “ 工具 ” 菜單下的 “ 菜單編輯器 ” ，在菜單編輯器中設(shè)置程序的菜單。 系統(tǒng)登錄模塊設(shè)計 實現(xiàn)目標 程序啟動后，首先進入系統(tǒng)登錄界面驗證操作員及密碼。在系統(tǒng)登錄模塊中主要實現(xiàn)如下功能： 可選擇操作員，支持鼠標和鍵盤操作。 操作員和密碼驗證成功后，進入主界面。 操作員錯誤或密碼錯誤提醒并返回錯誤點。 輸入三次錯誤的密碼，自動退出系統(tǒng)。 系統(tǒng)登錄界面如圖 62 所示 圖 62 登錄界面 實現(xiàn)過程 “ 客房管理系統(tǒng) ” 工程中，添加一個新窗體，命名為 maIn－ nllma。 “ 工程 ” 菜單下的 “ 部件 ” 選項，在彈出的列表中，選定“MicrosoftDat BoundListControl6 ． 0” 選項，然后單擊 “ 確定 ” 按鈕， DBCombo控件將被添加到工具箱中。 2 個 Data 控件、 1個 DBC0mbo 控件、 2 個 Label 控件、 1個Text 控件、 2 個 Conunand 控件。 畢業(yè)論文 18 住宿管理設(shè)計 住宿登記模塊設(shè)計 實現(xiàn)目標 程序啟動后，選擇 “ 住宿管理 ” 菜單下的 “ 住宿登記 ” 項，將進入住宿登記模塊。在 住宿登記模塊中主要實現(xiàn)如下功能： 自動生成住宿登記憑證號碼。 提供空閑房間供用戶選擇。 實現(xiàn)客人住宿登記，收取客人預交宿費。 自動計算折前宿費、實際宿費、宿費提醒時間、退宿時間。 打印住宿登記單據(jù)。 住宿登記界面如圖 63 所示。 圖 63 住宿登記界面 2．實現(xiàn)過程 （ l） 在 “ 客房管理系統(tǒng) ” 工程中，添加一個新窗體，命名為 main_kfdj。 （ 2）程序代碼： Private Sub ZSDJ_Change(Index As Integer) Select Case Index Case 6 ZSDJ(7).Text=Format(Val(ZSDJ(6).Text)*Val(ZSDJ(5).Text), 畢業(yè)論文 19 ) 39。計算折前宿費 ZSDJ(9).Text = ZSDJ(7).Text 39。賦值給 ZSDJ(9) ZSDJ(8).Text = 100 = + Val(ZSDJ(6).Text) 39。計算退宿日期 Case 8 ZSDJ(9).Text=Format(Val(ZSDJ(7).Text) * Val(ZSDJ(8).Text) / 100, ) 39。計算實際宿費 Case 10 If ZSDJ(10).Text Then ZSDJ(10).Text = Val(ZSDJ(10).Text) 39。用 val 函數(shù)將字符串轉(zhuǎn)換為數(shù)字 =+Int(Val(ZSDJ(10).Text)/ If (Val(ZSDJ(10).Text) Int(Val(ZSDJ(10).Text) / Val(ZSDJ(5).Text))) * Val(ZSDJ(5).Text) Then = 6:00:00 PM Else = 12:00:00 AM End If End If End Select End Sub 追加押金模塊設(shè)計 追加押金界面如圖 64 所示 圖 64 追加押金界面 畢業(yè)論文 20 實現(xiàn)目標 程序啟動后，選擇 “ 住宿管理 ” 菜單下的 “ 追加押金 ” 項，將進入追加押金模塊。在追加押金模塊中主要實現(xiàn)如下功能： 提供憑證號碼列表供用戶選擇。 收取客人的續(xù)交押金，自動計算宿費提醒日期和宿費提醒時間。 實現(xiàn)過程 “ 客房管理系統(tǒng) ” 工程中，添加一個新窗體，命名為 main_zjyj 3 個 Data 控件、 1個 DBCombo 控件、 6個 DTPicker 控件、 8個 Text 控件、 5個 Command 控件等。 6． 5 調(diào)房登記模塊設(shè)計 實現(xiàn)目標 程序啟動后，選擇 “ 住宿管理 ” 菜單下的 “ 調(diào)房登記 ” 項，將進入調(diào)房登記模塊。在調(diào)房登記模塊中主要實現(xiàn)如下功能： 可以選擇客人住宿房和空閑房。 實現(xiàn)客 戶調(diào)房登記（系統(tǒng)只允許調(diào)換等價客房）。 調(diào)房登記界面如圖 65 所示。 圖 65 調(diào)房登記界面 畢業(yè)論文 21 實現(xiàn)過程 “ 酒店 管理系統(tǒng) ” 工程中，添加一個新窗體，命名為 mainesjdj。 4 個 Data 控件、 2個 DBCombo 控件、 l 個 Combo 控件、 7個Text 控件、 4 個 COnunand 控件等。 調(diào)房的實現(xiàn)方法 由于客人的住宿習慣不同，有些客人會在住宿過程 中要求調(diào)房，例如客人要求換一個朝陽的房間或空調(diào)房等，這就要求 酒店 管理系統(tǒng)有調(diào)房的功能。調(diào)房模塊的思路是：首先查看目標 客房是否空閑，如果空閑，查看目標客房的房價（本系統(tǒng)只允許用戶調(diào)換等價的房間），如果房價與客人原住客房等價，則可確認客人調(diào)房。調(diào)房后，應(yīng)對原客房、目標客房的狀態(tài)進行編輯，再對住宿登記表中的信息進行編輯。 ’ 房間號 Like” ＋ Chr(34)＋ ＋ Chr(34)＋ like“ ＋ Chr(34)＋ ”1” ＋ Chr(34)＋ and 姓名like＋ Chr(34)＋ ＋ ” ＊ ” ＋ Chr(34)＋ and 憑證號碼 like＋Chr(34)＋ ＋ Chr(34)＋ ”” ＜＞ ”“( 房 間 號 )＝Val() ＜＞ ”” （ ” 客房類型 ” ）＝ ＜＞ ””( 客房價格 ” ）＝Val() ＜＞ ”“( 備注 ” ）＝ (標志 ”) ＝ ”1” （ “ 摘要 ” ） =” 由源房 ” ＆ amp。“ 調(diào)到目標房 ”amp。 6． 6 退宿結(jié)賬模塊設(shè)計 實現(xiàn)目標 程序啟動后，選擇 “ 住宿管理 ” 菜單下的 “ 退宿結(jié)賬 ” 項，將進入退宿結(jié)賬模塊。在退宿結(jié)賬模塊中主要實現(xiàn)如下功能： 提供 需結(jié)賬客人的憑證號碼供用戶選擇。 實現(xiàn)現(xiàn)金結(jié)賬、現(xiàn)金打折結(jié)賬、掛賬結(jié)賬等功能。 自動計算住宿費用（宿費、電話費、雜費、會議費、停車費、賠償費等）和 畢業(yè)論文 22 退還費用。 退宿結(jié)賬界面如圖 66 所示。 圖 66 退宿結(jié)賬界面 實現(xiàn)過程 “ 酒店 管理系統(tǒng) ” 工程中，添加一個新窗體，命名為 main_tf. 5 個 Da1La 控件、 4 個 DBCombo 控件、 4 個 DTPieb 沈控件、3個 Colllbo 控件、 21 個 Text 控件、 5個 Co～ and 控件等。 ： 本部分為該系統(tǒng)的關(guān)鍵： 在開發(fā)酒 店 管理系統(tǒng)過程中，從客人入住到客人退宿涉及到 酒店 管理的方方面面，如處理不當，便會給酒店造成很大的損失。 客房宿費的算法 由于每個酒店的管理方法不同，所以宿費算法也有不同，如果采用人工運算既耽誤時間，又容易出現(xiàn)運算錯誤，很容易給酒店和客人造成不必要的麻煩和損失。如果使用程序計算宿費，那么既方便又規(guī)范，同時也避免了運算錯誤。下面是針對酒店管理設(shè)計的宿費運算公式： 宿費＝房價 x 天數(shù) 如果客人退宿結(jié)賬時間在住宿當天，可以按如下算法： 如客人退宿結(jié)賬時間早于 18:00,那么住宿天數(shù)為 天； 如客人退宿結(jié)賬時間超過 18:00,那么住宿天數(shù)為 1 天。 如果客人退宿結(jié)賬時間不在住宿當天，可以按如下算法（定義 A 為天數(shù)）： 畢業(yè)論文 23 如客人退宿結(jié)賬時間在中午 12:00 之前，住宿天數(shù)為（退宿日期一住宿日期）+ 天； 如客人退宿結(jié)賬時間在中午 12:00 之后，住宿天數(shù)為（退宿日期一住宿日期）+1天。 PublicSubJSQ’ 定義計算住宿天數(shù)的函數(shù) ＞ ＞ 11:59:00PMThen ＞ 12:00:00PMThen ＞ 6:00:00PMThen ＝ 一 ＋ 1 Else ＝ 一 ＋ EndIf Flse ＝ 一 EndIf RIeP ＝ 一 EndIf Else ＜ 2:00:00AMThen ＞ 2:00:00AMThen ＞ 12:00:00PMThen ＞ 6:00:00PMThen ＝ 1＋ 1 Else ＝ 1＋ EndIf Else ＝ 1 FnriIf Flan ＝ 1 EndIf EISe Texts． Text＝ l Elldlf Endlf EndSub PublicSubssje（） ’ 定義計算實收金額和退還金額的函數(shù) Texssje． Text＝ Val（ Texzhje． Text）＋ Val（ Texzf． Text）＋ Val（ Texdhf． Text）＋ Val（ Texpef． Tex