【正文】 , 單據(jù)編號(hào) in (select 入住單號(hào) from 入住單表 )) (消費(fèi)記錄表, ) (預(yù)訂單表, ) …………………………………………………36 End If If = True Then (客房信息表, ) (客房類型表, ) ………………………………………………… End If MsgBox(數(shù)據(jù)清理完畢！ , , 操作成功) End Sub②點(diǎn)擊備份按鈕，對(duì)數(shù)據(jù)庫進(jìn)行備份，代碼如下：Dim strsql As String 39。, 單據(jù)編號(hào) in (select 預(yù)訂單號(hào) from 預(yù)訂單表 )) (客房信息表, 客房狀態(tài)=39。)………………………………………………… If = True Then (客房信息表, 客房狀態(tài)=39。)) (預(yù)訂單表, 預(yù)訂日期 between 39。, 單據(jù)編號(hào) in (select 預(yù)訂單號(hào) from 預(yù)訂單表 where 預(yù)訂日期 between 39。（3）代碼設(shè)計(jì) ①點(diǎn)擊確定按鈕，按用戶選定的條件對(duì)數(shù)據(jù)庫進(jìn)行清理，代碼如下：Private Sub btnConfirm_Click(ByVal sender As , ByVal e As ) Handles If = True Then (客房信息表, 客房狀態(tài)=39。在進(jìn)行備份操作時(shí)，用戶可自由指定數(shù)據(jù)庫備35份文件的路徑和名稱，點(diǎn)擊備份按鈕即可在指定路徑生成一個(gè)數(shù)據(jù)庫備份文件。刪除商品信息表中的所有商品信息。) ().Delete() (DataSetXFJL1, 消費(fèi)記錄表) MsgBox(結(jié)帳成功, , 操作成功) () End Sub 數(shù)據(jù)庫維護(hù)窗體設(shè)計(jì)（1）窗體功能描述本窗體的功能是實(shí)現(xiàn)對(duì)于系統(tǒng)數(shù)據(jù)庫的維護(hù)功能，可以有效的提高系統(tǒng)內(nèi)數(shù)據(jù)的安全性和可靠性，是本系統(tǒng)中最重要的功能模塊之一。) (入住單表, 入住單號(hào) = 39。) (消費(fèi)記錄表, 入住單號(hào) =39。, 單據(jù)編號(hào)= 39。代碼如下： Private Sub btnJZ_Click(ByVal sender As , ByVal e As ) Handles (DataSetJZD1, 結(jié)帳單表).EndCurrentEdit() (DataSetJZD1, 結(jié)帳單表) (客房信息表, 客房狀態(tài)=39。累計(jì)賓客的消費(fèi)總額 XFJE += (消費(fèi)記錄表).Rows(i).Item(6) Next YSJE = ZSFY + XFJE 39。 amp。已收押金 SSJE = 0 39。代碼如下：Private Sub DataGrid1_MouseClick(ByVal sender As Object, ByVal e As ) Handles ZSFY = 0 39。 amp。（3）代碼設(shè)計(jì)①添加全局?jǐn)?shù)據(jù)公共模塊和全局變量，方便事件過程間的費(fèi)用計(jì)算。最后點(diǎn)擊結(jié)賬按鈕便完32成了退房結(jié)賬手續(xù)。刪除選中行的記錄 End Sub 退房結(jié)賬模塊設(shè)計(jì)（1）窗體功能描述當(dāng)顧客要辦理退房結(jié)賬時(shí)，操作員進(jìn)入退房結(jié)賬窗體。 (i).Cells(0).Value amp。 amp。更新數(shù)據(jù)并返回?cái)?shù)據(jù)源 Dim i As Integer For i = 0 To 1 (客房信息表, 客房狀態(tài) = 39。顯示入住單號(hào)End Sub③輸入開單信息之后，點(diǎn)擊確定即添加入住單信息。 Private Sub RentRoomForm_Load(ByVal sender As Object, ByVal e As ) Handles (DataSetEmptyRoom1) 39。圖 77 登記入住窗體登記入住窗體包括以下控件：窗體（Form） ，標(biāo)簽（Label） ，組合框（Combobox） ，文本框（TextBox） ，按鈕（Button） ，框架（Panel） ，GroupBox 控件,DataGirdview 控件和 SqlDataAdapter 控件等。當(dāng)顧客因故中途取消辦理入住時(shí)，為方便操作，節(jié)省時(shí)間，可點(diǎn)擊重置按鈕，則所有輸入框中的信息自動(dòng)清空。 amp。 間 ZRZL = DQRZ / = (ZRZL * 100).ToString(.) amp。 間 = amp。 間 Dim i As Integer For i = 0 To 1 Select Case (i).Item(4) Case 入住 DQRZ = DQRZ + 1 Case 預(yù)訂 DQYD = DQYD + 1 Case 空閑 DQKG += 1 Case 維修 DQZY += 1 Case 自用 DQZY += 1 End Select29 Next = amp。 圖 76 系統(tǒng)菜單欄（3）代碼設(shè)計(jì)①主界面載入時(shí)，將數(shù)據(jù)庫中的客房信息顯示到DataGrid表格中，并顯示酒店客房營業(yè)的總體情況。（2）窗體設(shè)計(jì)新建一個(gè)窗體并命名為“” ，并把 Text 屬性改為“小型酒店管理系統(tǒng)”。并將所有的用戶名稱添加到 Comobox 控件中。并按圖74 進(jìn)行界面設(shè)計(jì)。③用戶權(quán)限判定。②用戶當(dāng)前狀態(tài)判定。 End If Dim sql As New SqlCommand(str, sqlcon) () () End FunctionEnd Module24 系統(tǒng)窗體構(gòu)架LoginFormFormClassMainFormFormClass系統(tǒng)主界面登記入住窗體客房預(yù)訂窗體系統(tǒng)登錄界面RentRoomFormFormClassBookRoomFormFormClassSearchInfFormFormClass信息查詢窗體ChangeRoomFormFormClass更換房間窗體SearchInfFormFormClass信息查詢窗體TallyFormFormClass消費(fèi)記帳窗體QuitRoomFormFormClass結(jié)帳退房窗體YYTJFormFormClass營業(yè)統(tǒng)計(jì)窗體RoomManagementFormFormClass客房信息設(shè)置窗體CmdyManagementFormFormClass商品信息設(shè)置窗體RoomStateFormFormClass客房狀態(tài)設(shè)置窗體UserInfSetFormFormClass用戶管理窗體DataBaseFormFormClass數(shù)據(jù)庫維護(hù)窗體logFormFormClass系統(tǒng)日志窗體圖 71 系統(tǒng)窗體總構(gòu)架圖25RoomManagementFormFormClassAddRoomFormFormClassAddRoomTypeFormFormClass客房信息設(shè)置窗體添加 / 修改客房窗體添加 / 修改客房類型窗體圖 72 客房信息設(shè)置窗體構(gòu)架圖商品信息設(shè)置窗體添加 / 修改商品窗體添加 / 修改商品類別窗體CmdyManagementFormFormClassAddCmdyInfFormFormClassAddCmdyTypeFormFormClass圖 73 商品信息設(shè)置窗體構(gòu)架圖 系統(tǒng)界面設(shè)計(jì) 登錄窗體設(shè)計(jì)（1）窗體功能描述本窗體是系統(tǒng)的啟動(dòng)窗體，實(shí)現(xiàn)對(duì)于用戶身份的多重驗(yàn)證功能。 set amp。 set amp。 where amp。關(guān)閉連接 End Function Public Function DelData(ByVal str1 As String, ByVal str2 As String) As Integer () If str2 = Then str = delete from amp。 CZNR amp。 NRZY amp。 amp。 Now amp。) 39。用戶名 Dim str As String Dim sqlcon As SqlConnection = New SqlConnection(server=localhost。在本系統(tǒng)中就創(chuàng)建了幾個(gè)這樣的模塊。通過對(duì)各個(gè)實(shí)體及其屬性的描述，我們進(jìn)一步得到各實(shí)體之間的 ER 圖，如圖 610 所示。各個(gè)實(shí)體具體的實(shí)體屬性圖如下：圖 61 客房類型實(shí)體屬性圖圖 62 客房信息實(shí)體屬性圖圖 63 商品類別實(shí)體屬性圖客房類型客房價(jià)格類型名稱 備注商品信息進(jìn)貨標(biāo)記商品名稱商品價(jià)格商品類別商品編號(hào)庫存數(shù)量商品類別商品類別是否需要服務(wù)生服務(wù)類別編號(hào)客房信息類型名稱客房編號(hào)客房位置室內(nèi)電話客房描述單據(jù)編號(hào) 備注信息客房狀態(tài)16圖 64 商品信息實(shí)體屬性圖圖 65 消費(fèi)記錄實(shí)體屬性圖圖 66 入住單實(shí)體屬性圖在入住單實(shí)體中主要包括以下屬性：入住單號(hào)、顧客姓名、顧客類型、顧客來源、證件類型、證件號(hào)碼、性別、公司名稱、聯(lián)系電話、顧客人數(shù)、主房編號(hào)、類型名稱、客房價(jià)格、入住價(jià)格、折扣比例、預(yù)收金額、抵店時(shí)間、預(yù)住天數(shù)、備注等。：入住單號(hào)、顧客姓名、性別、顧客類型、顧客來源、顧客人數(shù)、證件類型、證件號(hào)碼、公司名稱、聯(lián)系電話、主房編號(hào)、類型名稱、客房價(jià)格、入住價(jià)格、折扣比例、預(yù)收金額、抵店時(shí)間、備注信息、離店時(shí)間。：記錄編號(hào)、入住單號(hào)、商品名稱、商品類別、購買價(jià)格、購買數(shù)量、消費(fèi)金額、購買日期。經(jīng)過對(duì)上述系統(tǒng)功能的分析和需求總結(jié)，設(shè)計(jì)如下數(shù)據(jù)項(xiàng)：：客房編號(hào)、類型名稱、客房位置、室內(nèi)電話、客房狀態(tài)、客房描述、據(jù)編號(hào)、備注信息。一般普通用戶可擁有前臺(tái)登記、收銀結(jié)賬以及對(duì)商品和客房信息進(jìn)行查詢和設(shè)置的權(quán)限；而超級(jí)用戶除擁有普通用戶的所有權(quán)限外，還可進(jìn)行系統(tǒng)用戶設(shè)置、數(shù)據(jù)庫維護(hù)和查看系統(tǒng)日志。其主要功能如下：（1）清除指定時(shí)間段內(nèi)或所有營業(yè)數(shù)據(jù)，包括單據(jù)信息、消費(fèi)記錄和入住歷史信息等；12（2）清空所有數(shù)據(jù)庫表，即刪除所有數(shù)據(jù)，包括客房信息；（3）備份和還原數(shù)據(jù)庫，將數(shù)據(jù)庫備份到用戶指定的路徑或從指定的路徑還原數(shù)據(jù)庫。 用戶管理模塊該模塊實(shí)現(xiàn)用戶信息管理，系統(tǒng)將用戶分為超級(jí)用戶和普通用戶兩級(jí)權(quán)限。 房態(tài)管理模塊一般系統(tǒng)可自動(dòng)管理客房狀態(tài)，而在該模塊中可查詢或手動(dòng)修改客房狀態(tài)。 客房信息設(shè)置模塊該模塊實(shí)現(xiàn)對(duì)酒店客房信息進(jìn)行管理，設(shè)置客房名稱、類型、數(shù)量等信息。輸入結(jié)賬單信息，主要包括結(jié)賬單號(hào)、入住單號(hào)、主客房間、顧客姓名、公司名稱、住宿費(fèi)用等。即刪除消費(fèi)記錄，取消商品交易。 消費(fèi)記賬模塊該模塊記錄顧客在店內(nèi)的消費(fèi)信息，包括餐飲、娛樂及零售商品的消費(fèi)情況。 更換房間模塊用戶可根據(jù)顧客的要求更換房間，但只能更換同類房間，且房價(jià)不變?？煽焖偻瓿深櫩托畔⑤斎?、選擇房間（一次可選擇多個(gè)房間） 、收取押金等顧客入住手續(xù)。為已預(yù)訂客房的顧客辦理登記入住，同時(shí)刪除相關(guān)的預(yù)訂信息。9圖 51 系統(tǒng)功能模塊結(jié)構(gòu)圖 客房預(yù)訂模塊 客房預(yù)訂模塊可使顧客在抵店之前就登記好房間，待到達(dá)之后即可辦理入住手續(xù)。 單據(jù)編號(hào)設(shè)定規(guī)則在本系統(tǒng)中，入住單號(hào)、預(yù)訂單號(hào)及結(jié)賬單號(hào)的生成方法如下：單據(jù)編號(hào)＝“單據(jù)名稱首字母組合”＋“當(dāng)天日期”＋“當(dāng)天入住顧客人數(shù)＋1” 。圖 42 住宿費(fèi)用計(jì)算方法圖另外，在退房結(jié)賬模塊內(nèi)，還存在如下費(fèi)用計(jì)算方法：應(yīng)收金額 = 住宿費(fèi)用＋消費(fèi)金額；實(shí)收金額 = 應(yīng)收金額 預(yù)收押金。 客房宿費(fèi)的計(jì)算方法在宿費(fèi)的計(jì)算方法上，根據(jù)實(shí)際情況，設(shè)置為如下方法：如果是“鐘點(diǎn)房” ，計(jì)算時(shí)間差以小時(shí)為單位。 系統(tǒng)數(shù)據(jù)和計(jì)算規(guī)則 數(shù)據(jù)精確度要求產(chǎn)生顧客消費(fèi)記錄登記入住輸入顧客信息預(yù)收押金安排顧客入住 商品消費(fèi)住宿費(fèi)用核對(duì)消費(fèi)金額結(jié)賬離店7由于本系統(tǒng)只應(yīng)用于一般性的營業(yè)操作，對(duì)數(shù)據(jù)精確度的要求不是太高，主要涉及的還是營業(yè)中各種費(fèi)用的計(jì)算，對(duì)于金額、價(jià)格、總額