賓館客房管理系統(tǒng)摘要在現(xiàn)代的賓館等服務(wù)行業(yè)中，由于客流量巨增，傳統(tǒng)的管理方法已經(jīng)不能滿足現(xiàn)代社會(huì)的需要，在運(yùn)營(yíng)中需要對(duì)客房資源、顧客信息、結(jié)算信息進(jìn)行管理。通過(guò)這套軟件，無(wú)論各種等級(jí)的賓館，都可輕松進(jìn)行管理，都具有非常實(shí)用的價(jià)值，賓館客房管理系統(tǒng)的開(kāi)發(fā)無(wú)疑具有深遠(yuǎn)得意義。我對(duì)此課題很感興趣，加上對(duì)Visual Basic已經(jīng)有了相當(dāng)?shù)牧私?，故選擇了此項(xiàng)目作為畢業(yè)設(shè)計(jì)。賓館客房管理系統(tǒng)提供客房科學(xué)、規(guī)范的現(xiàn)代管理模式，使賓館客房管理跨上一個(gè)的臺(tái)階，以高效率計(jì)算機(jī)管理方式引導(dǎo)賓館行業(yè)的發(fā)展，為賓館帶來(lái)直接的經(jīng)濟(jì)效益，提高賓館服務(wù)水準(zhǔn)，改善賓館客房的形象。通過(guò)設(shè)計(jì)本系統(tǒng)鞏固大學(xué)所學(xué)專業(yè)知識(shí)，使自己對(duì)VB、ACCESS有更深入、全面的了解，賓館客房管理系統(tǒng)提供賓館客房科學(xué)、規(guī)范的現(xiàn)代管理模式，使賓館客房管理跨上一個(gè)新的臺(tái)階，一個(gè)先進(jìn)的管理手段即高效率計(jì)算機(jī)管理方式引導(dǎo)賓館行業(yè)的發(fā)展，不僅能為賓館帶來(lái)巨大的直接經(jīng)濟(jì)效益，而且還能提高賓館服務(wù)水準(zhǔn)和員工工作效率，使賓館客房管理進(jìn)入一個(gè)新層次，提高服務(wù)質(zhì)量，改善賓館客房的形象。關(guān)鍵詞 Visual Basic編程技術(shù); Access數(shù)據(jù)庫(kù)開(kāi)發(fā)技術(shù) ;ADO數(shù)據(jù)庫(kù)訪問(wèn)技術(shù)隨著面向?qū)ο蠛虯ctiveX等技術(shù)的綜合運(yùn)用，Microsoft公司已將Visual Basic發(fā)展成當(dāng)前基于Windows平臺(tái)上最方便快捷的軟件開(kāi)發(fā)工具。而Microsoft Access是公司開(kāi)發(fā)的在Windows平臺(tái)上最流行的、功能強(qiáng)大的桌面數(shù)據(jù)庫(kù)管理系統(tǒng)。本論文將以一個(gè)賓館客房管理系統(tǒng)為例子，來(lái)實(shí)踐如何較為系統(tǒng)的運(yùn)用Visual Basic編程技術(shù)和Access數(shù)據(jù)庫(kù)管理技術(shù)進(jìn)行數(shù)據(jù)庫(kù)項(xiàng)目開(kāi)發(fā)。詳盡介紹了使用Visual Basic開(kāi)發(fā)Access數(shù)據(jù)庫(kù)應(yīng)用系統(tǒng)所必備的管理和開(kāi)發(fā)技術(shù)。- I -目 錄第一章 概述21.1編寫目的21.2 研究手段2第二章 數(shù)據(jù)庫(kù)及相關(guān)介紹32.1表設(shè)計(jì)概述32.2 字段定義32.3 創(chuàng)建表49.1創(chuàng)建工程109.3設(shè)計(jì)主窗體1110.3設(shè)計(jì)客人信息管理窗體1611.2數(shù)據(jù)庫(kù)管理2111.2.1關(guān)系型數(shù)據(jù)庫(kù)概念2211.3 創(chuàng)建數(shù)據(jù)庫(kù)2211.3.1數(shù)據(jù)庫(kù)的打開(kāi)和關(guān)閉、刪除數(shù)據(jù)庫(kù)2311.4 字段定義2311.5 創(chuàng)建表2411.6工程的概念2511.7 過(guò)程和函數(shù)2511.7.1自定義過(guò)程2511.7.2函數(shù)過(guò)程2611.8 Function函數(shù)過(guò)程的建立2611.9事件過(guò)程2611.10 模塊的概念2611.10.1窗體模塊2711.10.2標(biāo)準(zhǔn)模塊2711.11訪問(wèn)數(shù)據(jù)庫(kù)類型2811.12使用ADO訪問(wèn)數(shù)據(jù)庫(kù)2911.12.1 ADO簡(jiǎn)介2911.12.2 ADO層次模型2911.12.3 ADO編程模型3011.12.4 添加ADO30第十二章 結(jié)論30主要參考文獻(xiàn)34致 謝34 - III -引言隨著改革開(kāi)放的加快，我國(guó)人民生活水平顯著提高，伴隨著我國(guó)旅游業(yè)的高速發(fā)展，賓館行業(yè)的服務(wù)檔次迫切需要提高。在賓館行業(yè)競(jìng)爭(zhēng)激烈的今天，要成為佼佼者，就必須與高新技術(shù)緊密結(jié)合。傳統(tǒng)的純手工或簡(jiǎn)單的計(jì)算工具，已經(jīng)不適應(yīng)現(xiàn)代經(jīng)濟(jì)高速發(fā)展的要求，必須運(yùn)用現(xiàn)代化管理手段，配備完善的自動(dòng)化設(shè)備，提高客房的服務(wù)水平與質(zhì)量，從而贏得高信譽(yù)，強(qiáng)實(shí)力，好效益！賓館客房管理系統(tǒng)提供賓館客房科學(xué)、規(guī)范的現(xiàn)代管理模式，使賓館客房管理跨上一個(gè)新的臺(tái)階，一個(gè)先進(jìn)的管理手段即高效率計(jì)算機(jī)管理方式引導(dǎo)賓館行業(yè)的發(fā)展，不僅能為賓館帶來(lái)巨大的直接經(jīng)濟(jì)效益，而且還能提高賓館服務(wù)水準(zhǔn)和員工工作效率，使賓館客房管理進(jìn)入一個(gè)新層次，提高服務(wù)質(zhì)量，改善賓館客房的形象。賓館客房管理系統(tǒng)提供賓館客房科學(xué)、規(guī)范的現(xiàn)代管理模式，使賓館客房管理跨上一個(gè)新的臺(tái)階，一個(gè)先進(jìn)的管理手段即高效率計(jì)算機(jī)管理方式引導(dǎo)賓館行業(yè)的發(fā)展，不僅能為賓館帶來(lái)巨大的直接經(jīng)濟(jì)效益，而且還能提高賓館服務(wù)水準(zhǔn)和員工工作效率，使賓館客房管理進(jìn)入一個(gè)新層次，提高服務(wù)質(zhì)量，改善賓館客房的形象。隨著面向?qū)ο蠛虯ctiveX等技術(shù)的綜合運(yùn)用，Microsoft公司已將Visual Basic發(fā)展成當(dāng)前基于Windows平臺(tái)上最方便快捷的軟件開(kāi)發(fā)工具。而Microsoft Access是公司開(kāi)發(fā)的在Windows平臺(tái)上最流行的、功能強(qiáng)大的桌面數(shù)據(jù)庫(kù)管理系統(tǒng)。本論文將以一個(gè)賓館客房管理系統(tǒng)為例子，來(lái)實(shí)踐如何較為系統(tǒng)的運(yùn)用Visual Basic編程技術(shù)和Access數(shù)據(jù)庫(kù)管理技術(shù)進(jìn)行數(shù)據(jù)庫(kù)項(xiàng)目開(kāi)發(fā)。詳盡介紹了使用Visual Basic開(kāi)發(fā)Access數(shù)據(jù)庫(kù)應(yīng)用系統(tǒng)所必備的管理和開(kāi)發(fā)技術(shù)。賓館客房管理系統(tǒng)會(huì)給賓館管理帶來(lái)很多優(yōu)點(diǎn)如：功能強(qiáng)大，可靠性高；操作簡(jiǎn)單，響應(yīng)快；界面豐富，明了清晰 ；報(bào)表統(tǒng)計(jì)，準(zhǔn)確交全。各類報(bào)表準(zhǔn)確、全面的顯示營(yíng)業(yè)收入、客源情況、帳務(wù)數(shù)據(jù)、房態(tài)信息，為經(jīng)營(yíng)管理提供了可靠數(shù)據(jù)資料。數(shù)據(jù)維護(hù)，快速高效；多層次，多方位的維護(hù)實(shí)用程序，使系統(tǒng)在運(yùn)行過(guò)程中出現(xiàn)的數(shù)據(jù)失誤能及時(shí)恢復(fù)。更新用戶界面，操作方便、直觀、友好、便于系統(tǒng)功能擴(kuò)充。一個(gè)成功的賓館客房管理系統(tǒng)，對(duì)賓館客房本身而言，不僅可以提供多種服務(wù)功能，而且能使賓館客房管理可規(guī)范，工作效率高，帳目差錯(cuò)少，更重要的是賓館也樹立了良好的形象，例如：快速實(shí)現(xiàn)住客入住登記和帳務(wù)處理，減少客人住店及離店時(shí)的等待時(shí)間。準(zhǔn)確的實(shí)現(xiàn)客人預(yù)定入住的要求，實(shí)現(xiàn)有效及有保障的前臺(tái)操作系統(tǒng)作業(yè)?？焖夙憫?yīng)住客的有關(guān)項(xiàng)目查詢要求。提供清晰，準(zhǔn)確的各類明細(xì)報(bào)帳，給客人留下良好的管理印象，方便快速操作，增加營(yíng)業(yè)收入。賓館客房管理系統(tǒng)在現(xiàn)在的賓館等服務(wù)行業(yè)中，由于客流量巨增，傳統(tǒng)的管理方法已經(jīng)不適應(yīng)現(xiàn)代社會(huì)的需要。賓館在正常運(yùn)營(yíng)中需要對(duì)客房資源、顧客信息、結(jié)算信息進(jìn)行管理，利用賓館管理系統(tǒng)及時(shí)了解各個(gè)環(huán)節(jié)中信息的變更，有利于提高管理的效率，因此賓館管理系統(tǒng)是各大中小型賓館，所需使用的一個(gè)管理系統(tǒng)。第一章 概述1.1編寫目的在現(xiàn)代的賓館等服務(wù)行業(yè)中，由于客流量巨增，傳統(tǒng)的管理方法已經(jīng)不能滿足現(xiàn)代社會(huì)的需要，在運(yùn)營(yíng)中需要對(duì)客房資源、顧客信息、結(jié)算信息進(jìn)行管理。通過(guò)這套軟件，無(wú)論各種等級(jí)的賓館，都可輕松進(jìn)行管理，都具有非常實(shí)用的價(jià)值，賓館客房管理系統(tǒng)的開(kāi)發(fā)無(wú)疑具有深遠(yuǎn)得意義。我對(duì)此課題很感興趣，加上對(duì)Visual Basic已經(jīng)有了相當(dāng)?shù)牧私?，故選擇了此項(xiàng)目作為畢業(yè)設(shè)計(jì)。賓館客房管理系統(tǒng)提供客房科學(xué)、規(guī)范的現(xiàn)代管理模式，使賓館客房管理跨上一個(gè)的臺(tái)階，以高效率計(jì)算機(jī)管理方式引導(dǎo)賓館行業(yè)的發(fā)展，為賓館帶來(lái)直接的經(jīng)濟(jì)效益，提高賓館服務(wù)水準(zhǔn)，改善賓館客房的形象。通過(guò)設(shè)計(jì)本系統(tǒng)鞏固大學(xué)所學(xué)專業(yè)知識(shí)，使自己對(duì)VB和ACCESS有更深入、全面的了解，1.2 研究手段本課題將采用VB與ACCESS相結(jié)合的技術(shù)實(shí)現(xiàn)賓館客房管理系統(tǒng)。VB是一種可視化編程工具，指的是一種開(kāi)發(fā)圖形用戶界面的方法。VB編程用向?qū)ο?，事件?qū)動(dòng)的編程機(jī)制，通過(guò)把復(fù)雜的Windows編程封裝起來(lái)，提供一種所見(jiàn)即得的可視界面方法，迅速成為許多程序手選的編程工具。 ACCESS是一個(gè)非常優(yōu)秀的關(guān)系數(shù)據(jù)庫(kù)管理系統(tǒng)，在關(guān)系型數(shù)據(jù)庫(kù)中，數(shù)據(jù)元素是最基本的數(shù)據(jù)單元，可以將若干個(gè)數(shù)據(jù)單元組成數(shù)據(jù)元組，若干個(gè)數(shù)據(jù)元組組成數(shù)據(jù)表，而所有相互關(guān)聯(lián)的數(shù)據(jù)表則可以組成一個(gè)數(shù)據(jù)庫(kù)，這樣的數(shù)據(jù)庫(kù)集合即被稱為基于關(guān)系模型的數(shù)據(jù)庫(kù)系統(tǒng)，設(shè)計(jì)ACCESS關(guān)系數(shù)據(jù)庫(kù)，首先應(yīng)根據(jù)用戶需求對(duì)數(shù)據(jù)庫(kù)管理系統(tǒng)進(jìn)行分析和研究，全面規(guī)劃，再根據(jù)數(shù)據(jù)庫(kù)的設(shè)計(jì)規(guī)范創(chuàng)建數(shù)據(jù)庫(kù)，數(shù)據(jù)庫(kù)的設(shè)計(jì)一般包含以下步驟：確定創(chuàng)建數(shù)據(jù)庫(kù)所要完成的內(nèi)容；確定創(chuàng)建數(shù)據(jù)庫(kù)所需要的表；確定表中所需要的字段；唯一值的主關(guān)鍵字段；確定表之間的關(guān)系；優(yōu)化設(shè)計(jì)，輸入數(shù)據(jù)并創(chuàng)建其他對(duì)象。第二章 數(shù)據(jù)庫(kù)及相關(guān)介紹2.1表設(shè)計(jì)概述數(shù)據(jù)庫(kù)結(jié)構(gòu)設(shè)計(jì)是整個(gè)應(yīng)用系統(tǒng)的基礎(chǔ)，就如建筑設(shè)計(jì)圖紙。當(dāng)數(shù)據(jù)庫(kù)所存儲(chǔ)的信息邏輯關(guān)系簡(jiǎn)單、數(shù)據(jù)記錄量不大時(shí)，數(shù)據(jù)庫(kù)的結(jié)構(gòu)設(shè)計(jì)相對(duì)容易，編輯修改也方便；而當(dāng)數(shù)據(jù)庫(kù)數(shù)據(jù)內(nèi)容龐大、關(guān)系復(fù)雜且在使用中發(fā)現(xiàn)問(wèn)題時(shí)，再進(jìn)行修改，就有可能造成數(shù)據(jù)丟失。所以在設(shè)計(jì)前應(yīng)該進(jìn)行需求分析，了解操作流程，精心構(gòu)思。設(shè)計(jì)一個(gè)比較好的數(shù)據(jù)庫(kù)及基本表的一般步驟如下。 確立建立數(shù)據(jù)庫(kù)的目的。即用數(shù)據(jù)庫(kù)做哪些數(shù)據(jù)的管理，有哪些需求和功能。 確定所需要的數(shù)據(jù)表。在明確了建立數(shù)據(jù)庫(kù)的目的之后，就可以著手將信息分成各個(gè)獨(dú)立的主題，每一個(gè)主題都可以是數(shù)據(jù)庫(kù)中一個(gè)表，并且要求表中的字段信息能完整的描述某一記錄。 確定所需的字段。確定在某些表中要保存哪些信息。在表中，每一信息稱作一個(gè)字段，在表中顯示為一列。要保證記錄的唯一性，就必須盡量為每個(gè)數(shù)據(jù)表建立主關(guān)鍵字。主關(guān)鍵字由一個(gè)或多個(gè)字段組成。數(shù)據(jù)表中的非主關(guān)鍵字段應(yīng)完全依賴主關(guān)鍵字，并且當(dāng)主關(guān)鍵字是由多個(gè)字段組合而成時(shí)，主關(guān)鍵字應(yīng)依賴于其中的每一個(gè)組成字段。 確定關(guān)系。分析每個(gè)表，確定表中的數(shù)據(jù)和其他表中的數(shù)據(jù)有和何關(guān)系。必要時(shí)，可在表中加入字段或創(chuàng)建一個(gè)新表來(lái)明確關(guān)系。 改進(jìn)設(shè)計(jì)。對(duì)設(shè)計(jì)進(jìn)一步分析，查找其中的缺陷，完善數(shù)據(jù)庫(kù)。 2.2 字段定義Access數(shù)據(jù)庫(kù)有著關(guān)系型數(shù)據(jù)庫(kù)的共性，數(shù)據(jù)表中的每一條記錄都包含許多字段，分別存儲(chǔ)著關(guān)于每個(gè)記錄的不同類型的信息，字段的定義是數(shù)據(jù)庫(kù)相當(dāng)重要的工作。字段的定義：包括字段名、數(shù)據(jù)類型、寬度、字段的功能設(shè)置和說(shuō)明等 字段采取什么數(shù)據(jù)類型取決于以下幾個(gè)方面。 字段中可以使用什么類型的值。 需要用多少存儲(chǔ)空間來(lái)保存字段的值。 是否需要對(duì)數(shù)據(jù)進(jìn)行計(jì)算以及需要對(duì)數(shù)據(jù)進(jìn)行何種計(jì)算。 是否需要排序和索引字段。備注型、超級(jí)鏈接型及OLE對(duì)象型字段均不能使用排序和索引。 是否對(duì)字段中的值進(jìn)行排序 是否需要在查詢中或報(bào)表中對(duì)記錄進(jìn)行分組。 自動(dòng)編號(hào)是一種特殊的整型類型，一般設(shè)置為主鍵。一個(gè)表中只能有一個(gè)字段的數(shù)據(jù)類型是自動(dòng)編號(hào)型的。 超級(jí)鏈接型的字段可以保存超級(jí)鏈接地址。 查詢字段可以使用“列表框”或“組合框”從另一個(gè)表或列表中選擇一個(gè)值。 2.3 創(chuàng)建表創(chuàng)建表一般有3個(gè)辦法：一是使用設(shè)計(jì)器創(chuàng)建表，二是使用向?qū)?chuàng)建表三是通過(guò)輸入數(shù)據(jù)創(chuàng)建表。使用設(shè)計(jì)器創(chuàng)建表是相對(duì)靈活的方法，需要對(duì)字段類型及字段屬性有清楚的了解，有一定難度，但是可以完成表的所有功能；使用向?qū)?chuàng)建表對(duì)于用戶來(lái)說(shuō)很方便，符合用戶的操作習(xí)慣，但是創(chuàng)建好的表不一定符合自己的實(shí)際情況，這時(shí)可以通過(guò)表設(shè)計(jì)器來(lái)完成善；通過(guò)輸入數(shù)據(jù)創(chuàng)建表是較直接的方法，一般也需要表設(shè)計(jì)器進(jìn)行修改完善。第三章 系統(tǒng)功能分析系統(tǒng)開(kāi)發(fā)的總體任務(wù)是實(shí)現(xiàn)賓館各種信息的系統(tǒng)化，規(guī)范化和自動(dòng)化管理，減少工作量，提高效率，增強(qiáng)可靠性系統(tǒng)功能分析是在系統(tǒng)開(kāi)發(fā)設(shè)計(jì)的總體任務(wù)的基礎(chǔ)上完成，本實(shí)例中的賓館客房管理系統(tǒng)需要完成的功能主要有： 1、客房信息管理：包括房間編號(hào)、房間級(jí)別、房間類型、房間價(jià)格（元）、是否住人等信息的輸入、刪除、修改等。 2、客人信息管理：包括客人姓名、登記號(hào)、身份證號(hào)、房間號(hào)、登記日期的輸入、刪除、修改等。 3、退房信息管理：包括客人的退房日期、付款金額的輸入、修改、刪除等。 4、客房信息查詢：包括查詢房間編號(hào)、房間級(jí)別、房間類型、房間價(jià)格（元）、是否住人等信息。 5、收費(fèi)信息查詢：包括查詢收費(fèi)日期、付款金額。 6、效益信息查詢：包括查詢某一段時(shí)間內(nèi)的營(yíng)業(yè)情況，可輸入日期時(shí)間等信息查詢。 7、房間情況報(bào)表的打印：包括旅客入住情況和房間基本情況的報(bào)表可打印。其中旅客入住包括登記號(hào)、身份證號(hào)、房間號(hào)、登記時(shí)間。房間基本情況包括房間編號(hào)、房間級(jí)別、房間類型、房間價(jià)格、是否住人等信息。 8、系統(tǒng)維護(hù)：主要是為了方便用戶進(jìn)行修改用戶密碼、重新登陸、退出系統(tǒng)等操作。第四章 系統(tǒng)功能模塊設(shè)計(jì) 按結(jié)構(gòu)化程序設(shè)計(jì)思想，分析得出如下系統(tǒng)功能模塊圖賓館客房管理系統(tǒng)系統(tǒng)管理用戶管理重新登陸退出系統(tǒng)客房信息管理客房信息入住情況退房信息客放信息查詢客放信息查詢收費(fèi)信息查詢效益信息查詢報(bào)表輸出房間情況表收費(fèi)情況表 第五章 主要技術(shù)及應(yīng)用開(kāi)發(fā)工具Visual Basic編程技術(shù)，ACCESS數(shù)據(jù)庫(kù)開(kāi)發(fā)技術(shù)，ADO數(shù)據(jù)庫(kù)訪問(wèn)技術(shù)Visual Basic 6.0中文版開(kāi)發(fā)工具，ACCESS 2000數(shù)據(jù)庫(kù)開(kāi)發(fā)工具第六章 數(shù)據(jù)庫(kù)需求分析用戶的需求具體體現(xiàn)在各種信息的提供、保存、修改、查詢等方面，經(jīng)調(diào)查和分析，針對(duì)一般賓館客房管理系統(tǒng)的需求和對(duì)系統(tǒng)流程圖的分析，設(shè)計(jì)成如下的邏輯結(jié)構(gòu)。cancel表：登記號(hào)、退房日期，付款數(shù)額。Guest 表：登記號(hào)、用戶姓名、身份證號(hào)、房間號(hào)，登記日期。Room表：房間號(hào)、房間等級(jí)、房間類型、房間價(jià)格、房間狀態(tài)（是否入?。︰sers 表：用戶帳號(hào)、用戶密碼。6.1數(shù)據(jù)庫(kù)邏輯結(jié)構(gòu)設(shè)計(jì)創(chuàng)建一個(gè)新的數(shù)據(jù)庫(kù)，命名為“Hotel.mdb”,保存在要存放這個(gè)系統(tǒng)的所在工程文件的文件夾中。本例包含以下四個(gè)表：退房情況表Cancel、客人情況表Guest、房間情況表Room、用戶帳號(hào)和密碼表Users.1 ）退房情況表Cancel，用來(lái)保存與退房的相關(guān)信息。字段名稱數(shù)據(jù)類型說(shuō)明Book No文本登記號(hào)Cancel Date日期/時(shí)間退房日期Pay Money數(shù)字付款數(shù)額表6.1（1）退房情況2 ）客人情況表Guest，用來(lái)存儲(chǔ)與客人的相關(guān)信息。字段名稱數(shù)據(jù)類型說(shuō)明Book No文本房間號(hào)Guest Name文本客人姓名Card ID文本身份證號(hào)Room No文本房間號(hào)Book Date日期/時(shí)間登記日期 表6.1（2）客人情況 3 ）房間情況表Room,用來(lái)存儲(chǔ)房間信息字段名稱數(shù)據(jù)類型說(shuō)明Room No文本房間號(hào)Room Grade是/否是否標(biāo)準(zhǔn)間Room Type是/否是否套間Room Rate數(shù)字房間價(jià)格Room Status是/否是否有人住表6.1（3）房間情況4 ）用戶帳號(hào)和密碼表Users,用來(lái)保存用戶的帳號(hào)和密碼。字段名稱數(shù)據(jù)類型說(shuō)明Name文本用戶帳號(hào)Password文本用戶密碼第七章 系統(tǒng)流程圖在了解了系統(tǒng)各個(gè)功能模塊之后，我們還要對(duì)系統(tǒng)的流程有一個(gè)整體的認(rèn)識(shí)。所謂系統(tǒng)流程，就是用戶在使用系統(tǒng)時(shí)的工作過(guò)程。系統(tǒng)的工作流程都是從用戶登陸模塊開(kāi)始，對(duì)用戶身份進(jìn)行權(quán)限驗(yàn)證，進(jìn)而對(duì)系統(tǒng)進(jìn)行管理的。開(kāi) 始用戶登陸進(jìn)入主界面登陸不超3次退出登陸YESNO系統(tǒng)功能信息管理信息查詢報(bào)表輸出窗口設(shè)置幫助信息第八章 設(shè)計(jì)視圖及介紹針對(duì)一般賓館管理信息系統(tǒng)的需求，通過(guò)對(duì)賓館管理過(guò)程的內(nèi)容和流程分析，設(shè)計(jì)如下面所示的數(shù)據(jù)項(xiàng)和數(shù)據(jù)結(jié)構(gòu)：8.1客房信息查詢“客房標(biāo)準(zhǔn)信息查詢”主要是完成房間編號(hào)、房間級(jí)別、房間類型、房間價(jià)格、是否住人等信息的查詢。“客房信息查詢”窗體包括6個(gè)Option控件，2個(gè)Frame控件，1個(gè)Label控件，1個(gè)TexBox控件，1個(gè)DataGrid控件。圖8.18.2 收費(fèi)信息查詢“收費(fèi)信息查詢”窗體主要對(duì)收費(fèi)日期,付款金額的信息查詢.”收費(fèi)信息查詢”窗體中只有1個(gè)控件。 圖8.28.3 效益信息查詢 “效益信息查詢”窗體主要是對(duì)某一段時(shí)間的營(yíng)業(yè)情況的信息查詢.”效益信息查詢”窗體中有2個(gè)DTPicker控件,1個(gè)Label控件,1個(gè)TextBox控件,1個(gè)DataGrid控件,1個(gè)CammandButton控件,1個(gè)ComboBox控件,在此窗體中,有1個(gè)TextBox控件被DTPicker控件覆蓋.第九章 賓館管理信息系統(tǒng)具體程序?qū)崿F(xiàn)9.1創(chuàng)建工程 運(yùn)行后，選擇“文件”“新建工程”菜單，然后從“工程”模板中選擇“標(biāo)準(zhǔn)EXE”項(xiàng)，單擊“確定”按鈕，Visual Basic 就會(huì)自動(dòng)生成一個(gè)窗體。這個(gè)窗體我們?cè)诤竺鎸⒆鳛椤暗卿洝贝绑w，先設(shè)置該窗體Name為“frmlogin”,Caption為“登錄”。保存工程，在出現(xiàn)的“文件另存為”對(duì)話框中輸入這個(gè)工程項(xiàng)目的名稱Hotel，選擇要存放的目錄，單擊“保存”按鈕，保存工程。9.2創(chuàng)建公用模塊 Module1.bas在Visual Basic中我們用公共模塊來(lái)存放整個(gè)工程項(xiàng)目公用的函數(shù)、全局變量，這樣有利于提高代碼的效率和增強(qiáng)可靠性。選擇“工程”菜單中的“添加模塊”，為項(xiàng)目添加一個(gè)Module，保存為“mdlcommon.bas”。在這個(gè)系統(tǒng)中，每個(gè)模塊都要使用數(shù)據(jù)庫(kù)，因此使用一個(gè)公用的函數(shù)，來(lái)執(zhí)行一一系列的語(yǔ)句。雙擊“mdicommon.bas”打開(kāi)公共模塊，添加如下公共模塊代碼。知識(shí)要點(diǎn)：在系統(tǒng)中，每個(gè)模塊都要使用數(shù)據(jù)庫(kù)。通過(guò)Open Table函數(shù)，用戶就不需要在每次數(shù)據(jù)庫(kù)操作中都重復(fù)輸入數(shù)據(jù)庫(kù)的連接、取結(jié)果和數(shù)據(jù)庫(kù)的關(guān)閉等類似操作的代碼，做到了程序的模塊化。這樣，后面所有要用到的添加、刪除、查詢和修改等操作都可以通過(guò)調(diào)用該函數(shù)來(lái)完成，得到相應(yīng)的結(jié)果。具體代碼如下：Public Sub OpenTable(pAdo As Adodc, pRecordSource As String) 打開(kāi)一個(gè)表，得到一個(gè)數(shù)據(jù)集 With pAdo .ConnectionString = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" _ & App.Path _ & "Hotel.mdb;Persist Security Info=False" .CommandType = adCmdUnknown .RecordSource = pRecordSource .Refresh End WithEnd Sub9.3設(shè)計(jì)主窗體 在這個(gè)工程中，我們選擇多文擋界面。MDI的好處是可以更加方便的管理程序，且占用較少的系統(tǒng)資源。選擇“工程”“添加MDI窗體”菜單，單擊“打開(kāi)”按鈕就為工程添加了一個(gè)MDI窗體。設(shè)計(jì)MDI窗體的屬性為“frmMDI”,Caption屬性為“賓館客房管理系統(tǒng)”；StartUpPosition屬性為“2-屏幕中心”。然后在添加好的窗體中，單擊鼠標(biāo)右鍵，從彈出的菜單中選擇“菜單編輯器”項(xiàng)。這時(shí)會(huì)彈出“菜單編輯器”對(duì)話框。菜單的編輯結(jié)構(gòu)如下：菜單名稱 屬 性系統(tǒng)功能(&s)MnuSystem-用戶管理(&U)MnuUser-重新登陸(&Z)Denglu2-退出系統(tǒng)(&X)MnuEXIT基本信息管理(&I)MnuInfo-客房信息(&R)MnuRoomInfo-入住情況(&G)MnuGuest-退房記錄(&C)mnuCancel信息查詢(&Q)mnuQuerySelect-客房信息查詢kefangxinxi-收費(fèi)信息查詢shoufeixinxi-效益信息查詢xiaoyixinxis報(bào)表輸出(&R)Mnureport-房間情況表(&R)MnuReportRoom-收費(fèi)情況表(&R)sfqkb窗口布局(&W)MnuWindow-水平平鋪(&H)MnuHor-垂直平鋪(&V)MnuVer-層疊(&C)MnuCasade-排列圖標(biāo)(&I)MnuIcon幫助信息(&H)MnuHelp-內(nèi)容(&C)MnuConten-關(guān)于(&A)MnuAbout完成菜單設(shè)計(jì)后,在主窗體中添加4個(gè)ADODC控件,以便后面對(duì)數(shù)據(jù)庫(kù)的一系列操作.可以說(shuō),顯示一個(gè)數(shù)據(jù)庫(kù),最方便的莫過(guò)于ADODC和DataGrid控件的相結(jié)合使用.因?yàn)槌跏肌惫ぞ呦洹敝袥](méi)有ADODC控件,所以需要我們另外添加該控件.具體添加方法如下: 在”工具箱”單擊鼠標(biāo)右件,出現(xiàn)一個(gè)彈出式菜單. 在彈出式菜單中單擊”部件”選項(xiàng),即出現(xiàn)可增加的控件列表. 在”部件”對(duì)話框中列出了微軟公司的一些控件類型,選擇其中相應(yīng)的選項(xiàng)即可,其中包括”Microsoft ADO Data Control 6.0”控件和”Microsoft DataGrid Control”控件,確定后可以發(fā)現(xiàn)控件已經(jīng)加入到”工具箱”中,可以作為制作窗體的工具了.添加完4個(gè)ADODC控件,可得到完整的主窗體,界面中的4個(gè)ADODC控件的Visible屬性值為”false”,目的是隱藏這些控件,不讓用戶看到,美化界面.具體的屬性如表:控件名稱控件屬性屬性值A(chǔ)dodcNameAdoroomCaptionAdoroomVisiblefalse AdodcNameAdoguestCaptionAdoguestVisiblefalseAdodcNameAdocancelCaptionAdocancelVisiblefalseAdodcNameAdoqueryCaptionAdoqueryVisiblefalse主界面控件屬性表現(xiàn)在，主窗體已經(jīng)設(shè)計(jì)好了，選擇“文件”中的“保存”frmMDI.frm”菜單，保存該主窗體。下面對(duì)其中的代碼進(jìn)行主要分析。進(jìn)入主窗體時(shí)還必須進(jìn)行初始化操作，初始化工作主要是完成各個(gè)ADODC控件和其對(duì)應(yīng)的表的連接。圖9.3第十章 各模塊視圖10.1用戶登陸窗口用戶要使用本系統(tǒng)，首先必須通過(guò)系統(tǒng)的身份認(rèn)證，登錄過(guò)程主要就是根據(jù)用戶和密碼來(lái)判斷用戶是否可以進(jìn)入系統(tǒng)。打開(kāi)新建工程時(shí)系統(tǒng)自動(dòng)生成的第一個(gè)窗體，前面我們已經(jīng)命名為frmlogin.frm，我們將它作為登錄窗體。在這個(gè)窗體中添加2個(gè)（Lable）控件，用來(lái)標(biāo)識(shí)窗體中的信息；2個(gè)文本框（TextMox）控件，用來(lái)輸入用戶和密碼；2個(gè)按鈕（CommandButton）控件，用來(lái)確定或取消登錄，1個(gè)ADODC控件，用它來(lái)完成和Users表的連接。(1)初始化過(guò)程Form-Load() 窗體初始化時(shí)打開(kāi)用戶表。 (2)cmdOk-Click過(guò)程(3)mdCancel-Click過(guò)程(4)單擊“取消“，系統(tǒng)不進(jìn)行驗(yàn)證，自動(dòng)退出系統(tǒng)。Option Explicit在進(jìn)行“登錄“窗體設(shè)計(jì)時(shí)，必須注意查詢語(yǔ)句的格式。為了防止他人冒充，必須記錄用戶登錄錯(cuò)誤的登錄次數(shù)，當(dāng)達(dá)到3次時(shí)，強(qiáng)制退出。圖10.110.2添加客房信息客房信息管理模塊主要是完成房間編號(hào)、房間級(jí)別、房間類型、房間價(jià)格、是否住人等信息的輸入、修改和刪除等等?！翱头啃畔ⅰ贝绑w包括4個(gè)CommandButton控件，1個(gè)DataGrid控件，1個(gè)Frame控件。窗體中控件屬性如表所示窗提設(shè)置好后，我們將其保存為“frmRoomInfo.frm”.控件或窗體屬性屬性取值FormNamefrmRoomInfoCaption客放信息DataGridNameDtgRoomInfoCaption為空FameNameFrame1Caption3CommandNameCmdAddNewCaption添加CommandNameCmdEditCaption修改CommandNameCmdDeleteCaption刪除CommandNameCmdExitCaption退出客房信息控件屬性表 圖10.21 drgRoomRefresh函數(shù) 每次進(jìn)入“客房信息”窗體，都必須更新dtgRoomInfo中的內(nèi)容，以顯示數(shù)據(jù)庫(kù)和實(shí)時(shí)更新信息的改動(dòng)。2 cmdAddNew-Click過(guò)程 當(dāng)用戶單擊“添加”按鈕時(shí)，調(diào)用cmdnNew-Click過(guò)程。 3 cmdDelete-Click過(guò)程 當(dāng)用戶單擊“刪除”按鈕，將觸發(fā)cmdDelete-Click過(guò)程。4CmdEdit-Click過(guò)程 當(dāng)用戶單擊“修改”按鈕時(shí)，將觸發(fā)CmdEdit-Click事件。5 cmdExit-Click過(guò)程6 窗體的初始化Form-Load() 登錄該窗體時(shí)要對(duì)該窗體進(jìn)行初始化，初始化窗體主要任務(wù)就是更新dtgRoomInfo中的內(nèi)容即調(diào)用dtgRoomRefresh函數(shù)。10.3設(shè)計(jì)客人信息管理窗體 客人信息管理主要完成客人姓名、身份證號(hào)、房間號(hào)、入住日期的輸入、修改和刪除等工作“客人信息”窗體中的控件和“客房信息”管理窗體中的控件相同，唯一不同的是窗體Caption、Name、和DataGrid控件中的對(duì)應(yīng)屬性不同。在這里屬性的取值分別為：“客人信息“frmGuestInfo”10.4查詢客房信息圖10.410.5查詢剩余客房信息圖10.510.6添加訂房信息圖10.610.7添加退房信息圖10.710.8報(bào)表輸出“數(shù)據(jù)報(bào)表設(shè)計(jì)器”(Data Report designer)是Visual Basic 6.0的新增功能它的出現(xiàn)大大增強(qiáng)了Visual Basic處理數(shù)據(jù)的能力.它是一個(gè)極為靈活的報(bào)表設(shè)計(jì)工具,可以”數(shù)據(jù)環(huán)境數(shù)據(jù)器”作為數(shù)據(jù)源創(chuàng)建有層次的,匯總?cè)舾申P(guān)系型數(shù)據(jù)表數(shù)據(jù)的復(fù)雜報(bào)表 下面以本例系統(tǒng)的報(bào)表為例,闡述如何使用”數(shù)據(jù)報(bào)表設(shè)計(jì)器”來(lái)設(shè)計(jì)一個(gè)數(shù)據(jù)報(bào)表.10.8.1房間基本情況表圖10.8.110.8.2旅客入住情況表圖10.8.2擇Visual Basic 6.0”Project”菜單的“Add Data Report”子菜單命令，為Hotel工程加入“數(shù)據(jù)報(bào)表設(shè)計(jì)器”。將Data Report對(duì)象的Name屬性設(shè)置為“drpRoomRequired”,Caption屬性設(shè)置為“DataReport1”。在報(bào)表標(biāo)頭處加入1Label個(gè)控件，將它的Caption屬性設(shè)置為“房間基本情況表”。在報(bào)表葉標(biāo)頭出加入5個(gè)控件，分別將其Caption屬性設(shè)置為“房間號(hào)”、“房間級(jí)別”、“房間等級(jí)”、“房間價(jià)格”、“狀態(tài)”。在報(bào)表細(xì)節(jié)處加入5個(gè)RptTexBox,將其Name分別設(shè)置為“txtRoomNo”。在數(shù)據(jù)報(bào)表設(shè)計(jì)好以后，在主窗體模塊中添加相應(yīng)的代碼就可以進(jìn)行報(bào)表的打印了。10.9 關(guān)于本系統(tǒng)由于本系統(tǒng)數(shù)據(jù)訪問(wèn)用ADODC控件，因此在運(yùn)行調(diào)試前，需要添加Micosoft ADOO Data Concrol控件和Microsoft DataGrid Control控件。具體方法：通過(guò)“工程“”部件“來(lái)添加。圖10.9第十一章 數(shù)據(jù)庫(kù)概述11.1數(shù)據(jù)庫(kù)設(shè)計(jì)數(shù)據(jù)庫(kù)是信息管理系統(tǒng)的后臺(tái)，存儲(chǔ)著所有的信息，在信息管理系統(tǒng)中占有非常重要的地位。數(shù)據(jù)庫(kù)結(jié)構(gòu)設(shè)計(jì)的好壞對(duì)應(yīng)用系統(tǒng)的效率及實(shí)現(xiàn)產(chǎn)生直接影響，而且好的數(shù)據(jù)庫(kù)結(jié)構(gòu)也將有利于程序的實(shí)現(xiàn)。這里我們采用Access2000作為后臺(tái)數(shù)據(jù)庫(kù)。11.2數(shù)據(jù)庫(kù)管理數(shù)據(jù)庫(kù)（Database,簡(jiǎn)稱DB）是計(jì)算機(jī)內(nèi)的有組織的、可共享的、相關(guān)數(shù)據(jù)的集合，即Access存儲(chǔ)數(shù)據(jù)的地方。從邏輯結(jié)構(gòu)上看，數(shù)據(jù)庫(kù)由表、查詢、窗體、報(bào)表、宏等數(shù)據(jù)庫(kù)對(duì)象組成，數(shù)據(jù)庫(kù)中的數(shù)據(jù)按一定的數(shù)據(jù)模型組織、描述和存儲(chǔ)，具有較小的冗余度、較高的數(shù)據(jù)獨(dú)立性和易擴(kuò)展性；從物理結(jié)構(gòu)上看數(shù)據(jù)庫(kù)以文件的形式保存在磁盤中，數(shù)據(jù)的存儲(chǔ)獨(dú)立于使用它的程序，并可為各種用戶共享。數(shù)據(jù)庫(kù)管理系統(tǒng)（Database Management System簡(jiǎn)稱DBMS）是為了科學(xué)組織和存儲(chǔ)數(shù)據(jù)，高效的獲取和維護(hù)數(shù)據(jù)而設(shè)計(jì)的數(shù)據(jù)管理軟件。11.2.1關(guān)系型數(shù)據(jù)庫(kù)概念關(guān)系型數(shù)據(jù)結(jié)構(gòu)將一些復(fù)雜的數(shù)據(jù)結(jié)構(gòu)歸結(jié)為簡(jiǎn)單的二元關(guān)系，例如賓館客房管理系統(tǒng)中的房間情況表就是一個(gè)二元關(guān)系如下圖： 房間號(hào)是否標(biāo)準(zhǔn)間是否套間房間價(jià)格是否有人住110是是300有111否否150無(wú) 作為一個(gè)關(guān)系的二維表，可以看成是具有相同性質(zhì)的記錄的集合，它必須滿足以下條件； 表中每一數(shù)據(jù)必須是基本數(shù)據(jù)項(xiàng)（即不可再分）。 表中每一列必須是具有相同的數(shù)據(jù)類型（例如，字符型或數(shù)值型）。 表中每一列的名字必須是唯一的。 表中不應(yīng)該有內(nèi)容完全相同的行。行的順序和列的順序不影響表格中的所表示的信息的含義。由關(guān)系型數(shù)據(jù)結(jié)構(gòu)組成的數(shù)據(jù)系統(tǒng)被稱為關(guān)系型數(shù)據(jù)庫(kù)系統(tǒng)。在關(guān)系型數(shù)據(jù)庫(kù)中，對(duì)數(shù)據(jù)的操作幾乎全部建立在一個(gè)或多個(gè)關(guān)系表上，通過(guò)對(duì)這些關(guān)系表的分類、合并、連接或選取的運(yùn)算，來(lái)實(shí)現(xiàn)數(shù)據(jù)的管理。一個(gè)實(shí)際的應(yīng)用問(wèn)題，通過(guò)數(shù)據(jù)庫(kù)的優(yōu)化一般需要用多個(gè)關(guān)系來(lái)表示。概括的說(shuō)，一個(gè)關(guān)系表示一個(gè)數(shù)據(jù)表，若干個(gè)數(shù)據(jù)表可以構(gòu)成一個(gè)數(shù)據(jù)庫(kù)系統(tǒng)。 11.3 創(chuàng)建數(shù)據(jù)庫(kù)在Access中建立一個(gè)數(shù)據(jù)庫(kù)，只是建立一個(gè)包含數(shù)據(jù)庫(kù)對(duì)象的“空”數(shù)據(jù)庫(kù)，每個(gè)對(duì)象都沒(méi)有內(nèi)容，這需要在以后的操作中添加。直接創(chuàng)建一個(gè)可“空”的數(shù)據(jù)庫(kù)可以按照以下步驟進(jìn)行。 選擇“文件”“新建”命令，彈出“新建文件”窗口，選擇“新建”“空數(shù)據(jù)庫(kù)”命令，彈出“文件新建數(shù)據(jù)庫(kù)”對(duì)話框。 在彈出的“文件新建數(shù)據(jù)庫(kù)”對(duì)話框的“文件名”下拉列表框中輸入數(shù)據(jù)庫(kù)文件名，單擊“創(chuàng)建”按鈕，彈出新建好的數(shù)據(jù)窗口。11.3.1數(shù)據(jù)庫(kù)的打開(kāi)和關(guān)閉、刪除數(shù)據(jù)庫(kù) 打開(kāi)數(shù)據(jù)庫(kù)要使用數(shù)據(jù)庫(kù)，需要打開(kāi)數(shù)據(jù)庫(kù)。用戶找到數(shù)據(jù)庫(kù)存儲(chǔ)位置，選擇“打開(kāi)”一個(gè)Access應(yīng)用程序中，只能有一個(gè)數(shù)據(jù)庫(kù)在使用，打開(kāi)一個(gè)數(shù)據(jù)庫(kù)同時(shí)關(guān)剛剛使用的數(shù)據(jù)庫(kù)。 數(shù)據(jù)庫(kù)的關(guān)閉對(duì)象窗體或退出應(yīng)用程序都可以關(guān)閉正在使用的數(shù)據(jù)庫(kù)。 數(shù)據(jù)庫(kù)的刪除 一個(gè)數(shù)據(jù)庫(kù)為一個(gè)文件，只要?jiǎng)h除了數(shù)據(jù)庫(kù)文件，該數(shù)據(jù)庫(kù)也就被刪除，因此要清楚數(shù)據(jù)庫(kù)的所在位置和文件名。表是Access數(shù)據(jù)庫(kù)中最常用的數(shù)據(jù)庫(kù)對(duì)象，在數(shù)據(jù)庫(kù)結(jié)構(gòu)設(shè)計(jì)時(shí)，應(yīng)首先考慮數(shù)據(jù)庫(kù)中表的組成與結(jié)構(gòu)。11.4 字段定義 Access數(shù)據(jù)庫(kù)有著關(guān)系型數(shù)據(jù)庫(kù)的共性，數(shù)據(jù)表中的每一條記錄都包含許多字段，分別存儲(chǔ)著關(guān)于每個(gè)記錄的不同類型的信息，字段的定義是數(shù)據(jù)庫(kù)相當(dāng)重要的工作。字段的定義：包括字段名、數(shù)據(jù)類型、寬度、字段的功能設(shè)置和說(shuō)明等 數(shù)據(jù)類型應(yīng) 用 寬 度文本文本或數(shù)字0255個(gè)字符備注文本或數(shù)字064000個(gè)字符數(shù)字?jǐn)?shù)值1、2、4或8B日期/時(shí)間數(shù)值8B貨幣數(shù)值8B自動(dòng)編號(hào)添加新記錄時(shí)會(huì)自動(dòng)加14B是/否邏輯型1位OLE對(duì)象OLE對(duì)象最大1GB超級(jí)連接鏈接到其他對(duì)象或Web地址最大64 000個(gè)字符查詢列表值4B表 Access數(shù)據(jù)類型字段采取什么數(shù)據(jù)類型取決于以下幾個(gè)方面。 字段中可以使用什么類型的值。 需要用多少存儲(chǔ)空間來(lái)保存字段的值。 是否需要對(duì)數(shù)據(jù)進(jìn)行計(jì)算以及需要對(duì)數(shù)據(jù)進(jìn)行何種計(jì)算。 是否需要排序和索引字段。備注型、超級(jí)鏈接型及OLE對(duì)象型字段均不能使用排序和索引。 是否對(duì)字段中的值進(jìn)行排序 是否需要在查詢中或報(bào)表中對(duì)記錄進(jìn)行分組。 自動(dòng)編號(hào)是一種特殊的整型類型，一般設(shè)置為主鍵。一個(gè)表中只能有一個(gè)字段的數(shù)據(jù)類型是自動(dòng)編號(hào)型的。 超級(jí)鏈接型的字段可以保存超級(jí)鏈接地址。 查詢字段可以使用“列表框”或“組合框”從另一個(gè)表或列表中選擇一個(gè)值。11.5 創(chuàng)建表創(chuàng)建表一般有3個(gè)辦法：一是使用設(shè)計(jì)器創(chuàng)建表，二是使用向?qū)?chuàng)建表三是通過(guò)輸入數(shù)據(jù)創(chuàng)建表。使用設(shè)計(jì)器創(chuàng)建表是相對(duì)靈活的方法，需要對(duì)字段類型及字段屬性有清楚的了解，有一定難度，但是可以完成表的所有功能；使用向?qū)?chuàng)建表對(duì)于用戶來(lái)說(shuō)很方便，符合用戶的操作習(xí)慣，但是創(chuàng)建好的表不一定符合自己的實(shí)際情況，這時(shí)可以通過(guò)表設(shè)計(jì)器來(lái)完成善；通過(guò)輸入數(shù)據(jù)創(chuàng)建表是較直接的方法，一般也需要表設(shè)計(jì)器進(jìn)行修改完善。11.6工程的概念 Visual Basic是使用工程來(lái)管理程序代碼和窗體的。在利用 Visual Basic開(kāi)發(fā)軟件的過(guò)程中，通常將所開(kāi)發(fā)的 一個(gè)應(yīng)用程序稱為一個(gè)工程。實(shí)際上，一個(gè)工程就是構(gòu)成該應(yīng)用程序的所有文件、對(duì)象、數(shù)據(jù)的集合。在Visual Basic的一個(gè)工程中，一般包含以下4種類型的文件。 窗體模塊文件，其擴(kuò)展名為.frm。工程中的每個(gè)窗體都有一個(gè)獨(dú)立的窗體文件。它包含窗體及其控件的描述和屬性的設(shè)置，以及所有窗體級(jí)的常量、變量、外部過(guò)程的聲名、事件過(guò)程、通用子過(guò)程和函數(shù)。 若窗體中含有二進(jìn)制屬性的內(nèi)容，如圖片或圖標(biāo)等，Visual Basic會(huì)自動(dòng)產(chǎn)生一個(gè)窗體文件的二進(jìn)制文件，其擴(kuò)展名為.frx。它包含了窗體上控件的屬性數(shù)據(jù)，這些數(shù)據(jù)不可被用戶編輯。 標(biāo)準(zhǔn)模塊文件，其擴(kuò)展名為.bas標(biāo)準(zhǔn)模塊中可以包含數(shù)據(jù)類型、常量、變量、過(guò)程和函數(shù)的聲名。 類模塊文件，其擴(kuò)展名為.cls。只有工程中添加了類模塊，才會(huì)在工程中包含類模塊文件。每一個(gè)類模塊都有類模塊文件。類模塊與窗體模塊相似，只是沒(méi)有可見(jiàn)的用戶界面，可以使用類模塊創(chuàng)建含有方法和屬性代碼的用戶自定義對(duì)象。11.7 過(guò)程和函數(shù)在處理比較復(fù)雜的問(wèn)題時(shí)根據(jù)程序化設(shè)計(jì)的原則，可將某個(gè)復(fù)雜的任務(wù)根據(jù)功能分解為多個(gè)模塊再根據(jù)作用細(xì)分為更小的數(shù)據(jù)單元。構(gòu)成這些程序單元的程序被稱為過(guò)程，通常過(guò)程用來(lái)完成某個(gè)特定的功能。在Visual Basic程序中，使用過(guò)程可以使程序結(jié)構(gòu)更清晰更加條理化，可以使復(fù)雜的計(jì)算較容易理解和實(shí)現(xiàn)。此外，在程序中使用過(guò)程，可以提高編程效率，代碼更容易維護(hù)，也減少了代碼的出錯(cuò)率。11.7.1自定義過(guò)程用戶自定義過(guò)程是根據(jù)用戶需要所確定的程序結(jié)構(gòu)，與界面設(shè)計(jì)無(wú)關(guān)，可以被其他程序調(diào)用。在Visual Basic程序中，根據(jù)用戶自定義過(guò)程的性質(zhì)，可以分以下四類過(guò)程。 Sub（子程序）過(guò)程 Function(函數(shù))過(guò)程。 Event(事件)過(guò)程 Propetry(屬性)過(guò)程我們通常將Sub過(guò)程、Function過(guò)程稱為通用過(guò)程，兩者之間的差異并不大，只是函數(shù)過(guò)程（Function）有一個(gè)返回值，而子程序過(guò)程（Sub）則沒(méi)有返回值11.7.2函數(shù)過(guò)程執(zhí)行函數(shù)過(guò)程會(huì)得到一個(gè)確定值，稱為函數(shù)過(guò)程的返回值，因此，對(duì)函數(shù)過(guò)程的聲明要有一個(gè)返回值類型的說(shuō)明。若省略返回值類型的說(shuō)明，則函數(shù)的返回值將是Variant類型。函數(shù)返回值必須在函數(shù)的程序段中用“函數(shù)名稱=返回值”指定，它的作用是將函數(shù)過(guò)程處理的結(jié)果帶回函數(shù)調(diào)用處。如果沒(méi)有這條語(yǔ)句，該函數(shù)則會(huì)返回一個(gè)系統(tǒng)默認(rèn)值。11.8 Function函數(shù)過(guò)程的建立可以在標(biāo)準(zhǔn)模塊和窗體模塊的代碼中創(chuàng)建Function函數(shù)過(guò)程，只要將插入點(diǎn)放在所有現(xiàn)有過(guò)程之外，按照函數(shù)過(guò)程的語(yǔ)法在代碼窗體中輸入函數(shù)的各個(gè)語(yǔ)句。注意不能在外的Function函數(shù)和Sub子過(guò)程中定義函數(shù)過(guò)程。創(chuàng)建函數(shù)的另一方法是利用Visual Basic提供的“添加過(guò)程”命令。在“工具”菜單中選擇“添加過(guò)程”命令，打開(kāi)“添加過(guò)程”對(duì)話框，在“名稱”框中輸入函數(shù)過(guò)程名，在“類型”中選擇類型為“函數(shù)”，在“范圍”中選擇函數(shù)的作用域，即“公有的”還是“私有的”。11.9事件過(guò)程 事件過(guò)程是程序響應(yīng)用戶引發(fā)的事件或系統(tǒng)引發(fā)的事件而執(zhí)行的代碼塊。一個(gè)窗體的事件過(guò)程通常和窗體相關(guān)聯(lián)，當(dāng)某個(gè)窗體事件發(fā)生時(shí)調(diào)用對(duì)應(yīng)的事件過(guò)程，若要?jiǎng)?chuàng)建事件過(guò)程，只要在Visual Basic的代碼窗體中，從“對(duì)象列表框”中選擇一個(gè)對(duì)象，從“事件列表框”中選擇一個(gè)事件，系統(tǒng)會(huì)自動(dòng)提供正確的事件過(guò)程名，用戶只要在中間加上自己的程序代碼即可。11.10 模塊的概念Visual Basic的代碼存儲(chǔ)在模塊中。簡(jiǎn)單的應(yīng)用程序可以只有一個(gè)窗體，程序都存放在窗體模塊中。當(dāng)應(yīng)用程序比較復(fù)雜時(shí)，就需要另外添加多個(gè)窗體。這樣，可能有幾個(gè)窗體中有一些共同需要執(zhí)行的代碼，為了在2個(gè)窗體中不產(chǎn)生重復(fù)代碼，可創(chuàng)建一個(gè)獨(dú)立的模塊，用它實(shí)現(xiàn)代碼公用，該獨(dú)立模塊就是標(biāo)準(zhǔn)模塊。此外還可以建立包含共享代碼與數(shù)據(jù)的類模塊。標(biāo)準(zhǔn)模塊、類模塊和窗體模塊都可包含： 聲名?？蓪⒊?shù)、類型、變量和動(dòng)態(tài)鏈接庫(kù)（DLL）的聲明放在窗體、類或標(biāo)準(zhǔn)模塊的聲名部分。每個(gè)模塊只有一個(gè)聲名部分。 過(guò)程。每個(gè)模塊可有多個(gè)過(guò)程Visual Basic主要有子過(guò)程、函數(shù)過(guò)程或者屬性過(guò)程等。11.10.1窗體模塊Visual Basic是面向?qū)ο蟮膽?yīng)用程序開(kāi)發(fā)工具，其應(yīng)用程序的代碼結(jié)構(gòu)就是該程序在屏幕上表示的對(duì)應(yīng)模型。應(yīng)用程序中的每個(gè)窗體都有一個(gè)相對(duì)應(yīng)的窗體模塊，窗體模塊是Visual Basic應(yīng)用程序的基礎(chǔ)。窗體模塊可以包含處理事件的過(guò)程、通用過(guò)程以及變量、常數(shù)、自定義類型和外部過(guò)程的窗體級(jí)聲明。寫入窗體模塊的代碼是該窗體所屬的具體應(yīng)用程序?qū)Ｓ玫?，也可以引用該程序?nèi)的其他窗體和對(duì)象。 每個(gè)窗體模塊都包含事件過(guò)程，在事件過(guò)程中有為響應(yīng)該事件而執(zhí)行的程序段。窗體可包含控件。在窗體模塊中，窗體上的每個(gè)控件都有相應(yīng)的事件過(guò)程。除了事件過(guò)程，窗體模塊還可包含通用過(guò)程，它對(duì)來(lái)自該窗體中任何事件過(guò)程的調(diào)用都作出響應(yīng)。11.10.2標(biāo)準(zhǔn)模塊 標(biāo)準(zhǔn)模塊是窗體中的一個(gè)獨(dú)立模塊，可將那些與特定窗體或控件無(wú)關(guān)的代碼放入標(biāo)準(zhǔn)模塊中。標(biāo)準(zhǔn)模塊中包含應(yīng)用程序內(nèi)的允許其他模塊訪問(wèn)的過(guò)程和聲明。在默認(rèn)狀態(tài)下，變量對(duì)于事件過(guò)程來(lái)說(shuō)是局部的，就是說(shuō)只能在創(chuàng)建這些變量的事件過(guò)程中讀取或修改變量。與之相似，事件過(guò)程對(duì)于創(chuàng)建它們的窗體來(lái)說(shuō)也是局部。但在編寫程序時(shí)，很可能會(huì)遇到一些使用相同變量和過(guò)程的窗體和事件過(guò)程。為了在工程中的所有窗體和事件中共享變量和過(guò)程，需要在該工程的一個(gè)或多個(gè)標(biāo)準(zhǔn)模塊中對(duì)它們進(jìn)行聲名和定義。正如窗體一樣，標(biāo)準(zhǔn)模塊被單獨(dú)列在“工程”窗體內(nèi)，但是與窗體不同，窗體模塊不包含對(duì)象或?qū)傩栽O(shè)置而只包含可在代碼窗體中顯示和編輯的代碼。若要在程序中創(chuàng)建標(biāo)準(zhǔn)模塊，可單擊工具欄“添加窗體”按鈕上的下拉箭頭并單擊“模塊”，或者單擊“工程”菜單中的“添加模塊”菜單項(xiàng)。11.11訪問(wèn)數(shù)據(jù)庫(kù)類型Visual Basic 訪問(wèn)數(shù)據(jù)庫(kù)技術(shù)分為以下幾個(gè)部分： Microsoft可視化數(shù)據(jù)工具。使用Visual Basic 6.0可以創(chuàng)建每個(gè)步驟封裝在數(shù)據(jù)訪問(wèn)系統(tǒng)中的部件。從數(shù)據(jù)源開(kāi)始，Microsoft可視化數(shù)據(jù)工具提供了在Access、SQL Server和Oracl系統(tǒng)中查看并操作表和視圖的功能。 中間部件和Microsoft Transaction Server。在生成自己的ActiveX Dll和EXE時(shí)，用戶還可以在應(yīng)用程序中使用Visual Basic創(chuàng)建中間層部件。Visual Basic現(xiàn)在的增強(qiáng)功能允許用戶自定義應(yīng)用程序，以便同Microsoft Transaction Server。一起使用。由于數(shù)據(jù)訪問(wèn)是通過(guò)中間層進(jìn)行的，因此客戶端可以不再與數(shù)據(jù)庫(kù)直接建立數(shù)據(jù)連接，也就是說(shuō)，建立數(shù)據(jù)服務(wù)器上的連接數(shù)量將大大減少。 ActiveX Data Objects(ADO)。它實(shí)際上是一種提供訪問(wèn)各種數(shù)據(jù)類型的連接機(jī)制。ADO設(shè)計(jì)為一種極簡(jiǎn)單的格式，通過(guò)ODBC的 同數(shù)據(jù)庫(kù)接口相連。用戶可以使用任何一種ODBC數(shù)據(jù)源，即不僅適合于SQL Server、Oracle、Access等數(shù)據(jù)庫(kù)管理系統(tǒng)，也適合于Excel表格、文本文件、圖形文件和無(wú)格式的數(shù)據(jù)文件。ADO是基于OLE DB之上的技術(shù)，因此ADO通過(guò)其內(nèi)部的屬性和方法能夠提供統(tǒng)一的數(shù)據(jù)訪問(wèn)接口方法。為了向后兼容和工程維護(hù)方便，它支持遠(yuǎn)程數(shù)據(jù)對(duì)象和數(shù)據(jù)訪問(wèn)對(duì)象。 數(shù)據(jù)源和數(shù)據(jù)控件。在客戶端，有幾種新的數(shù)據(jù)源是可用的，其中包括數(shù)據(jù)環(huán)境，它是一種圖形設(shè)計(jì)器，允許快速創(chuàng)建ADO Connection和Command來(lái)訪問(wèn)數(shù)據(jù)。數(shù)據(jù)環(huán)境設(shè)計(jì)器，為工程中的數(shù)據(jù)訪問(wèn)對(duì)象動(dòng)態(tài)可編程界面。此外，數(shù)據(jù)環(huán)境還提供了高級(jí)的數(shù)據(jù)定型服務(wù)，即創(chuàng)建相關(guān)數(shù)據(jù)的層次結(jié)構(gòu)、合計(jì)以及自動(dòng)分組等功能，所有這些都不需要代碼。 動(dòng)態(tài)數(shù)據(jù)綁定。Visual Basic具有將數(shù)據(jù)源動(dòng)態(tài)綁定到數(shù)據(jù)使用者的功能。運(yùn)行時(shí)，可以將數(shù)據(jù)使用者的DataSource屬性設(shè)置為某個(gè)數(shù)據(jù)源。這種功能在先前的Visual Basic版本中是不可用的，它允許創(chuàng)建能夠訪問(wèn)大量數(shù)據(jù)源的應(yīng)用程序。 數(shù)據(jù)化格式和數(shù)據(jù)有效驗(yàn)證。DataFormat對(duì)象允許使用自定義格式顯示數(shù)據(jù)，但是將數(shù)據(jù)寫入數(shù)據(jù)庫(kù)時(shí)將使用本地格式。例如，可以使用與國(guó)家/地區(qū)相適應(yīng)的格式顯示日期，而實(shí)際的數(shù)據(jù)卻以日期的格式存儲(chǔ)。從數(shù)據(jù)源取出的數(shù)據(jù)被格式化，而放回的數(shù)據(jù)確是未格式化的。它還支持自定義格式，并可以使用Format和UnFormat事件執(zhí)行附加的檢查 DHTML和數(shù)據(jù)庫(kù)訪問(wèn)。DHTML不是有關(guān)面向服務(wù)器的腳本、Java Applet或動(dòng)化GIF圖象，所有這些操作都可以自己完成，除了改變頁(yè)面內(nèi)容外，不需要訪問(wèn)服務(wù)器。頁(yè)面下載后，無(wú)論什么時(shí)候，DHTML都能處理頁(yè)面元素，改變頁(yè)面版面、內(nèi)容和位置，并將結(jié)果不斷的提供給用戶。使用Visual Basic，可以為數(shù)據(jù)訪問(wèn)創(chuàng)建完整的Web應(yīng)用程序。所有數(shù)據(jù)工具和技術(shù)都可以在DHTML頁(yè)面和Web服務(wù)器應(yīng)用程序中使用。11.12使用ADO訪問(wèn)數(shù)據(jù)庫(kù)在Visual Basic中共有3種可使用的數(shù)據(jù)庫(kù)訪問(wèn)對(duì)象。 ADO ActiveX 數(shù)據(jù)對(duì)象。 RDO遠(yuǎn)程數(shù)據(jù)對(duì)象。 DAO數(shù)據(jù)訪問(wèn)對(duì)象。11.12.1 ADO簡(jiǎn)介其中，最新的一項(xiàng)技術(shù)是ADO，它已經(jīng)包含了DAO/RDO中的功能。ADO即ActiveX數(shù)據(jù)對(duì)象實(shí)際上是一種提供訪問(wèn)各種數(shù)據(jù)類型的連接機(jī)制。ADO設(shè)計(jì)為一種極簡(jiǎn)單的格式，通過(guò)ODBC的方法同數(shù)據(jù)庫(kù)接口相連。用戶可以使用任何一種ODBC數(shù)據(jù)源，即不僅適合于SQL Server、Oracle、Access等數(shù)據(jù)庫(kù)管理系統(tǒng)，也適合于Excel表格、文本文件、圖形文件和無(wú)格式的數(shù)據(jù)文件。ADO是基于OLEDB之上的技術(shù)，因此ADO通過(guò)其內(nèi)部的屬性和方法能夠提供統(tǒng)一的數(shù)據(jù)訪問(wèn)接口方法。11.12.2 ADO層次模型ADO對(duì)象可以在所有支持COM和OLE的平臺(tái)上使用，包括以下的7個(gè)對(duì)象。 Connection連接數(shù)據(jù)來(lái)源 Command從數(shù)據(jù)源獲取所須數(shù)據(jù)的命令信息。 Parameter與命令對(duì)象有關(guān)的參數(shù)。 Recordset所獲得的一組記錄組成的記錄集。 Field包含了記錄集中某個(gè)字段的信息。 Property屬性信息 Error在訪問(wèn)數(shù)據(jù)時(shí)，由數(shù)據(jù)源所返回的錯(cuò)誤信息。ADO的核心是Connection、Recordset和Command對(duì)象。使用時(shí)先用Connection對(duì)象與服務(wù)器建立連接，然后用Command對(duì)象執(zhí)行命令，如查詢、更新等，再用Recordset對(duì)象來(lái)操作和查詢結(jié)果。11.12.3 ADO編程模型ADO通過(guò)以下幾步來(lái)完成對(duì)數(shù)據(jù)庫(kù)的操作。 創(chuàng)建一個(gè)到數(shù)據(jù)源的連接（Connection），連接到數(shù)據(jù)庫(kù)；或者開(kāi)始一個(gè)事務(wù) 創(chuàng)建一個(gè)代表SQL命令的對(duì)象。 執(zhí)行命令。 如果返回以表格形式組織的數(shù)據(jù)，則將它們保存在緩存中，產(chǎn)生相應(yīng)的數(shù)據(jù)集對(duì)象。這樣便于查找、操作數(shù)據(jù)。 通過(guò)數(shù)據(jù)集對(duì)象對(duì)數(shù)據(jù)進(jìn)行各種操作，包括修改、增加、刪除等。 更新數(shù)據(jù)源，如果使用事務(wù)，確認(rèn)是否接受事務(wù)期間發(fā)生的數(shù)據(jù)變化。 結(jié)束連接和事務(wù)。11.12.4 添加ADO雖然集成在Visual Basic 6.0中，但只是可選項(xiàng)。因此在創(chuàng)建項(xiàng)目后需要為項(xiàng)目添加ADO。選擇“工程”菜單中的“引用”命令，選擇“Mircrosoft ActiveX Objects Data2.6 Library”選項(xiàng)，單擊OK按鈕。這樣在程序中使用ADO時(shí)不會(huì)出現(xiàn)編譯錯(cuò)誤。第十二章 結(jié)論近年來(lái)，隨著改革開(kāi)放的加快，我國(guó)人民生活水平顯著提高，伴隨著我國(guó)旅游業(yè)的高速發(fā)展，賓館行業(yè)的服務(wù)檔次迫切需要提高。在賓館行業(yè)競(jìng)爭(zhēng)激烈的今天，要成為佼佼者，就必須與高新技術(shù)緊密結(jié)合。傳統(tǒng)的純手工或簡(jiǎn)單的計(jì)算工具，已經(jīng)不適應(yīng)現(xiàn)代經(jīng)濟(jì)高速發(fā)展的要求，必須運(yùn)用現(xiàn)代化管理手段，配備完善的自動(dòng)化設(shè)備，提高客房的服務(wù)水平與質(zhì)量，從而贏得高信譽(yù)，強(qiáng)實(shí)力，好效益！ 賓館客房管理系統(tǒng)提供賓館客房科學(xué)、規(guī)范的現(xiàn)代管理模式，使賓館客房管理跨上一個(gè)新的臺(tái)階，一個(gè)先進(jìn)的管理手段即高效率計(jì)算機(jī)管理方式引導(dǎo)賓館行業(yè)的發(fā)展，不僅能為賓館帶來(lái)巨大的直接經(jīng)濟(jì)效益，而且還能提高賓館服務(wù)水準(zhǔn)和員工工作效率，使賓館客房管理進(jìn)入一個(gè)新層次，提高服