【正文】 管理系統(tǒng)設(shè)計(jì)與實(shí)現(xiàn) 一、系統(tǒng)概述 1. 開(kāi)發(fā)背景 由于傳統(tǒng)的手工管理一直沒(méi)有得到較好的改善，人員的登記、住宿流動(dòng)人口的加大，效益的統(tǒng)計(jì)，房號(hào)的查詢?cè)谡麄€(gè)工作占了很大的工作量，手工文件管理過(guò)程中，存在不少弊端： （ 1）出現(xiàn)不必要的重復(fù)勞動(dòng)，造成人力資源及時(shí)間上 的浪費(fèi)； （ 2）文件的丟失帶來(lái)不必要的麻煩； （ 3）住宿人口的變化，查詢不便； （ 4）房號(hào)，價(jià)格容易出現(xiàn)錯(cuò)誤現(xiàn)象，引起不必要的麻煩。 顯然，今天的 酒店與過(guò)去的旅館相比已經(jīng)有了很大的不同。 。 。 26 。 25 。 。 。 10 。 。 6 分析 。 。 。 。 2 2. 開(kāi)發(fā)工具介紹 。 5 二、需求分析 。 6 。 10 。 。 。 28 致 謝 。 但是隨著社會(huì)化大生產(chǎn)的不斷擴(kuò)大和社會(huì)對(duì)產(chǎn)品多樣化的需求，人們?cè)絹?lái)越重視信息在生產(chǎn)經(jīng)營(yíng)及 酒店 管理中的作用，并把它當(dāng)做 酒店的一種極其重要的資源。因此根據(jù)酒店 目前實(shí)際的酒店 客房管理情況開(kāi)發(fā)一套 酒店 客房管理系統(tǒng)是十分必要的。傳統(tǒng)管理系統(tǒng)方面的應(yīng)用局限于人工的記錄，不僅麻煩有時(shí)還出現(xiàn)錯(cuò)誤，丟失重要的文件和信息等等。通過(guò)操作手冊(cè)，使用者可以了解本軟件的基本工作原理。因此，中文的酒店客房管理在國(guó)內(nèi)的需求應(yīng)該很大，很有發(fā)展空間。 VB就是要便于程序員 使用 ， 無(wú)論是新手或者專家。這些都是 VB 的特點(diǎn) 。 Access 是一種關(guān)系型數(shù)據(jù)庫(kù)管理系統(tǒng)，其主要特點(diǎn)如下： （ a）存儲(chǔ)方式單一 Access 管 理的對(duì)象有表、查詢、窗體、報(bào)表、頁(yè)、宏和模塊，以上對(duì)象都存放在數(shù)據(jù)庫(kù)文件 中 ，便于用戶的操作和管理。 Access 是一個(gè)數(shù)據(jù)庫(kù)管理系統(tǒng)，它之所以被集成到 Office 中而不是Visual Studio 中，是因?yàn)樗c其它的數(shù)據(jù)庫(kù)管理系統(tǒng)（如 SQL Server 2021）相比更加簡(jiǎn)單易學(xué)，一個(gè)普通的計(jì)算機(jī)用戶即可掌握并使用它。 Visual Basic 具有可視化的開(kāi)發(fā)環(huán)境，可以快速完成系統(tǒng)的開(kāi)發(fā)，內(nèi)部集成的數(shù)據(jù)庫(kù)訪問(wèn)通道，使得可以輕松方便的對(duì)數(shù)據(jù)庫(kù)管理。以上問(wèn)題可通過(guò)電腦系統(tǒng)輔助解決，酒店客房管理的電腦化，不僅是體現(xiàn)酒店現(xiàn)代化形象的一個(gè)重要標(biāo)志 ，而且對(duì)于提高員工工作效率，加速資金周轉(zhuǎn)、降低各項(xiàng)成本及改善服務(wù)質(zhì)量都有十分積極的作用。 （ 1）操作 上的可行性 在傳統(tǒng)的酒店客房管理中，管理人員不得不花費(fèi)大量的時(shí)間來(lái)處理顧客 投訴，例如錯(cuò)誤查詢、煩瑣的登記和結(jié)帳手續(xù)、旅客費(fèi)用計(jì)算錯(cuò)誤、空余客房資料不能及時(shí)提供等，從而影響酒店的經(jīng)濟(jì)效益。管理和維護(hù)比較簡(jiǎn)單，除了必要的設(shè)備投資外，后期只需少量資金就可確保運(yùn)轉(zhuǎn)。主要完成功能： （ 1）客房管理：管理員可 以通過(guò)對(duì)客房信息的查詢，實(shí)現(xiàn)查看和登記 、修改 房間的編號(hào) 、 房間面積 、床位數(shù)量、客房種類、客房位置、房間空閑信息的功能。 （ 4）結(jié)算信息，包括的數(shù)據(jù)項(xiàng)有：訂房編號(hào)、客房編號(hào)、客房種類、客房備注信息、顧客姓名、顧客身份證號(hào)碼、入住時(shí)間、折扣、結(jié)算時(shí)間、備注等。 (1)數(shù)據(jù)庫(kù) 的安全性，一致性和完整性 安全性：數(shù)據(jù)庫(kù)的安全性是指保護(hù)數(shù)據(jù)庫(kù)以防止不合法的的使用所造成的數(shù)據(jù)泄露，更改或破壞。 （ 2）數(shù)據(jù)庫(kù)的概念結(jié)構(gòu)設(shè)計(jì) 本系統(tǒng)根據(jù)以上的設(shè)計(jì)規(guī)劃出的實(shí)體有：客房標(biāo)準(zhǔn)信息實(shí)體、客房信息實(shí)體、訂房信息實(shí)體、結(jié)算信息實(shí)體。 \ = amp。 39。自動(dòng)識(shí)別數(shù)據(jù)庫(kù)路徑 End Sub Private Sub Form_Unload(Cancel As Integer) = True End Sub Private Sub Combo1_KeyDown(KeyCode As Integer, Shift As Integer) If KeyCode = vbKeyReturn Then 39。按回車鍵 Texsz獲得焦點(diǎn) End Sub Private Sub texsz_KeyDown(KeyCode As Integer, Shift As Integer) If KeyCode = vbKeyReturn Then End Sub Private Sub texpz_KeyDown(KeyCode As Integer, Shift As Integer) If KeyCode = vbKeyReturn Then End Sub Private Sub texbz_KeyDown(KeyCode As Integer, Shift As Integer) If KeyCode = vbKeyReturn Then End Sub Private Sub dj_Click() 39。取消操作 = : = : = = : = = False: = False: = True End Sub Private Sub end_Click() = True Unload Me End Sub 本模塊是主要是對(duì)客人模塊的資料進(jìn)行操作，本模塊需要記錄客人的姓名，身份證號(hào)碼，房間號(hào)，登記日期等等資料，若發(fā)現(xiàn)錯(cuò)漏，可以進(jìn)行添加及修改等功能。, , adSearchForward, 1 If Not .EOF Then 39。刪除客房信息 If 0 Then End If End Sub Private Sub Command3_Click() = True Unload Me End Sub （ 2）報(bào)表輸出信息模塊 本模塊主要是把所有房間的情況，通過(guò)報(bào)表輸出信息功能方 便及時(shí)匯報(bào)酒店的情況，將圖 14 的房間基本情況表進(jìn)行輸出打印，主要是用于跟上級(jí)及時(shí)匯報(bào)情況。設(shè)置屬性 .Caption = 房間基本情況表 39。 本系統(tǒng)經(jīng)編制調(diào)測(cè)后可以正常運(yùn)行，經(jīng)酒店客房管理專業(yè)人員批量錄入試驗(yàn)數(shù)據(jù)，系統(tǒng)設(shè)計(jì)的各功能模塊能夠完成預(yù)期的效果。 單元測(cè)試集中檢驗(yàn)軟件設(shè)計(jì)的最小單元 —— 模塊。 在本系統(tǒng)的開(kāi)發(fā)過(guò)程中，由于本人是初次開(kāi)發(fā)軟件，在知識(shí)、經(jīng)驗(yàn)方面都存在著不足。 （ 2）高效的客房管理：能有效的提高房率，增加營(yíng)業(yè)收入。在這里我要感謝所有曾給予我指導(dǎo)和幫助的學(xué)院的老師們，沒(méi)有你們不厭其煩的教誨，就沒(méi)有我的今天。 Then the voices of the Ainur, like unto harps and lutes, and pipes and trumpets, and viols and ans, and like unto countless choirs singing with words, began to fashion the theme of Il 鷙 atar to a great music。 and it had little harmony, but rather a clamorous unison as of many trumpets braying upon a few notes. And it essayed to drown the other music by the violence of its voice, but it seemed that its most triumphant notes were taken by the other and woven into its own solemn pattern. In the midst of this strife, whereat the halls of I l 鷙 atar shook and a tremor ran out into the silences yet unmoved, Il 鷙 atar arose a third time, and his face was terrible to behold. Then he raised up both his hands, and in one chord, deeper than the Abyss, higher than the Firmament, piercing as the light of the eye of Il 鷙 atar, the Music ceased. Then Il 鷙 atar spoke, and he said: 39。 and he lifted up his left hand, and a new theme began amid the storm, like and yet unlike to the former theme, and it gathered power and had new beauty. But the discord of Melkor rose in uproar and contended with it, and again there was a war of sound more violent than before, until many of the Ainur were dismayed and sang no longer, and Melkor had the mastery. Then again Il 鷙 atar arose, and the Ainur perceived that his countenance was stern。 and they sang before him, and he was glad. But for a long while they sang only each alone, or but few together, while the rest hearkened。 （ 6）樹(shù)立良好的酒店形象。在系統(tǒng)功能上，還有許多細(xì)節(jié)問(wèn)題沒(méi)有考慮 周到。一種方法是先分別測(cè)試每個(gè)模塊，再把所有模塊按設(shè)計(jì)要求放在一起結(jié)合成所要的程序，這種方法成為非漸增式測(cè)試方法；另一種方法是把下一個(gè)要測(cè)試的模塊同已經(jīng)測(cè)試好的那些模塊結(jié)合起來(lái)進(jìn)行測(cè)試，測(cè)試完以后再把下一個(gè)應(yīng)該測(cè)試的模塊結(jié)合起來(lái)測(cè)試。模塊相互間的直轄市和通信是這個(gè)測(cè)試過(guò)程中的主要問(wèn)題，因此這個(gè)步驟著重測(cè)試模塊的接口。 五、系統(tǒng)測(cè)試 軟件的測(cè)試是為了發(fā)現(xiàn)程序中的錯(cuò)誤而執(zhí)行程序的過(guò)程。 39。 圖 13 客房查詢 主要代碼如下所示： Private Sub Form_Load() 39。顯示為模式窗體 .Show vbModal End With End Sub Private Sub cmdDelete_Click() If True And True Then With If MsgBox( 確 認(rèn) 要 刪 除 當(dāng) 前 記 錄 嗎 ？ , vbYesNo + vbQuestion + vbDefaultButton2, 確認(rèn)框 ) = vbYes Then .Find RoomNo=39。更新記錄 Else 39。 39。 圖 9 系統(tǒng)主界面 本功能模塊可以查看并修改客房的信息資料，可以對(duì)客房的編號(hào)，房間類型，房間價(jià)格，是否有人住等信息進(jìn)行隨時(shí)更新。按回車鍵 cmd1獲得焦點(diǎn) If KeyCode = vbKeyUp Then If KeyCode = vbKeyDown Then End Sub Private Sub cmd1_Click() (4).Text = 賦值給 (4).Text39。 圖 8 登錄界面圖 主要代碼如下所示： Dim TIM As Integer 39。 完整性： 數(shù)據(jù)庫(kù)的完整性是指數(shù)據(jù)的正確性和相容性，這是數(shù)據(jù)庫(kù)理論中的重要概念。管理人員可 以根據(jù)房間號(hào)、房間級(jí)別、房間類型、房間狀態(tài)對(duì)客戶信息進(jìn)行查詢，查詢到 的信息包括房間號(hào)、房間級(jí)別、房間類型、房間狀態(tài)這是客房信息查詢 。 用戶的需求具體體現(xiàn)在各種信息的提供、保存、更新和查詢等方面，這就要求數(shù)據(jù)庫(kù)結(jié)