【正文】 = False Then If 0 Then 39。更新記錄 If 0 Then (標志) = 0 39。% + + %39。在安全性的實現(xiàn)中詳細介紹了用戶必須執(zhí)行的步驟，以達到安全效果。表52 添加操作員測試表步驟測試描述說明預期結(jié)果實際結(jié)果1已存在用戶名提示此賬戶已存在，請重新輸入測試結(jié)果：通過2無效密碼提示密碼無效，重新輸入密碼測試結(jié)果：通過3有效用戶名和密碼添加成功測試結(jié)果：通過 （2）測試界面如圖51和圖52所示。表56 退宿結(jié)賬測試表步驟測試描述說明預期結(jié)果實際結(jié)果1退房操作 能夠正常退房測試結(jié)果：通過2退房查詢 能夠顯示退房信息測試結(jié)果：通過 （2）測試界面如圖59和圖510所示。 小結(jié)系統(tǒng)測試并沒有列舉所有功能模塊對應的測試用例，只取了極個別的測試用例，初步測試了系統(tǒng)的功能，測試結(jié)果顯示對應的模塊功能在測試用例顯示下基本能正常運行。首先是軟件的編程問題，由于之前對VB并不是很了解，所以在畢設(shè)期間看多很多相關(guān)視頻和書籍，現(xiàn)在基本掌握了常用控件的用法和語句編程。不僅如此，這一作風對于我以后的工作生活都有很大的借鑒價值，再次衷心地感謝她耐心的指導與鼓勵！同時還要感謝幫助過我的同學們，在我遇到問題的時候積極幫助我，提出很多實質(zhì)性的建議，對我論文的完成有了很大的促進作用。嚴謹、認真、負責的工作態(tài)度給我留下了深刻的印象。（4）最后，對系統(tǒng)進行測試維護。 （3）本系統(tǒng)的維護模塊。表55 查詢管理測試表步驟測試描述說明預期結(jié)果實際結(jié)果1輸入查詢條件 能夠顯示住宿信息測試結(jié)果：通過 （2）測試界面如圖58所示。 測試序號表如表51所示。調(diào)用模塊中的自定義函數(shù) End If Next Counter End IfMsgBox 初始化完成!, vbInformation, 系統(tǒng)提示End Sub 本章小結(jié)本章詳細的介紹了系統(tǒng)中主要功能模塊的實現(xiàn)過程，包括界面實現(xiàn)、數(shù)據(jù)庫實現(xiàn)、主要功能模塊以及安全性的實現(xiàn)。圖410 住宿查詢界面住宿查詢主要功能代碼如下：Private Sub Command1_Click() 39。保存退宿信息 If And Then Call Main 39。 39。更新記錄 = select * from tb_kf where 房態(tài)=39。刷新記錄 (房態(tài)) = 入住 39。 39。 Set = End Sub 調(diào)房登記模塊的實現(xiàn)在系統(tǒng)主界面中單擊[住宿管理]按鈕，然后選擇[調(diào)房登記]彈出調(diào)房登記界面如圖47所示。為操作員設(shè)置權(quán)限If Then = select * from tb_qxsz where 操作員=39。 39。每個Field對象對應于Record set中的一列。如果三次登陸都出錯，系統(tǒng)自動退出。一般的原則是：簡潔、美觀、表達力強、可讀性好，同時整體上統(tǒng)一。表31 用戶信息表字段名稱類型大小說明操作員nvarchar (10)操作員密碼nvarchar (50)用戶密碼 （2）退房表用來記錄退房信息，其包括憑證號碼、姓名、證件號碼、證件名稱、詳細地址、工作單位、房間號、客房類型、客房價格、住宿日期、住宿時間、住宿天數(shù)、宿費、應收宿費、金額總計、預收宿費、退還宿費、退房日期、退房時間和一些備注信息等，系統(tǒng)退房信息表如表32所示。N 圖33 入住管理系統(tǒng)流程圖 數(shù)據(jù)庫設(shè)計數(shù)據(jù)庫設(shè)計主要是進行數(shù)據(jù)庫的邏輯設(shè)計，設(shè)計出規(guī)模適當、正確反映數(shù)據(jù)關(guān)系、數(shù)據(jù)冗余少、存取效率高、能滿足多種查詢要求的數(shù)據(jù)模型，數(shù)據(jù)庫的設(shè)計至關(guān)重要，系統(tǒng)功能的強大與否最初的數(shù)據(jù)庫設(shè)計起著關(guān)鍵性意義。 （2）客房管理模塊：該模塊主要是對客房信息進行設(shè)置，可以添加客房、刪除客房、修改原有房間信息。 小結(jié)本章通過對系統(tǒng)進行需求分析，了解到賓館客房管理系統(tǒng)的未來發(fā)展是有著管擴前景。Visual Basic最大的兩個特點是“可視化”和“事件驅(qū)動”。系統(tǒng)0層數(shù)據(jù)流圖如圖26所示。圖23 權(quán)限設(shè)置實體圖 （4）用戶信息與退房信息。對賓館客房信息進行管理，設(shè)置客房房間號、類型、價格等信息。 （2）系統(tǒng)功能分析如下：住宿管理功能：來客首先登記入住信息，住宿期間可以進行調(diào)房、追加押金操作，離店辦理退宿結(jié)賬。 （3）經(jīng)濟可行性一個使用性較強的系統(tǒng)，要求開發(fā)成本低，對計算機配置的要求也不是過高使得系統(tǒng)工作在一個較為合適的環(huán)境中。使軟件的設(shè)計盡量達到人力與設(shè)備費用的節(jié)省，并且使軟件處理數(shù)據(jù)的速度提高，軟件的整個設(shè)計過程必須通過生產(chǎn)能力的提高，人員工作效率的提高等等使軟件開發(fā)成本最小化。賓館客房管理系統(tǒng)能給企業(yè)決策者和管理者提供全方位的操作流程和實時的信息查詢，為企業(yè)提供一個全面的信息化平臺，提高工作效率，提高效益[1]。賓館客房管理系統(tǒng)屬于信息管理系統(tǒng)，其開發(fā)主要包括后臺數(shù)據(jù)庫的建立和維護以及前臺應用程序的開發(fā)兩個方面。系統(tǒng)主要完成對客房住宿、信息查詢的管理，其中添加、修改、刪除，查詢，打印信息以及用戶管理等方面也是主要的。 論文結(jié)構(gòu)本論文重點介紹了賓館客房管理系統(tǒng)的實現(xiàn)過程：包括系統(tǒng)分析、功能設(shè)計、系統(tǒng)設(shè)計、系統(tǒng)實現(xiàn)及測試，也給出了重要功能的代碼實現(xiàn)，全文共分五章。Visual Basic 6在界面設(shè)計、數(shù)據(jù)訪問等方面都提供了功能強大的工具，可方便地進行可視化應用程序設(shè)計。 系統(tǒng)功能分析作為計算機應用的一部分，使用計算機對客房進行管理，有著比手工管理所無法比擬的優(yōu)點，如：檢索迅速、保密性好、成本低等。報表統(tǒng)計功能：統(tǒng)計一段時間的客房營業(yè)值，進行客房銷售統(tǒng)計查看。 圖21客房信息實體圖 （2）登記信息。圖24 用戶信息與退房信息ER圖 （5）系統(tǒng)ER圖說明：管理員可以進行整個系統(tǒng)的操作，前臺人員只有部分權(quán)限（如不能進行權(quán)限設(shè)置、客房管理等），一間房間可以在狀態(tài)為空房時進行多次入住登記，登記后對應一張登記預收報表，調(diào)房與登記類似，但是退房關(guān)系是一間房對應一張退房表。經(jīng)分析確認，系統(tǒng)的參與者主要是管理員（Admin）或前臺人員(User)[12]。 SQL語言SQL(Structured Query Language，結(jié)構(gòu)查詢語言)是一個功能強大的數(shù)據(jù)庫語言。在系統(tǒng)設(shè)計階段，將在需求分析的基礎(chǔ)上對系統(tǒng)的技術(shù)、邏輯、功能、數(shù)據(jù)、安全等方面做出概要設(shè)計。 （5）系統(tǒng)設(shè)置模塊：該模塊對系統(tǒng)安全有很大保障，操作員設(shè)置、密碼修改、權(quán)限設(shè)置、系統(tǒng)初始化等，其中前臺人員只有部分權(quán)限（如不能進行系統(tǒng)設(shè)置與客房管理等）的操作。 （3）數(shù)據(jù)使用權(quán)限設(shè)置：針對用戶的不同使用要求，確定數(shù)據(jù)的用戶使用權(quán)限，確保數(shù)據(jù)安全。表34客房信息表字段名稱類型大小說明房間號nvarchar（30）房間類型nvarchar（30）價格 money（8）房態(tài)nvarchar（30）房間狀態(tài)標志bit（1）1表示入住使用設(shè)置nvarchar（100）營業(yè)日期datetime（8）（5）登記預設(shè)表用來記錄登記住宿預收的信息，登記預收表如表35所示。首先登錄系統(tǒng)，一個好的界面，能提高軟件的親和力。以下是本程序中用到的對象：Connection對象：通過“連接”可從應用程序訪問數(shù)據(jù)源，連接是交換數(shù)據(jù)所必需的環(huán)境。是本系統(tǒng)的核心。 amp。 39。 amp。 amp。 amp。刷新記錄 MsgBox 調(diào)房成功 End If Else MsgBox 請選擇正確房間號,再保存!!!, , 系統(tǒng)提示 39。如果記錄數(shù)大于0 Call Main (預收金額) = Val() + Val() (提醒日期) = (提醒時間) = 39。更新記錄 End If = select * from tb_kf where 房間號=39。 (8) = 0 (20) = 0 (24) = 0 (