基于VB的洗浴中心管理系統(tǒng)設計與實現(xiàn)畢業(yè)論文終稿

PAGEword文檔可自由復制編輯基于VB的洗浴中心管理系統(tǒng)設計與實現(xiàn)學士學位論文作者聲明本人聲明：本人呈交的學位論文是本人在導師指導下取得的研究成果。對前人及其他人員對本文的啟發(fā)和貢獻已在論文中作出了明確的聲明，并表示了謝意。論文中除了特別加以標注和致謝的地方外，不包含其他人和其它機構已經(jīng)發(fā)表或者撰寫過的研究成果。本人同意學校根據(jù)《中華人民共和國學位條例暫行實施辦法》等有關規(guī)定保留本人學位論文并向國家有關部門或資料庫送交論文或者電子版，允許論文被查閱和借閱；本人授權棗莊學院可以將本人學位論文的全部或者部分內(nèi)容編入有關數(shù)據(jù)庫進行檢索，可以采用影印、縮印或者其它復制手段和匯編學位論文（保密論文在解密后應遵守此規(guī)定）。作者簽名：日期：年月日word文檔可自由復制編輯摘要本文論述了洗浴管理信息系統(tǒng)開發(fā)的全過程。從分析洗浴流程的基本情況入手，進行系統(tǒng)的可行性分析，通過分析日常業(yè)務，了解洗浴管理的特點和存在的問題，在此基礎上，進行詳細的系統(tǒng)分析，得出系統(tǒng)功能結構圖，再通過系統(tǒng)設計，系統(tǒng)實施等環(huán)節(jié)，最終開發(fā)出能夠滿足洗浴業(yè)務需要的洗浴管理信息系統(tǒng)。

經(jīng)過實際的需求分析，采用VisualBasic6.0作為開發(fā)工具而開發(fā)出來的洗浴信息管理系統(tǒng)。整個系統(tǒng)從符合操作簡便、界面友好、靈活、實用、安全的要求出發(fā)，該洗浴管理信息系統(tǒng)的功能主要突出服務項目、包房信息、箱包管理以及收銀結賬管理。經(jīng)過實際測試證明，本文所設計的洗浴中心信息管理系統(tǒng)可以用于洗浴信息管理方面的需要。

論文主要介紹了本課題的選題背景，課題來源，所要完成的功能和開發(fā)的全過程。重點的說明了系統(tǒng)設計的重點、設計思想、數(shù)據(jù)庫的設計和系統(tǒng)的解決方案。

