【正文】 End sub ‘ 添加全局變量 ，用來 記錄 各個(gè)窗口的讀寫狀態(tài)，代碼如下： Public flagTedit As Boolean ‘ 標(biāo)示是否進(jìn)入修改的窗體 Public flagRedit As Boolean Public flagBedit As Boolean Public flagCedit As Boolean Public gintCmode As Integer Public gintTmode As Integer ’ 記錄是添加還是修改狀態(tài) ， 1 為添加， 2為修改 Public gintRmode As Integer Public gintBmode As Integer Public flagSedit As Boolean ⑵ 系統(tǒng)用戶管理模塊的創(chuàng)建 用戶管理模塊主要實(shí)現(xiàn)： 各 個(gè)實(shí)體具體的描述Ｅ Ｒ圖如下： 客房標(biāo)準(zhǔn)設(shè)置 基本信息輸入 客房登記 基本信息錄入 客房信息管理 顧客登記 訂房信息管理 訂房信息管理 結(jié)算信息輸入 結(jié)算信息管理 客房信息返回 購買設(shè)計(jì) ： 382540551 全套包括 :開題報(bào)告 ,論文 ,源程序 ,源代碼 ,答辯 PPT,萬余套設(shè)計(jì) ,歡迎咨詢選購 ,價(jià)格最低質(zhì)量最好 客房標(biāo)準(zhǔn)信息實(shí)體Ｅ Ｒ 圖 客房信息實(shí)體Ｅ Ｒ圖 訂房信息實(shí)體 Ｅ Ｒ 圖 客房標(biāo)準(zhǔn)信息實(shí)體 標(biāo)準(zhǔn)編號(hào) 標(biāo)準(zhǔn)名稱 床位數(shù)量 客房單價(jià) 客房信息實(shí)體 客房標(biāo)準(zhǔn) 客房編號(hào) 客房位置 客房單價(jià) 訂房信息實(shí)體 客房信息 顧客信息 折 扣 入住時(shí)間 購買設(shè)計(jì) ： 382540551 全套包括 :開題報(bào)告 ,論文 ,源程序 ,源代碼 ,答辯 PPT,萬余套設(shè)計(jì) ,歡迎咨詢選購 ,價(jià)格最低質(zhì)量最好 結(jié)算信息實(shí)體 Ｅ Ｒ 圖 實(shí)體之間關(guān)系Ｅ Ｒ圖 ③數(shù)據(jù)庫邏輯結(jié)構(gòu)設(shè)計(jì) 首先將 賓館管理信息系統(tǒng)的數(shù)據(jù)庫概念結(jié)構(gòu)轉(zhuǎn)化為 SQL 2021 數(shù)據(jù)庫系統(tǒng)所支持的實(shí)際數(shù) 據(jù)模型，即：數(shù)據(jù)庫的邏輯結(jié)構(gòu)。 ● 結(jié)算信息，包括的數(shù)據(jù)項(xiàng)有：訂房編號(hào)、客房編號(hào)、客房種類、客房位置、客房備注信息、顧客姓名、顧客身份證號(hào)碼、入住時(shí)間、折扣、結(jié)算時(shí)間、備注等。 ● 客房信息，包括的數(shù)據(jù)項(xiàng)有：客房編號(hào)、客房種類、客房位置、客房單價(jià)、備注等。 ● 結(jié)算信息的修改和查詢，包括客房編號(hào)、客房種類、客房位置、客房單價(jià)、顧客姓名、顧客身份證號(hào)碼、入住日期、折扣、結(jié)日期、備注信息等。 ● 訂房信息的修改和查詢，包括客房編號(hào)、客房種類、 客房 位置、 客房 單價(jià)、顧客姓名、顧客身份證號(hào)碼、入住日期、折扣、備 注信息等。 ● 剩余客房信息的查詢等。 ● 客房基本信息的輸入，包括客房編號(hào)、客房類型、客房位置、客房單價(jià)、備注等。 主要完成功能： ● 有關(guān)客房標(biāo)準(zhǔn)的制定、標(biāo)準(zhǔn)信息的輸入，包括標(biāo)準(zhǔn)編號(hào)、標(biāo)準(zhǔn)名稱、房間面積、床位數(shù)量、 住房單價(jià)、是否有空調(diào)、電視機(jī)、電話以及單獨(dú)衛(wèi)生間等。購買設(shè)計(jì) ： 382540551 全套包括 :開題報(bào)告 ,論文 ,源程序 ,源代碼 ,答辯 PPT,萬余套設(shè)計(jì) ,歡迎咨詢選購 ,價(jià)格最低質(zhì)量最好 賓館 管理 信息 系統(tǒng) 系統(tǒng) 平臺(tái)： Windows 2021 數(shù)據(jù)庫服務(wù)器： Microsoft SQL Server 2021 開發(fā)工具： Visual Basic 系統(tǒng)開發(fā)人員： ⒈編寫目的 賓館在正常的運(yùn)營中需要對(duì)客房資源、顧客信息、結(jié)算信息進(jìn)行管理，利用賓館管理信息系統(tǒng)及時(shí)了解各個(gè)環(huán)節(jié)中信息的變更，有利于提高管理效率。 ⒉系統(tǒng)功能分析 系統(tǒng)開發(fā)的總體任務(wù)是實(shí)現(xiàn)賓館各種信息的系統(tǒng)化、規(guī)范化和自動(dòng)化。 ● 客房標(biāo)準(zhǔn)信息的修改、查詢等。 ● 客房基本信息的查詢、修改，包括客房編號(hào)、客房類型、客房位置、客房單價(jià)、備注等。 ● 訂房信息的輸入，包括客房編號(hào)、客房種類、 客房 位置、 客房 單價(jià)、顧客姓名、顧客身份證號(hào)碼、入住日期、折扣、備注信息等。 ● 結(jié)算信息的輸入，包括客房編號(hào)、客房種類、位置、 客房 單價(jià)、顧客姓名、顧客身份證號(hào)碼、入住日期、折扣、結(jié)算日期、備注信息等。 ⒊系統(tǒng)功能模塊設(shè)計(jì) 按結(jié)構(gòu)化程序設(shè)計(jì)思想，分析得出如下系統(tǒng)功能模塊圖 購買設(shè)計(jì) ： 382540551 全套包括 :開題報(bào)告 ,論文 ,源程序 ,源代碼 ,答辯 PPT,萬余套設(shè)計(jì) ,歡迎咨詢選購 ,價(jià)格最低質(zhì)量最好 圖Ⅰ 系統(tǒng)功 能模塊圖 ⒋數(shù)據(jù)庫設(shè)計(jì) 數(shù)據(jù)庫設(shè)計(jì)步驟： ● 數(shù)據(jù)庫需求分析 ● 數(shù)據(jù)庫概念結(jié)構(gòu)設(shè)計(jì) ● 數(shù)據(jù)庫邏輯結(jié)構(gòu)設(shè)計(jì) ①數(shù)據(jù)庫 需求分析 分析調(diào)查有關(guān)賓館管理信息需求的基礎(chǔ)上得 本系統(tǒng)所處理的數(shù)據(jù)流程 賓館管理信息系統(tǒng) 結(jié)算信息管理 訂房信息管理 客房信息管理 系統(tǒng)管理 結(jié)算信息查詢 結(jié)算信息修改 結(jié)算信息添加 訂房信息查詢 訂房信息修改 訂房信息添加 剩余客房信息查詢 設(shè)置客房信息 設(shè)置客房標(biāo)準(zhǔn) 密碼管理 用戶管理 客房信息查詢 客房信息修改 客房信息添加 客房標(biāo)準(zhǔn)修改 客房標(biāo)準(zhǔn)添加 購買設(shè)計(jì) ： 382540551 全套包括 :開題報(bào)告 ,論文 ,源程序 ,源代碼 ,答辯 PPT,萬余套設(shè)計(jì) ,歡迎咨詢選購 ,價(jià)格最低質(zhì)量最好 圖Ⅱ 賓館管理信息系統(tǒng)數(shù)據(jù)流程圖 針對(duì)一般賓館管理信息系統(tǒng)的需求，通過對(duì)賓館管理過程的內(nèi)容和流程分析，設(shè)計(jì)如下面所示的數(shù)據(jù)項(xiàng)和數(shù)據(jù)結(jié)構(gòu) ： ● 客房標(biāo)準(zhǔn)信息，包括的數(shù)據(jù)項(xiàng)有：標(biāo)準(zhǔn)編號(hào)、標(biāo)準(zhǔn)名稱、房間面積、床位數(shù)量、住房單價(jià)、是否有空調(diào)、電視、電話、單獨(dú)衛(wèi)生間等。 ● 訂房信息，包括的數(shù)據(jù)項(xiàng)有：訂房編號(hào)、客房編號(hào)、客房種類、客房位置、客房備注信息、顧客姓名、顧客身份證號(hào)碼、入住時(shí)間、折扣、備注等。 ② 數(shù)據(jù)庫概念結(jié)構(gòu)設(shè)計(jì) 本 系統(tǒng)根據(jù)以上的設(shè)計(jì)規(guī)劃出的實(shí)體有：客房標(biāo)準(zhǔn)信息實(shí)體、客房信息實(shí)體、訂房信息實(shí)體、結(jié)算信息實(shí)體。其各個(gè)表格的設(shè)計(jì)結(jié)果如下 列名 數(shù)據(jù)類型 可否為空 說明 Typeid Varchar NOT NULL 標(biāo)準(zhǔn)編號(hào) Typename Varchar NOT NULL 標(biāo)準(zhǔn)名稱 Area Numeric NULL 房間面積 Bednum Numeric NULL 床位數(shù)量 Haircondition Varchar NULL 是否有空調(diào) Htelephone Varchar NULL 是否有電話 Htelevision Varchar NULL 是否有電視 Htoilet Varchar NULL 是否有單獨(dú)衛(wèi)生間 Price Numeric NULL 單價(jià) 結(jié)算信息實(shí)體 客房信息 顧客 信息 結(jié)算時(shí)間 結(jié)算金額 客房標(biāo)準(zhǔn)信息 客房登記 客房信息管理 訂 房 訂房信息管理 結(jié)算信息管理 客房結(jié)算 購買設(shè)計(jì) ： 382540551 全套包括 :開題報(bào)告 ,論文 ,源程序 ,源代碼 ,答辯 PPT,萬余套設(shè)計(jì) ,歡迎咨詢選購 ,價(jià)格最低質(zhì)量最好 Roomtype 客房標(biāo)準(zhǔn)信息表 列名 數(shù)據(jù)類型 可否為空 說明 roomNO Varchar NOT NULL 客房編號(hào) Roomtype Varchar NOT NULL 客房種類 Roomposition Varchar NULL 客房位置 Roomprice Numeric NULL 單價(jià) Putup Varchar NOT NULL 是否被預(yù)定 Roommemo Text NULL 備注 Rooms 客房信息 表 列名 數(shù)據(jù)類型 可否為空 說 明 Bookno Varchar NOT NULL 訂房編號(hào) Customname Varchar NOT NULL 顧客姓名 CustomID Varchar NOT NULL 身份證號(hào)碼 Roomno Varchar NOT NULL 客房編號(hào) Indate Datetime NULL 入住日期 Discount Numeric NULL 折扣 Inmeno Text NULL 備注 Checkdate Datetime NULL 結(jié)算日期 Amount Numeric NULL 金額 Bookin 訂房信息表 ⒌ 數(shù)據(jù)庫結(jié)構(gòu)的實(shí)現(xiàn) 利用 SQL 2021 數(shù)據(jù)庫系統(tǒng)中的查詢分析實(shí)現(xiàn)數(shù)據(jù)庫的邏輯結(jié)構(gòu)，其表格如下： 創(chuàng)建系統(tǒng)用戶表格 user_Info CREATE TABLE [dbo].[user_Info1]( [user_ID][char](10) COLLATE Chinese_PRC_CI_AS NOT NULL, [user_PWD] [char] (10) COLLATE Chinese_PRC_CI_AS NULL, [user_Des] [char](10) COLLATE Chinese_PRC_CI_AS NULL ) ON [PRIMARY] 創(chuàng)建客房標(biāo)準(zhǔn)信息表格 roomtype CREATE TABLE [dbo].[roomtype]( [typeid][char](10) COLLATE Chinese_PRC_CI_AS NOT NULL, [typename][char](10) COLLATE Chinese_PRC_CI_AS NOT NULL, [area][numeric](5,0) NULL, [bednum][numeric](2,0) NULL, [haircondition][char](2) COLLATE Chinese_PRC_CI_AS NULL, [htelephone][char](2) COLLATE Chinese_PRC_CI_AS NULL, [htelevision][char](2) COLLATE Chinese_PRC_CI_AS NULL, [htoilet][char](2) COLLATE Chinese_PRC_CI_AS NULL, [price][numeric](10,2)NULL ) ON [PRIMARY] 創(chuàng)建客房信息表格 rooms 購買設(shè)計(jì) ： 382540551 全套包括 :開題報(bào)告 ,論文 ,源程序 ,源代碼 ,答辯 PPT,萬余套設(shè)計(jì) ,歡迎咨詢選購 ,價(jià)格最低質(zhì)量最好 CREATE TABLE [dbo].[rooms]( [roomNO][char](10) COLLATE Chinese_PRC_CI_AS NOT NULL, ⒍ 賓館管理信息系統(tǒng) 具體程序?qū)崿F(xiàn) ⑴ 創(chuàng)建公用模塊 添加公共數(shù)據(jù)操作函數(shù)，用以執(zhí)行各種 SQL 語句。用戶登陸。添加用戶。修改用戶 具體 客房標(biāo)準(zhǔn)添加代碼 ： Private Sub Form_Load() ‘載入窗 體后，判斷所處狀態(tài) Dim intCount As Integer Dim MsgText As String 購買設(shè)計(jì) ： 382540551 全套包括 :開題報(bào)告 ,論文 ,源程序 ,源代碼 ,答辯 PPT,萬余套設(shè)計(jì) ,歡迎咨詢選購 ,價(jià)格最低質(zhì)量最好 Dim i As Integer If gintTmode=1 Then ‘ 判斷是否屬于添加狀態(tài) 編號(hào)的記錄 !”,vbOKOnly+vbExclamation,” 警告 ” txtItem(0).SetFocus Exit Sub End If End If txtSQL=”select * from roomtype where typeid’”amp?！薄痑nd typename=’”amp?！薄? Set mrc=ExecuteSQL(txtSQL,MsgText) If =False Then MsgBox” 已經(jīng)存在相同客房標(biāo)準(zhǔn)的記錄 !”,vbOKOnly+vbExclamation,“警告 ” txtItem(1).Setfocus Exit Sub End If txtSQL=”delete from roomtype where typeid=’”amp?！薄?‘刪除已有記錄