軟件工程畢業設計-基于net酒店管理系統(完整版)

　　

【正文】 proach by dividing the problem into three categories: ? Model The model contains the core of the application39。s projected begins, From go into live registry to keep to till the last check out close book, The whole process should take guest as a centre, Provide fast and convenient service, Give the guest the enjoyment of the supremacy of a kind of shopper, only to enhance the level of hotel management, simplify a various of plicated operation, at most the shortest sound of time inside, plete the specification operation of traffic in the hotel, only by that, the passenger can fell fortable and unfettable. Facing the rivalry stance of vehemence inside industry of the hotel, all the hotel expand wide degree and depth of service, although the informationbased anti is a successful key element for a hotel, but it can help factor of those real impact success or failure develop larger utility. Consequently adopting all new calculator work and supervision system, it will bee one of the important methods of raising the managerial effectiveness of hotel and improving service level . This system adopts SQL Server 2021 to create data nbank, using Visual to plete the creation of system, this system can carry out the supervision function of general hotel, it includes the setup, operation control of the foundation within supervision in the hotel, the building state manages etc. It is convenient for administrator of the hotel to read a guest room dynamic state, collect customer39。越來越多的酒店加入了信息化管理的陣營，可見酒店信息化管理對于現代酒店管理的作用有多大。選擇了客房類型后就可以保存預訂單了，其他項目是選擇填寫的項目，可以根據實際情況填寫，也可以在預訂時就指定客房，這樣在入住時直接調出就可以了，以避免預訂后沒有客房情況。如果需要新增或修改類別，單擊相應按鈕，輸入新信息后單擊【保存】即可。 strSQL += dv(iCol 1)(0). + 39。保存要顯示的客房信息的數據表 Private dtRoom As DataTable 39。 (5)功能實現的部分代碼如下 Public Overrides Sub SaveForAdd() Dim dr As DataRow = (帳單明細 ).NewRow() Try dr(入住單號 ) = dr(消費內容 ) = dr(消費金額 ) = dr(消費時間 ) = dr(備注 ) = 20 Catch ex As Exception () 39。 (3)為類“ ”添加以下變量 Public Class frmReside Inherits 酒店管理系統 .frmBase Public bClose As Boolean = False Private gridMouseDownTime As DateTime = New DateTime Private strRoomCode As String = (4)更新客房信息，對已經空房的房間，刪除之前的入住信息 Public Overrides Sub DeleteData() Try 39。 (5)重寫 frmRoomType類型 frmBase的函數 (由于代碼較長，只摘錄部分代碼 ) Public Overrides Sub SaveForAdd() Dim dr As DataRow = (客房類型 ).NewRow() Try dr(類型編號 ) = 16 dr(類型名稱 ) = dr(可超預訂數 ) = dr(拼房價格 ) = dr(價格 ) = dr(是否可拼房 ) = Catch ex As Exception (數據格式不正確！ ) Exit Sub End Try Try (客房類型 ).(dr) If = True Then (DataSet11) End If Catch ex As Exception (數 據添加失敗 !) End Try LoadData() = End Sub 實現客房信息設置功能 (1)在【添加新項】對話框的【模板】列表框中選擇【繼承的窗體】選項，并命名為“ ” ,單擊【打開】選項出現【繼承選擇器】對話框，在選擇 frmBase選項并為窗件添加圖 15 控件 圖 (2)客 房類型設置功能與客房信息設置功能相似，詳細代碼可參照客房信息功能模塊代碼 17 實現預訂管理功能 (1)在【添加新項】對話框的【模板】列表框中選擇【繼承的窗體】選項，并命名為“ ” ,單擊【打開】選項出現【繼承選擇器】對話框，在選擇 frmBase選項并為窗件添加圖 16 控件 圖 (2) 從工具箱中拖到一個 SqlDataAdapter對象到窗體上，連接 hotelbook數據庫，添加預訂單，并選擇所有字段。根據輸入的用戶 ID進行查詢 Dim dv As DataView = _ _ (select 密碼 ,姓名 from 用戶清單 where 用戶編號 = 39。存在名為 name的子窗體，是子窗體獲得焦點并返回 True (i).Focus() Return True End If Next 39。用途是收銀結賬后，賬單明細導入到賬單明細歷史，如表 9所示 表 9.“賬單明細歷史”表 功能模塊設計 創建系統主窗口 (1)利用系統默認生成的窗體作為主窗體，將其對應的文件名更名為 。用途是保存樓層編號及名稱，如表 1所示 表 1 .“樓層信息”表 (2)“客房類型”表：類型編號、類型名稱、價格、拼房價格、可超預訂數、是否可以拼房 。 需求分析是從客戶的需求中提取出軟件系統能夠幫助用戶解決的業務問題，通過對用戶業務問題的分析，規劃出系統的功能模塊。 4) 具有處理各種復雜情況的能力 系統開發工具 Visual basic .NET Visual Visual Basic 語言演變而來，是一種為高效地生成類型安全和面向對象的應用程序而設計的語言。 關鍵詞： 酒店管理系統， SQL Server 2021， Visual 項目開發背景 酒店業是一個前景廣闊而又競爭激烈的行業。 本論文中除引文和致謝的內容外，沒有抄襲其他人或其他機構已經發表或撰寫過的研究成果。 其他同志對本研究所做的貢獻均已在論文中作了聲明并表示了謝意。改革開放以來，我國的酒店業迅速發展，已經成為一個具有相當規模的產業。 Visual Basic 允許 開發人員開發面向 Windows、 Web 和移動設備的程序。 酒店管理系統的需求分析 一個通用的酒店管理系統應該包括下圖 1示的功能模塊，其中每個功能都由若干相關聯的子功能模塊 3 組成 ]6[ (如圖 1所示 )。用途是保存客房類型信息，如表 2所示 表 2.“客房類型”表 (3)“客房信息”表：客房編號、類型編號、樓層編號、額度人數、床數、客房描述、備注、狀態、是否可以拼房。 (2)從 ToolBox窗體上選擇 MainMenu控件，為主窗體添加一個圖 12主菜單控件 ]7[ 。不存在名為 Name的子窗體 False Return False End Function 實現系統登錄功能 (1)新建一個窗體，將其 Name屬性設置為“ frmLogin”，并為其圖 13加控件 14 圖 (2)為 frmLogin類添加如下兩個公共變量。 _ + () + 39。 (3)在 SqlDataAdapter對象上右擊， 在彈出的快捷菜單中選擇【生成數據集】命令，在彈出的【生成數據集】對話框中單擊【確定】按鈕。更新客房信息表 (預訂單 ). _ Rows().Delete() Dim db As DataBase = New DataBase Dim strSQL As String = update 客房信息 set 狀態 =39。數據格式不正確！ ) Exit Sub End Try Try (帳單明細 ).(dr) If = True Then (DataSet11) End If Catch ex As Exception (數據添加失敗 !) End Try LoadData() = End Sub 實現收銀退房功能 (1)在【添加新項】對話框的【模板】列表框中選擇【繼承的窗體】選項，并命名為“ ” ,單擊【打開】選項出現【繼承選擇器】對話框，在選擇“ frmBase” 選項并為窗件添加如圖 19所示的控件 圖 (2)從工具箱拖到一個 SqlDataAdapter對象到窗體上，連接 hotelbook數據庫，添加入住單表并選擇“入住單號、客房類型、客房編號、抵店時間、離店時間、入住價格、加床價格、預收款、應收賬款、結賬金額、是否結賬、結賬日期、付款方式”字段。保存位圖對象的 ArrayList Private bitMaps As ArrayList 39。 (strSQL) () End If LoadData() Dim dvTmp As DataView = = False = False = False 39。如果需要刪除一條信息，則選