【關鍵詞】VisualBasic6.0;SQLServer2000;洗浴管理系統(tǒng);查詢;結算AbstractThispaperdiscussesthemanagementinformationsystembathingtheentireprocess.Fromtheanalysisofthebasicbath,theauthorsconductedthefeasibilityanalysis,analysisofday-to-dayoperations.Bathmanagementtounderstandthecharacteristicsandtheproblemsonthisbasis,detailedsystemsanalysis,Thenthesystemfunctionalstructure,andthroughthesystemdesign,systemimplementation,etc.,eventuallydevelopedtomeettheoperationalrequirementsofthebathbathingmanagementinformationsystems.AftertheactualdemandanalysisusingVisualBasic6.0asdevelopedasbathinginformationmanagementsystemEC.Withtheentiresystemfromthesimple、friendlyinterface、flexible、practicalandsafetyrequirements.TheBathmanagementinformationsystemshighlightthemainfunctionofservices,cabinsinformation,luggagemanagementandtheclosureofthecashregistermanagement.Aftertestresults,Inthispaper,thebathcentermanagementinformationsystemcanbeusedforbathinginformationmanagementneeds.Thisisonthetopicofthewashingthatbackground,thetasksources,tobeaccomplishedbythedevelopmentandfunctionofthewholeprocessNotetheemphasisofthesystemdesignfocus,design,databasedesignandsystemsolutions.【Keywords】VisualBasic6.0;SQLServer2000;bathroommanagementsystem;inquiries;settlementword文檔可自由復制編輯目錄第1章緒論 11.1引言 11.1.1洗浴中心管理系統(tǒng)的研究背景 11.1.2國內(nèi)外研究現(xiàn)狀 11.1.3洗浴中心管理系統(tǒng)的研究目的與意義 21.2論文結構 2第2章系統(tǒng)開發(fā)技術介紹 42.1VisualBasic6.0編程語言 42.1.1VisualBasic6.0的簡介 42.1.2VisualBasic6.0的特點 42.2ADO技術 52.2.1ADO特點概述 52.2.2ADO的對象 62.3SQLServer2000數(shù)據(jù)庫 72.3.1SQLServer2000的簡介 72.3.2SQLServer2000的特性包括 72.4應用平臺配置 8第3章系統(tǒng)總體設計 93.1需求分析 93.1.1用戶需求分析 93.1.2系統(tǒng)概述 93.2系統(tǒng)功能設計 103.3數(shù)據(jù)庫結構設計 103.3.1數(shù)據(jù)庫設計原則 103.3.2洗浴中心管理系統(tǒng)的實體-聯(lián)系模型 113.3.3系統(tǒng)數(shù)據(jù)庫設計 11第4章系統(tǒng)的實現(xiàn) 164.1數(shù)據(jù)庫連接功能 164.2系統(tǒng)登錄窗體和主界面 164.3總臺服務管理 194.4結賬收銀管理 254.5月結算管理 26第5章總結 29參考文獻 30致謝 31word文檔可自由復制編輯第1章緒論1.1引言1.1.1洗浴中心管理系統(tǒng)的研究背景隨著人民生活水平的不斷提高，餐飲、酒吧、洗浴等消費產(chǎn)業(yè)也得到迅猛發(fā)展，但由于洗浴行業(yè)具有服務多樣、價格多變、折扣靈活以及報表復雜等特點，并且隨著消費業(yè)務量的不斷增大，內(nèi)部人員的增加，靠以往手工的管理手段進行管理，已不能適應企業(yè)的發(fā)展。這就迫切需要一個能緊密配合企業(yè)進行數(shù)據(jù)管理、決策分析的現(xiàn)金管理方式，把科學的管理思想、營銷技術全面融入其中，為企業(yè)規(guī)范業(yè)務流程，實現(xiàn)模塊化發(fā)展奠定良好的基礎。信息化管理無疑是最有效的管理手段之一。利用先進的信息技術，可以幫助洗浴企業(yè)拋棄傳統(tǒng)的管理模式，突破制約企業(yè)發(fā)展的瓶頸，使企業(yè)的運營目標具有更強的可操作性，最大限度地實現(xiàn)企業(yè)資源的合理利用，以期達到企業(yè)效率最高化，企業(yè)利潤最大化。通過對多家洗浴企業(yè)進行深入細致的調查和分析，做出的一套標準化的洗浴管理系統(tǒng)。它適用于中、小型洗浴行業(yè)，可以幫助洗浴企業(yè)處理日常工作業(yè)務，規(guī)模管理和操作流程，有效的實現(xiàn)了企業(yè)的現(xiàn)代化管理，全面提升了企業(yè)的市場競爭力和整體形象。1.1.2國內(nèi)外研究現(xiàn)狀隨著人們休閑娛樂需求的提高，洗浴中心的功能的也越來越完善，正朝著同其他公共建筑結合組成建筑群落的方向發(fā)展。如建于公元3世紀的古羅馬卡瑞卡拉浴場就在附近設有演講廳和圖書館以及其他文化休閑場所。就像古羅馬的浴場一樣，隨著時代的發(fā)展，人們需求的變化，洗浴中心也相應的隨著變化而變化。我國百姓的消費有所提高，國門大開，人們接受外來的新事物，閑暇時間的增加使人們開始考慮休閑生活的意義和質量。同時在我國市場需求多樣化、個性化和時尚化的推動下，作為休閑娛樂建筑的一種——洗浴建筑，應時代要求誕生了。一個小小的澡堂子變成了集多功能于一體的康體娛樂建筑。這就需要一個功能完善的洗浴管理系統(tǒng)作支撐。如今，在國外洗浴管理系統(tǒng)已經(jīng)在世界各個發(fā)達國家廣泛應用了，而且應用范圍越來越廣，功能越來越完善，操作越來越簡單。但在國內(nèi)應用的還比較少，傳統(tǒng)洗浴企業(yè)的日常運作還是靠人工管理，從服務項目入庫到客人點單，再到結賬基本上由人工完成記錄，這樣做不僅耗費人力資源而且容易導致記錄丟失或重復等錯誤，客人結賬由手工記錄，人力耗費大，客人等待時間長，管理效率低下，這就迫切需要標準的、高效率的計算機管理方式引導其發(fā)展,通過計算機管理該企業(yè)的日常運作，給管理者以決策參考的模型，來不斷完善管理水平，提高工作效率。1.1.3洗浴中心管理系統(tǒng)的研究目的與意義系統(tǒng)開發(fā)的總體任務是實現(xiàn)各種信息的系統(tǒng)化、規(guī)范化和自動化。具體能實現(xiàn)對包房信息和員工信息的添加、修改、查詢，箱號生成、修改以及自動搜索引擎，在總臺實現(xiàn)顧客領牌、顧客服務、查看包房信息、統(tǒng)計顧客消費、包房維修禁用和恢復使用、大廳和包房的隨時調換，以及當日結算查詢、月營業(yè)分析等功能。這不僅幫助洗浴企業(yè)拋棄傳統(tǒng)的管理模式，也突破制約企業(yè)發(fā)展的瓶頸，使企業(yè)的運營目標具有更強的可操作性，最大限度地實現(xiàn)企業(yè)資源的合理利用，以期達到企業(yè)效率最高化，企業(yè)利潤最大化。隨著科學技術的不斷提高,計算機科學日漸成熟,其強大的功能已為人們深刻認識,它已進入人類社會的各個領域并發(fā)揮著越來越重要的作用。越來越多的管理人員意識到信息管理的重要性。作為計算機應用的一部分,使用計算機對洗浴企業(yè)信息進行管理,具有手工管理所無法比擬的優(yōu)點.例如:檢索迅速、查找方便、可靠性高、存儲量大、保密性好、壽命長、成本低等。這些優(yōu)點能夠極大地提高信息管理的效率,也是企業(yè)的科學化、正規(guī)化管理與世界接軌的重要條件。課題以城市洗浴中心為背景，通過研究當前洗浴中心的管理現(xiàn)狀、存在問題以及現(xiàn)實需求，設計一個針對洗浴管理工作的管理信息系統(tǒng)。該系統(tǒng)能夠提供較為完備的功能，對于提高工作效率、加快洗浴管理的自動化具有較為重要的意義。1.2論文結構本文介紹了洗浴中心管理系統(tǒng)的開發(fā)前景、需求分析、各功能模塊的設計和主要功能實現(xiàn)。具體來講，主要包括以下幾個方面：第一章：需求調研與分析。通過對當前洗浴中心調查研究，全面了解了洗浴中心日常業(yè)務流程，為構建洗浴中心管理系統(tǒng)提出科學的需求分析。第二章：系統(tǒng)開發(fā)技術介紹。是對VisualBasic6.0、SQLServer2000和ADO技術的特點進行了簡單的描述。第三章：功能模塊框架設計。應用VisualBasic6.0作為開發(fā)平臺，對系統(tǒng)整體主要功能做了描述。在系統(tǒng)功能分析的基礎上，系統(tǒng)共分為基本信息管理、前臺信息管理、后臺信息管理、總經(jīng)理查詢、系統(tǒng)維護、系統(tǒng)幫助和系統(tǒng)退出七功能大模塊。第四章：系統(tǒng)的實現(xiàn)。論述了數(shù)據(jù)庫安裝、權限設置，完成了系統(tǒng)調試，并進行了簡要總結。第2章系統(tǒng)開發(fā)技術介紹2.1VisualBasic6.0編程語言2.1.1VisualBasic6.0的簡介VisualBasic是由美國微軟公司1991年開發(fā)的一種可視化的、面向對象和采用事件驅動方式的結構化高級程序設計語言，可用于開發(fā)Windows環(huán)境下的各類應用程序[1]。它簡單易學、效率高，且功能強大可以與Windows專業(yè)開發(fā)工具SDK相媲美。在VisualBasic環(huán)境下，利用事件驅動的編程機制、新穎易用的可視化設計工具，使用Windows內(nèi)部的廣泛應用程序接口（API）函數(shù)，動態(tài)鏈接庫（DLL）、對象的鏈接與嵌入（OLE）、開放式數(shù)據(jù)連接（ODBC）等技術，可以高效、快速地開發(fā)Windows環(huán)境下功能強大、圖形界面豐富的應用軟件系統(tǒng)[2]。2.1.2VisualBasic6.0的特點1、面向對象VisualBasic6.0采用了面向對象設計思想，它基本思路是把復雜的設計問題分解為多個能夠完成獨立功能且相對簡單的對象集合。所謂“對象”就是個可操作實體如窗體、窗體中命令按鈕、標簽、文本框等，面向對象編程就是指程序員可根據(jù)界面設計要求直接在界面上設計出窗口、菜單、按鈕等類型對象并為每個對象設置屬性。2、事件驅動在Windows環(huán)境下是以事件驅動方式運行每個對象的，都能響應多個區(qū)別事件。每個事件都能驅動段代碼事件過程，該代碼決定了對象功能。通常稱這種機制為事件驅動的編程機制?？捎捎脩舨僮饔|發(fā)也可以由系統(tǒng)或應用觸發(fā)，例如單擊個命令按鈕就觸發(fā)了按鈕Click(單擊)事件該事件中代碼就會被執(zhí)行，若用戶未進行任何操作(未觸發(fā)事件)則就處于等待狀態(tài)整個應用就是由彼此獨立事件過程構成。3、軟件Software集成式開發(fā)VisualBasic6.0為編程提供了個集成開發(fā)環(huán)境在這個環(huán)境中編程者可設計界面、編寫代碼、調試直至把應用編譯成可在Windows中運行可執(zhí)行文件并為它生成安裝VisualBasic6.0集成開發(fā)環(huán)境為編程者提供了很大方便[3]。4、強大數(shù)據(jù)庫訪問功能VisualBasic6.0利用數(shù)據(jù)Control控件可以訪問多種數(shù)據(jù)VisualBasic6.0提供ADOControl控件不但可以用最少代碼實現(xiàn)數(shù)據(jù)庫操作和控制，也可以取代DataControl控件和RDOControl控件[4]。5、支持對象鏈接和嵌入技術VisualBasic6.0核心是對對象鏈接和嵌入(OLE)技術支持它是訪問所有對象種思路方法利用OLE技術能夠開發(fā)集聲音、圖像、動畫、字處理、Web等對象于一體的功能強大的軟件[5]。6、網(wǎng)絡功能VisualBasic6.0提供了DltTML(Dynamic}tTML)設計工具利用這種技術可以動態(tài)創(chuàng)建和編輯Web頁面使用戶在VisualBasic6.0中開發(fā)多功能網(wǎng)絡應用軟件Software[6]。7、多個應用向導VisualBasic6.0提供了多種向導如應用向導、安裝向導、數(shù)據(jù)對象向導和數(shù)據(jù)窗體向導，通過它們可以快速地創(chuàng)建區(qū)別類型、區(qū)別功能應用。8、聯(lián)機幫助功能在VisualBasic6.0中利用幫助菜單和F1功能鍵用戶可隨時方便地得到所需要幫助信息VisualBasic6.0幫助窗口中顯示了有關舉例代碼通過復制、粘貼操作可獲取大量舉例代碼為用戶學習和使用提供方便[7]。2.2ADO技術2.2.1A1、易于使用，可以說這是ADO最重要的特點之一。ADO是高層數(shù)據(jù)庫訪問技術，相對與ODBC來說，具有面性對象的特點[8]。同時，在ADO對象結構中，對象與對象之間的層次結構不適非常明顯，這會給編寫數(shù)據(jù)庫程序帶來更多的便利。比如，在應用程序中如果要使用記錄集對象，不一定要先建立連接、會話對象，如果需要就可以直接構造記錄集對象?？傊呀?jīng)沒有必要去關心對象的構造層次和構造順序了[9]。2、可以訪問多種數(shù)據(jù)源。和OLEDB一樣，使應用程序具有很好的通用性和靈活性[10]。3、訪問數(shù)據(jù)源效率高。4、方便的Web應用。ADO可以以ActiveX控件的形式出現(xiàn)，這就大大方便了Web應用程序的編制[11]。5、技術編程接口豐富。ADO支持VisualC++、VisualBasic、VBS、JS等[12]。2.2.2A1、Connection用于表示和數(shù)據(jù)源的連接，以及處理一些命令和事務。2、Command用于執(zhí)行某些命令來進行諸如查詢、修改數(shù)據(jù)庫結構的操作。3、Recordset用于處理數(shù)據(jù)源的表格集，它是在表中修改、檢索數(shù)據(jù)的最主要的方法[13]。4、Field描述數(shù)據(jù)集中的列信息。5、Parameter用于對傳遞給數(shù)據(jù)源的命令賦參數(shù)值。6、Error用于承載所產(chǎn)生所無的詳細信息。7、Property通過屬性，每個ADO對象借此來讓用戶描述和控制自身的行為。8、Set集合是一種可以方便的包含其他特殊類型對象的對象類型。ADO提供4種類型的集合：●Connection對象具有Error集合?！馛ommand對象具有Parameter集合?！馬ecordset對象具有Fields集合?！馛onnection、Command、Recordset、Field對象都具有Property集合。9、Event事件模型是異步操作的基礎，這是ADO2.0引進的新特性。2.3SQLServer2000數(shù)據(jù)庫2.3.1SQLServer2000的簡介SQLServer2000是一個關系數(shù)據(jù)庫管理系統(tǒng)，它最初是由MicrosoftSybase和Ashton-Tate三家公司共同開發(fā)的，于1988年推出了第一個OS/2版本[14]。在WindowsNT推出后，Microsoft與Sybase在SQLServer的開發(fā)上就分道揚鑣了。Microsoft將SQLServer移植到WindowsNT系統(tǒng)上，專注于開發(fā)推廣SQLServer的WindowsNT版本；Sybase則較專注于SQLServer在UNIX操作系統(tǒng)上的應用。在本書中介紹的是MicrosoftSQLServer以后簡稱為SQLServer或MSSQLServer[15]。2.3.2SQLServer2000的特性包括1、Internet集成。SQLServer2000數(shù)據(jù)庫引擎提供完整的XML支持。它還具有構成最大的Web站點的數(shù)據(jù)存儲組件所需的可伸縮性、可用性和安全功能。SQLServer2000程序設計模型與WindowsDNA構架集成，用以開發(fā)Web應用程序，并且SQLServer2000支持EnglishQuery和Microsoft搜索服務等功能，在Web應用程序中包含了用戶友好的查詢和強大的搜索功能[16]。2、可伸縮性和可用性。同一個數(shù)據(jù)庫引擎可以在不同的平臺上使用，從運行MicrosoftWindows®98的便攜式電腦，到運行MicrosoftWindows2000數(shù)據(jù)中心版的大型多處理器服務器。SQLServer2000企業(yè)版支持聯(lián)合服務器、索引視圖和大型內(nèi)存支持等功能，使其得以升級到最大Web站點所需的性能級別[17]。3、企業(yè)級數(shù)據(jù)庫功能。SQLServer2000關系數(shù)據(jù)庫引擎支持當今苛刻的數(shù)據(jù)處理環(huán)境所需的功能。數(shù)據(jù)庫引擎充分保護數(shù)據(jù)完整性，同時將管理上千個并發(fā)修改數(shù)據(jù)庫的用戶的開銷減到最小[18]。SQLServer2000分布式查詢使您得以引用來自不同數(shù)據(jù)源的數(shù)據(jù)，就好象這些數(shù)據(jù)是SQLServer2000數(shù)據(jù)庫的一部分，同時分布式事務支持充分保護任何分布式數(shù)據(jù)更新的完整性。復制同樣使您得以維護多個數(shù)據(jù)復本，同時確保單獨的數(shù)據(jù)復本保持同步?？蓪⒁唤M數(shù)據(jù)復制到多個移動的脫接用戶，使這些用戶自主地工作，然后將他們所做的修改合并回發(fā)布服務器[19]。4、易于安裝、部署和使用。SQLServer2000中包括一系列管理和開發(fā)工具，這些工具可改進在多個站點上安裝、部署、管理和使用SQLServer2000的過程。SQLServer2000還支持基于標準的、與WindowsDNA集成的程序設計模型，使SQLServer數(shù)據(jù)庫和數(shù)據(jù)倉庫的使用成為生成強大的可伸縮系統(tǒng)的無縫部分[20]。這些功能使您得以快速交付SQLServer應用程序，使客戶只需最少的安裝和管理開銷即可實現(xiàn)這些應用程序。2.4應用平臺配置1、硬件配置服務器：PCServer系列及其他品牌服務器。工作站：586以上、32MB以上內(nèi)存、1.2GB以上硬件空間。2、軟件配置操作系統(tǒng)：Windowes2000，WindowesNT。數(shù)據(jù)庫系統(tǒng)：SQLServer2000。開發(fā)工具：MicrosoftVisualBasic6.0。第3章系統(tǒng)總體設計3.1需求分析3.1.1用戶需求分析隨著人民生活水平的提高，洗浴在服務行業(yè)中占有越來越重要的地位。努力在當前服務行業(yè)日趨激烈的競爭中脫穎而出，已成為每位經(jīng)營者所追求的目標。經(jīng)過多年發(fā)展，洗浴管理已經(jīng)逐漸由定性管理，進入到重視定量管理的科學階段。眾所周知，在定量管理的具體實現(xiàn)方法和手段方面，最有效的工具就是電腦管理。傳統(tǒng)的手工操作管理存在著許多無法避免的問題，例如：人工計算帳單金額容易出現(xiàn)差錯。收銀工作中跑單、漏單、偷錢現(xiàn)象普遍。個別服務員作弊、改單情形時有發(fā)生。客人消費單據(jù)難以保存和查詢。無法對大量營業(yè)數(shù)據(jù)進行統(tǒng)計分析。無法準確迅速的解決折扣和優(yōu)惠等問題。無法準確滿足客人的個性需求。無論收銀還是財務都需要大量的人力物力。洗浴中心管理系統(tǒng)就是針對以上問題設計的，實現(xiàn)了日常洗浴營運的自動管理。3.1.2系統(tǒng)概述1、系統(tǒng)介紹洗浴管理系統(tǒng)是一套功能強大而又簡便實用的洗浴管理軟件，包括基本信息管理、前臺信息管理、后臺信息管理、總經(jīng)理查詢、系統(tǒng)維護、系統(tǒng)幫助等六大功能模塊，實現(xiàn)了洗浴行業(yè)日常營運的全面自動管理，是洗浴行業(yè)進行電腦信息化管理的理想選擇。2、系統(tǒng)目標本管理系統(tǒng)參照了大量的同類軟件，并進行了細致徹底的研究，旨在用計算機系統(tǒng)來完成基本能完成的工作，保持很高的靈活性和易操作性，并實現(xiàn)了各種信息的系統(tǒng)化、規(guī)范化和自動化。3.2系統(tǒng)功能設計在系統(tǒng)功能分析的基礎上，系統(tǒng)分為6大模20個完整子模塊，系統(tǒng)功能結構（如圖3-1所示）圖3-1系統(tǒng)功能結構圖3.3數(shù)據(jù)庫結構設計3.3.1數(shù)據(jù)庫設計原則1、一致性原則對信息進行統(tǒng)一、系統(tǒng)的分析與設計，協(xié)調好各數(shù)據(jù)源，做到“數(shù)出一門”、“算法統(tǒng)一”、“度量一致”。保證系統(tǒng)數(shù)據(jù)的一致性和有效性。2、完整性原則數(shù)據(jù)庫的完整性是指數(shù)據(jù)的正確性和相容性。要防止合法用戶使用數(shù)據(jù)庫時向數(shù)據(jù)庫中加入不合法語義的數(shù)據(jù)。DBMS提供一種機制來檢查數(shù)據(jù)庫中的數(shù)據(jù)來維護數(shù)據(jù)庫的完整性。這些加在數(shù)據(jù)庫數(shù)據(jù)之上的語義約束條件稱為數(shù)據(jù)庫完整性約束條件，是完整性控制機制的核心。3、安全性原則數(shù)據(jù)庫的安全性是指保護數(shù)據(jù)，防止非法用戶使用數(shù)據(jù)庫，包括惡意破壞數(shù)據(jù)和越權存取數(shù)據(jù)，安全性措施的防范對象是非法用戶和非法操作。4、可伸縮性原則數(shù)據(jù)庫結構的設計應充分考慮到應用環(huán)境的改變和新需求的出現(xiàn)，一般不會推翻原設計，不會對現(xiàn)有的應用程序和數(shù)據(jù)造成大的影響，而只是在原設計基礎上作一些擴充即可滿足要求。5、規(guī)范化數(shù)據(jù)庫的設計應遵循規(guī)范化理論，規(guī)范化程度過低的關系，可能會存在插入、刪除異常、修改復雜、數(shù)據(jù)冗余等問題，解決的方法就是對關系模式進行分解或合并(范化)，轉換成高級范式。但也應當注意到，并不是規(guī)范化程度越高的關系就越好。所以，在具體應用時，到底規(guī)范化進行到什么程度需要權衡利弊。一般而言，做到第三范式(3NF)就足夠了。3.3.2洗浴中心管理系統(tǒng)的實體-聯(lián)系模型（如圖3-2所示）圖3-2E-R圖3.3.3系統(tǒng)數(shù)據(jù)庫設計下面一一介紹各個數(shù)據(jù)庫表的結構1、包房信息表使用戶更清晰直接的了解包房信息，該系統(tǒng)在此表中設定了包房編號、類型、容納人數(shù)、價格等。表3-1包房信息表序號字段名稱數(shù)據(jù)類型長度1編號Varchar42樓層Varchar103房間號Varchar304包房名稱Varchar105包房說明Varchar506所屬部門Varchar87包房類型Varchar88容納人數(shù)int49狀態(tài)Varchar2510現(xiàn)容納人數(shù)int1011包房價格money812消費單位Varchar813分鐘描述int82、箱號信息表箱號信息表主要包括記錄號、箱號、所在大廳、狀態(tài)。表3-2箱號信息序號字段名稱數(shù)據(jù)類型長度1記錄號Int42箱號Varchar103所在大廳Varchar304狀態(tài)Varchar103、包房臨時消費表包房臨時消費表記錄顧客的消費情況。記錄房間號、包房名稱、價格、消費時間、消費金額等。表3-3包房臨時消費信息序號字段名稱數(shù)據(jù)類型長度1記錄號Int42房間號Varchar103包房價格money84包房名稱Varchar505分鐘描述Char106箱號Varchar107所在大廳Varchar308進入時間datetime89結束時間datetime810消費時間datetime411消費金額money84、臨時消費信息表臨時消費信息表主要記錄項目編號、名稱、單位、單價、消費狀態(tài)、折扣、金額小計等。表3-4臨時消費信息表序號字段名稱數(shù)據(jù)類型長度1記錄號Int42箱號Varchar103所在大廳Varchar304項目編號Varchar105名稱Varchar506單位Varchar87單價Money88數(shù)量Int49簡稱Varchar2510消費狀態(tài)Varchar1011隱藏狀態(tài)Varchar812登記時間Datetime813折扣Fload814金額小計Money85、日消費單據(jù)表日消費單據(jù)表記錄顧客一天的消費情況。主要有主客箱號、主客姓名、結賬方式、打折、減免金額、減免原因、實繳金額等。表3-5日消費單據(jù)表序號字段名稱數(shù)據(jù)類型長度1記錄號Int42消費單據(jù)號Varchar203主客箱號Varchar104主客姓名Varchar165登記時間Datetime86結賬日期Datetime87結賬方式Varchar108總計消費Money89打折Fload810實繳金額Money811找零Money812減免金額Money813減免原因Varchar5014人數(shù)Int46、消費項目價格表消費項目價格表主要記錄項目的名稱、單價等。這也是顧客最關心的一項。表3-6消費項目價格表序號字段名稱數(shù)據(jù)類型長度1記錄號Int42項目編號Varchar103簡稱Varchar254名稱Varchar505單位Varchar106單價Money87說明Varchar1007、月營業(yè)信息表月營業(yè)信息表主要用于總經(jīng)理查看某些月的盈利情況。表3-7月營業(yè)信息表序號字段名稱數(shù)據(jù)類型長度1月份Char82月份營業(yè)額Money8第4章系統(tǒng)的實現(xiàn)4.1數(shù)據(jù)庫連接功能為了節(jié)省系統(tǒng)資源，在系統(tǒng)中新建一個Modulel模塊，該模塊主要用于連接數(shù)據(jù)庫和表，從而避免了程序中重復性地定義數(shù)據(jù)連接和數(shù)據(jù)集對象。Modulel模塊中的完整代碼如下：PublicFunctionESQL(ByValsqlAsString)AsADODB.RecordsetDimcnnAsADODB.ConnectionDimrsAsADODB.RecordsetSetcnn=NewADODB.Connectioncnn.OpenStrCnn()Setrs=NewADODB.Recordsetrs.OpenTrim(sql),cnn,adOpenKeyset,adLockOptimisticSetESQL=rsEndFunctionPublicFunctionStrCnn()StrCnn="Provider=MSDASQL.1;PersistSecurityInfo=False;UserID=sa;DataSource=XYGLXT"StrCnn="Provider=SQLOLEDB.1;Password=ecc;PersistSecurity"_&"Info=True;UserID=sa;InitialCatalog=XYGLXT;Server=(local)"EndFunction4.2系統(tǒng)登錄窗體和主界面根據(jù)系統(tǒng)登錄窗體，可以選擇不同的登錄身份，具有不同的操作權限。在單擊“確認”按鈕時，判斷操作員及其密碼，如果該操作員存在，那么允許登錄系統(tǒng)，并為系統(tǒng)管理員分配權限。否則，提示用戶“密碼錯誤”，如果輸入三次錯誤的密碼，那么系統(tǒng)將自動退出。登錄窗體（如圖4-1所示）圖4-1系統(tǒng)登錄窗體運行結果當輸入的密碼正確時，可進入主界面（如圖4-2所示）圖4-2系統(tǒng)主窗體單擊系統(tǒng)登錄窗體上“確認”按鈕的click事件代碼：PrivateSubcomyes_Click()DimMESSAGEAsStringAdodc1.RecordSource="select*from權限信息表where操作員名稱='"+Trim(czy.Caption)+"'"Adodc1.RefreshIfczy.Caption<>""AndText1.Text=Trim(Adodc1.Recordset.Fields("密碼"))ThenIfAdodc1.Recordset.Fields("基本信息管理")=0Thenfrm_main.jbxxgl.Enabled=TrueElsefrm_main.jbxxgl.Enabled=FalseIfAdodc1.Recordset.Fields("前臺信息管理")=0Thenfrm_main.qtxxgl.Enabled=Truefrm_main.Toolbar1.Buttons(1).Enabled=Truefrm_main.Toolbar1.Buttons(3).Enabled=Truefrm_main.Toolbar1.Buttons(5).Enabled=TrueElsefrm_main.qtxxgl.Enabled=Falsefrm_main.Toolbar1.Buttons(1).Enabled=Falsefrm_main.Toolbar1.Buttons(3).Enabled=Falsefrm_main.Toolbar1.Buttons(5).Enabled=FalseEndIfIfAdodc1.Recordset.Fields("后臺信息管理")=0Thenfrm_main.htxxgl.Enabled=Truefrm_main.Toolbar1.Buttons(7).Enabled=TrueElsefrm_main.htxxgl.Enabled=Falsefrm_main.Toolbar1.Buttons(7).Enabled=FalseEndIfIfAdodc1.Recordset.Fields("經(jīng)理查詢系統(tǒng)")=0Thenfrm_main.jlcxxt.Enabled=Truefrm_main.Toolbar1.Buttons(9).Enabled=Truefrm_main.Toolbar1.Buttons(11).Enabled=TrueElsefrm_main.jlcxxt.Enabled=Falsefrm_main.Toolbar1.Buttons(9).Enabled=Falsefrm_main.Toolbar1.Buttons(11).Enabled=FalseEndIfIfAdodc1.Recordset.Fields("系統(tǒng)維護")=0Thenfrm_main.xtwh.Enabled=Truefrm_main.Toolbar1.Buttons(13).Enabled=TrueElsefrm_main.xtwh.Enabled=Falsefrm_main.Toolbar1.Buttons(13).Enabled=FalseEndIfLoadfrm_mainfrm_main.Showfrm_main.St1.Panels(3).Text=czy.CaptionUnloadMeElseIfTIM=3ThenMESSAGE=MsgBox("密碼輸入錯誤,請向系統(tǒng)管理員查詢!",0,"系統(tǒng)提示")IfMESSAGE=vbOKThenEndEndIfIfczy.Caption=""ThenMsgBox"請選擇操作員!",,"系統(tǒng)提示"ListView1.SetFocusElseIfText1.Text<>Adodc1.Recordset.Fields("密碼")ThenMsgBox"密碼錯誤,請重新輸入密碼!",,"系統(tǒng)提示"TIM=TIM+1Text1.SetFocusEndIfEndIfEndIf4.3總臺服務管理總臺服務管理窗體主要實現(xiàn)客人領牌、服務登記、查看消費信息箱號的調換等功能。在總臺服務管理中設計一個View_List過程，以顯示箱號及狀態(tài)，主要通過ListView控件的ListItems集合中的Add方法實現(xiàn)。另外，在程序中還使用了SQL語句中的SUM函數(shù)，主要用于統(tǒng)計箱號空閑、使用和損壞的個數(shù)。（如圖4-3所示）圖4-3總臺服務管理窗體服務登記通過總臺服務管理窗體中“服務登記”工具欄按鈕調出“客人消費等級按鈕”?？腿讼M登記窗口主要實現(xiàn)客人消費項目的添加。并且為了使用戶更加方便快捷的選擇服務項目，當用戶輸入服務項目的簡稱后，程序將在“消費項目價格表”。中模糊檢索服務項目信息。單擊“登記”按鈕的代碼如下：PrivateSubCmddj_Click()Text1.Width=MS1.CellWidth:Text1.Height=MS1.CellHeightText1.Left=MS1.CellLeft+MS1.Left:Text1.Top=MS1.CellTop+MS1.TopMS1.Enabled=TrueCmdbc.Enabled=True:Cmdqx.Enabled=TrueCmddj.Enabled=False:Text1.Enabled=TrueText1.Visible=True:Text1.SetFocusFori=1To101Forj=1To9MS1.TextMatrix(i,j)=""NextjNextipz.Text="0"hjsl.Text="0"hjje.Text="0"EndSub圖4-4客人消費登記窗口2、換箱單擊總臺服務管理窗口的“換箱”按鈕，顧客可以方便的更改箱號，前提箱號為空閑。更新原箱號和現(xiàn)在箱號的代碼如下：PrivateSubCmdEnd_Click()OnErrorResumeNextmyval=MsgBox("確認將["&Labydt.Caption&""&Labyxh.Caption&"箱號]的客人轉到["&Trim(Combo1.Text)&""&Trim(Adodc1.Recordset.Fields("箱號"))&"箱號]嗎？",vbYesNo)Ifmyval=vbYesThentxtSQL="update臨時消費信息表set箱號='"+Trim(Adodc1.Recordset.Fields("箱號"))+"',所在大廳='"+Trim(Combo1.Text)+"'where箱號='"+Trim(Labyxh.Caption)+"'and所在大廳='"+Trim(Labydt.Caption)+"'"Setrs1=ESQL(txtSQL)txtSQL="update包房消費臨時表set箱號='"+Trim(Adodc1.Recordset.Fields("箱號"))+"',所在大廳='"+Trim(Combo1.Text)+"'where箱號='"+Trim(Labyxh.Caption)+"'and所在大廳='"+Trim(Labydt.Caption)+"'"Setrs2=ESQL(txtSQL)Adodc1.Recordset.Fields("狀態(tài)")="使用"Adodc1.Recordset.UpdateAdodc1.RecordSource="select*from箱號信息表where箱號='"+Trim(Labyxh.Caption)+"'and所在大廳='"+Trim(Labydt.Caption)+"'"Adodc1.RefreshAdodc1.Recordset.Fields("狀態(tài)")="空閑"Adodc1.Recordset.Updatemain_qtgl_ztfwgl.Enabled=Truemain_qtgl_ztfwgl.ListView1.ListItems.ClearCallmain_qtgl_ztfwgl.View_ListUnloadMeEndIf圖4-5換箱窗體的運行結果3、統(tǒng)計查詢客人消費統(tǒng)計查詢窗口主要實現(xiàn)客人點單、贈單和所有金額的統(tǒng)計，其主要使用sum函數(shù)。在總臺服務管理窗體中的ToolBar控件的ButtonClick事件下添加如下代碼：CaseIs="tj"IfAdodc1.Recordset.RecordCount>0AndAdodc1.Recordset.Fields("狀態(tài)")="使用"Thenmain_qtgl_ztfwgl_tj.Adodc1.RecordSource="select*from臨時消費信息表where箱號='"+Trim(list)+"'and所在大廳='"+Trim(Combo1.Text)+"'"main_qtgl_ztfwgl_tj.Adodc1.RefreshIfmain_qtgl_ztfwgl_tj.Adodc1.Recordset.RecordCount>0ThenLoadmain_qtgl_ztfwgl_tjmain_qtgl_ztfwgl_tj.Showmain_qtgl_ztfwgl_tj.Adodc1.RecordSource="select消費狀態(tài)as狀態(tài)1,sum(金額小計)as金額合計from臨時消費信息表where箱號='"+Trim(list)+"'and所在大廳='"+Trim(Combo1.Text)+"'groupby消費狀態(tài)orderby消費狀態(tài)"main_qtgl_ztfwgl_tj.Adodc1.RefreshIfmain_qtgl_ztfwgl_tj.Adodc1.Recordset.RecordCount>1Thenmain_qtgl_ztfwgl_tj.Labdd.Caption=Format(Val(main_qtgl_ztfwgl_tj.Adodc1.Recordset.Fields(1)),"0.00")Ifmain_qtgl_ztfwgl_tj.Adodc1.Recordset.EOF=FalseThenmain_qtgl_ztfwgl_tj.Adodc1.Recordset.MoveNextmain_qtgl_ztfwgl_tj.Labzd.Caption=Format(Val(main_qtgl_ztfwgl_tj.Adodc1.Recordset.Fields(1)),"0.00")ElseIfmain_qtgl_ztfwgl_tj.Adodc1.Recordset.RecordCount=1ThenIfmain_qtgl_ztfwgl_tj.Adodc1.Recordset.Fields(0)="贈單"Thenmain_qtgl_ztfwgl_tj.Labzd.Caption=Format(Val(main_qtgl_ztfwgl_tj.Adodc1.Recordset.Fields(1)),"0.00")main_qtgl_ztfwgl_tj.Labdd.Caption="0.00"Elsemain_qtgl_ztfwgl_tj.Labdd.Caption=Format(Val(main_qtgl_ztfwgl_tj.Adodc1.Recordset.Fields(1)),"0.00")main_qtgl_ztfwgl_tj.Labzd.Caption="0.00"EndIfEndIfmain_qtgl_ztfwgl_tj.Labzj.Caption=Format(Val(main_qtgl_ztfwgl_tj.Labdd.Caption)+Val(main_qtgl_ztfwgl_tj.Labzd.Caption),"0.00")main_qtgl_ztfwgl.Enabled=FalseElseMsgBox("對不起，此箱號的客人未消費，請重新選擇！")EndIfElseIfAdodc1.Recordset.Fields("狀態(tài)")="空閑"ThenMsgBox"請先領牌！"ElseIfAdodc1.Recordset.Fields("狀態(tài)")="損壞"ThenMsgBox"您選的箱號已損壞，請重新選擇！"EndIfCaseIs="jy"IfAdodc1.Recordset.RecordCount>0AndAdodc1.Recordset.Fields("狀態(tài)")="空閑"ThenAdodc1.Recordset.Fields("狀態(tài)")="損壞"Adodc1.Recordset.UpdateListView1.ListItems.ClearCallView_ListElseIfAdodc1.Recordset.Fields("狀態(tài)")="使用"ThenMsgBox"您選的箱號正在使用，請重新選擇！"ElseIfAdodc1.Recordset.Fields("狀態(tài)")="損壞"ThenMsgBox"您選的箱號已損壞，請重新選擇！"EndIfCaseIs="hf"IfAdodc1.Recordset.RecordCount>0AndAdodc1.Recordset.Fields("狀態(tài)")="損壞"ThenAdodc1.Recordset.Fields("狀態(tài)")="空閑"Adodc1.Recordset.UpdateListView1.ListItems.ClearCallView_ListElseIfAdodc1.Recordset.Fields("狀態(tài)")="使用"ThenMsgBox"您選的箱號正在使用，請重新選擇！"ElseIfAdodc1.Recordset.Fields("狀態(tài)")="空閑"ThenMsgBox"您選的箱號沒有損壞，請重新選擇！"EndIf圖4-6消費統(tǒng)計窗體運行結果4.4結賬收銀管理結賬收銀管理主要實現(xiàn)普通結賬、免單結賬、箱號的禁止使用和恢復使用等功能，運行結果（如圖4－7所示）圖4-7結賬收銀管理4.5月結算管理通過月結算管理窗口，洗浴中心可以方便快捷的查看每月的盈利情況，對比后調整對洗浴中心的管理。單擊月結算管理窗體中的“開始月結算”按鈕代碼如下：PrivateSubComyj_Click()Adodc1.RecordSource="select*from月消費單據(jù)表"Adodc1.RefreshIfAdodc1.Recordset.RecordCount>0ThenComyj.Enabled=TrueElseComyj.Enabled=FalseEndIfmyval=MsgBox("確認結算當月數(shù)據(jù)嗎？",vbYesNo)Ifmyval=vbYesThenAdodc2.RecordSource="selectsum(消費實收)from月消費單據(jù)表"Adodc2.RefreshIfAdodc2.Recordset.RecordCount>0ThentxtSQL="select*from月營業(yè)分析表"Setrs5=ESQL(txtSQL)rs5.AddNewOnErrorResumeNextAdodc1.Recordset.AddNewrs5.Fields(0)=Format(Date,"yyyy-mm")rs5.Fields(1).Value=Adodc2.Recordset.Fields(0).Valuers5.UpdateAdodc1.RefreshEndIftxtSQL="insert歷史消費信息表(箱號,所在大廳,項目編號,名稱,單位,單價,數(shù)量,簡稱,消費狀態(tài),隱藏狀態(tài),登記時間,折扣,金額小計,消費單據(jù)號)select箱號,所在大廳,項目編號,名稱,單位,單價,數(shù)量,簡稱,消費狀態(tài),隱藏狀態(tài),登記時間,折扣,金額小計,消費單據(jù)號from月消費信息表orderby消費單據(jù)號"Setrs1=ESQL(txtSQL)ESQL.ClosetxtSQL="insert歷史消費單據(jù)表(消費單據(jù)號,主客箱號,主客姓名,主客性別,登記時間,結帳日期,結帳方式,主客消費金額,總計消費,打折,消費應收,實交金