【正文】 記界面如圖 所示： 劉芳 小型酒店管理系統(tǒng) 20 圖 調(diào)房登記窗體界面 Fig. Housing Register Transfer form interface 調(diào)房登記模塊主要實(shí)現(xiàn)對客人房間進(jìn)行調(diào)換的過程，源房間號列表是查詢登記表中當(dāng)前所有住宿客人的房間號碼，在選擇源房間號后，實(shí)現(xiàn)生成目標(biāo)房間號。輸出給打印機(jī) Exit Sub If = 482 Then MsgBox 請連接打印機(jī)！ , , 系統(tǒng)提示 End If End Sub 調(diào)房登記 模塊設(shè)計與實(shí)現(xiàn) 在主窗體中，選擇住宿管理菜單下的調(diào)房登記項(xiàng)，將進(jìn)入調(diào)房登記模塊。 amp。為變量 B 賦值 ?? (A, B + 100)(C, B + 100) 39。 39。 t amp。設(shè)置打印縱坐標(biāo) d amp。設(shè)置字體大小 = 100 + A 39。定義變量 A = 100: B = 500: C = 4800: d = 400 39。設(shè)置字體大小 桂湖酒店客房 (住宿證 ) 39。設(shè)置高度和寬度 = 1100: = 300 39。出錯轉(zhuǎn)向標(biāo)簽“ 1” Dim X As Printer 39。為憑證號碼文本框賦值 End If End If 當(dāng)住宿信息登記完成后，“打印”按鈕處于可用狀態(tài)，可以單擊“打印”按鈕打印住宿證。 d amp。text1 中存儲 lsph 文本框中后三位數(shù) End If If Then 39。 Format(Val(Right(, 3)) + 1, 000) 39。如果 y1 文本框中內(nèi)容與 y2 相同 = Fdate amp。把當(dāng)前月份賦給 y1 = Month(Left(, 10)) 39。當(dāng) lsph值為空為憑證號碼文本框賦值 If Then 39。 d amp。按憑證號碼排序數(shù)據(jù) If Not Then 39。 \。Data Source= amp?！暗怯洝卑粹o的 Click 事件主要實(shí)現(xiàn)設(shè)置控件有效和無效、自動生成登記憑證號碼等功能。住宿登記模塊界面如下圖 所示： 圖 住宿登記窗體界面 Fig. Acmodation Registration form interface 住宿登記模塊主要用于錄入客人入住信息，此窗體包含了大量的文 本框和時間控件等，但這些控件功能都比較簡單，沒有復(fù)雜的屬性設(shè)置。調(diào)入密碼設(shè)置 = False End Sub 住宿登記模塊設(shè) 計與實(shí)現(xiàn) 程序啟動后，選擇菜單欄中“住宿管理” /“住宿登記”命令，或直接單擊工具欄中的“登記”按鈕，將打開住宿登記模塊。調(diào)入數(shù)據(jù)備份 = False End Sub Private Sub sjhf_Click() 39。重新登錄 Load main_Login Case exit If MsgBox(確定退出該系統(tǒng)？ , 4, 系統(tǒng)提示 ) = vbYes Then End End If End Select End Sub 單擊主窗體中的菜單項(xiàng)，通過菜單命令實(shí)現(xiàn)調(diào)出各個窗體或執(zhí)行相應(yīng)操作，在各子菜單的 Click 事件下實(shí)現(xiàn)相應(yīng) 操作。調(diào)入住宿查詢 Case TX sftx_Click 39。調(diào)入住宿登記 Case TF tf_Click 39。例如，在主窗體模塊中單擊工具欄中的按鈕，發(fā)生 ButtonClick 事件，并用 Key 屬性標(biāo)識被單擊的按鈕。通過 Toolbar 控件的 Click 事件，也可實(shí)現(xiàn)調(diào)出相應(yīng)窗體或執(zhí)行相應(yīng)操作。主窗體 界面如下圖 所示 ： 圖 主窗體界面 Fig. The Main form interface 該系統(tǒng)主窗體主要通過菜單命令實(shí)現(xiàn)調(diào)出各個窗體或執(zhí)行相應(yīng)操作。錯誤 3 次，退出 系統(tǒng) MyMsg = MsgBox(輸入錯誤 ,請向系統(tǒng)管理員查詢！ , vbCritical, 系統(tǒng)提示 ) If MyMsg = vbOK Then End End If End Sub 主窗體的設(shè)計與實(shí)現(xiàn) 程序啟動后，在系統(tǒng)登錄界面驗(yàn)證完操作員和操作員密碼后，將進(jìn)入程序主窗體。如果記錄數(shù)大于零 If = (密碼 ) Then 39。 39。 主要代碼如下： Private Sub Image1_Click() Static itimes As Integer (4).Text = = select * from tb_user where 操作員 =39。Persist Security Info=False End Function 主窗體的設(shè)計 在登錄窗體對話框中輸入正確的操作員和操作員密碼后才能進(jìn)到主窗體。 amp。返回一個數(shù)據(jù)庫連接 StrCnn = Provider=。創(chuàng)建連接 StrCnn 39。定義連接 Dim rs As 39。Persist Security Info=False End Sub Public Function ESQL(ByVal sql As String) As 39。 amp。打開數(shù)據(jù)庫連接 Provider=。創(chuàng)建 對象 Public adoRs As New 39。其中 ESQL()函數(shù)用于打開到數(shù)據(jù)庫的連接， StrCnn()函數(shù)用于返回于一個連接串。 數(shù)據(jù)庫表結(jié)構(gòu)設(shè)計 住宿時間 住宿日期 退宿日期 憑證號碼 摘要 退房登記 住宿天數(shù) 客房價格 實(shí)收宿費(fèi) 姓名 客房類型 房間號 詳細(xì)地址 證件號碼 證件名稱 預(yù)收宿費(fèi) 退還宿費(fèi) 劉芳 小型酒店管理系統(tǒng) 10 該系統(tǒng)使用了 Access 數(shù)據(jù)庫，名稱為 ，其 各表的功能和具體設(shè)計結(jié)構(gòu)如下： 用戶信息表（ tb_user） 功能是保存系統(tǒng)的用戶數(shù)據(jù)，其結(jié)構(gòu)如表 所示： 表 用戶信息表 table of user information 字段名稱 數(shù)據(jù)類型 字段大小 操作員 文本 10 密碼 文本 50 登記信息表（ tb_djb） 功能是用來保存客人住宿時的住宿登記信息，其結(jié)構(gòu)如表 所示： 表 登記信息表 table of registration information 字段 名稱 數(shù)據(jù)類型 字段大小 憑證號碼 文本 20 姓名 文本 50 證件名稱 文本 20 證件號碼 文本 20 詳細(xì)地址 文本 50 房間號 文本 20 客房類型 文本 10 客房價格 貨幣 8 住宿日期 日期 /時間 8 住宿時間 日期 /時間 8 住宿天數(shù) 數(shù)字 雙精度型 應(yīng)收宿費(fèi) 貨幣 8 預(yù)收金額 貨幣 8 提醒日期 日期 /時間 8 玉林師范學(xué)院本科生畢業(yè)生論文（設(shè)計） 11 退宿日期 日期 /時間 8 備注 文本 50 標(biāo)志 文本 1 日期 日期 /時間 8 時間 日期 /時間 8 退宿時間 日期 /時間 8 提 醒時間 日期 /時間 8 摘要 文本 200 BZ 數(shù)字 雙精度型 客房基礎(chǔ)信息表（ tb_kf） 功能是用來保存客房基礎(chǔ)信息，其結(jié)構(gòu)如表 所示： 表 客房信息表 table of rooms information 字段名稱 數(shù)據(jù)類型 字段大小 房間號 文本 30 房間類型 文本 50 價格 貨幣 8 房態(tài) 文本 4 標(biāo)志 是 /否 1 備注 文本 100 配置 文本 100 使用設(shè)置 文本 10 營業(yè)日期 日期 /時間 8 退房登 記信息表（ tb_tfd） 功能是用來保存客人退宿登記信息，其結(jié)構(gòu)如表 所示： 表 參考文獻(xiàn)信息表 table of check rooms information 劉芳 小型酒店管理系統(tǒng) 12 字段名稱 數(shù)據(jù)類型 字段大小 憑證號碼 文本 20 姓名 文本 50 證件名稱 文本 20 證件號碼 文本 20 詳細(xì)地址 文本 50 房間號 文本 20 客房類型 文本 10 客房價格 貨幣 8 住宿日期 日期 /時間 8 住宿時間 日期 /時間 8 住宿天數(shù) 數(shù)字 雙精度型 應(yīng)收宿費(fèi) 貨幣 8 金額總計 貨幣 8 預(yù)收宿費(fèi) 貨幣 8 退還宿費(fèi) 貨幣 8 退房日期 日期 /時間 8 退房時間 日期 /時間 8 備注 文本 50 BZ 數(shù)字 雙精度型 5 系統(tǒng)詳細(xì)設(shè)計與實(shí)現(xiàn) 系統(tǒng)公共模塊設(shè)計 在系統(tǒng)中使用公共模塊，可節(jié)省系統(tǒng)資源，實(shí)現(xiàn)代碼重用。宏(Macro) 相當(dāng)于 DOS 中的批處理，用來自動執(zhí)行一系列操作 。窗體也稱表單 。窗體 (Form) 提供了一種方便的瀏覽、輸入及更改數(shù)據(jù)的窗口。表由記錄組成，記錄由字段組成，表用來存貯數(shù)據(jù)庫的數(shù)據(jù)，故又稱數(shù)據(jù)表。 Access 數(shù)據(jù)庫由六種對象組成，它們是表、查詢、窗體、報表、宏和模塊。表與表之間可以建立關(guān)系（或稱關(guān)聯(lián)，連接），以便查詢相關(guān)聯(lián)的信息。 客房入住需要以客人信息及入住信息進(jìn)行登記，這就存在一個登記信息實(shí)體，其實(shí)體 ER 圖如圖 所示： the ER chart of registration information table 在此系統(tǒng)中，客房是一個重要的實(shí)體，客房實(shí)體包含了客房的基本配置信息，以及當(dāng)前房間狀態(tài) ，其 ER 圖如圖 所示： the ER chart of registration rooms table 客人退房時需要對退房信息進(jìn)行登記，退房登記實(shí)體包含人的基本信息以及對房費(fèi)進(jìn)行結(jié)算登記的信息，退房登記實(shí)體的 ER 圖如圖 所示： 住宿時間 住宿日期 提醒日期 憑證號碼 摘要 登記信息 住宿天數(shù) 客房價格 實(shí)收宿費(fèi) 姓名 客房類型 房間號 詳細(xì)地址 證件號碼 證件名稱 標(biāo)志 退宿提醒 客房 房間號 房間類型 價格 標(biāo)志 營業(yè)日期 房態(tài) 配置 使用設(shè)置 玉林師范學(xué)院本科生畢業(yè)生論文（設(shè)計） 9 the ER chart of check registration table 4 數(shù)據(jù)庫設(shè)計 office Access2020 簡介 Microsoft Access 是一種關(guān)系式數(shù)據(jù)庫 ，是由微軟公司開發(fā)的。管理員可以對客房信息進(jìn)行查詢、打印、登記，也可以使用多種實(shí)用工具如：還可以修改自己的用戶密碼，還可以通過系統(tǒng)維護(hù)模塊對系統(tǒng)進(jìn)行數(shù)據(jù)庫的管理，可以備份數(shù)據(jù)、恢復(fù)數(shù)據(jù)、初始化數(shù)據(jù)。使用系統(tǒng)登錄時用戶 ID 和密碼都要自己手動輸入。 劉芳 小型酒店管理系統(tǒng) 6 圖 系統(tǒng)功能框架劃分 The partitionthe of funcion frame of the system 系統(tǒng)業(yè)務(wù)流程圖 系統(tǒng)的流程圖設(shè)計。在意識到使用計算機(jī)管理的重要性后，決定主要針對客房管理設(shè)計出符合要求的小型酒店管理系統(tǒng)。 系統(tǒng)需求分析 桂湖酒店是一家比較小型的酒店，設(shè)施較齊全。 綜上所述，此系統(tǒng)開發(fā)目標(biāo)已明確，在技術(shù)、經(jīng)濟(jì)等方面都可行，并且投入少、見效快。硬件方面，科技飛速發(fā)展的今天，硬 件更新的速度越來越快，容量越來越大，可靠性越來越高，價格越來越低，其硬件平臺也完全能滿足此系統(tǒng)的需要。它以操作簡單、易學(xué)易用的特點(diǎn)而受到大多數(shù)用戶的青瞇。本人采用以下的組合可以滿足小型酒店管理系統(tǒng)開發(fā)的要求 :Microsoft windows xp 操作系統(tǒng)、 PC 機(jī)、 Microsoft Office Access2020。該系統(tǒng)的可行性分 析包括以下幾個方面的內(nèi)容。 系統(tǒng)的可行性研究 也稱為可行性研究，是在系統(tǒng)調(diào)查的基礎(chǔ)上，針對新系統(tǒng)的開發(fā)是否具備必要性