【正文】 ...................................30計算機(jī)學(xué)院軟件工程課程設(shè)計1第一章 旅游管理系統(tǒng)概述旅游業(yè)具有“無煙產(chǎn)業(yè)”和“永遠(yuǎn)的朝陽產(chǎn)業(yè)”的美稱，它已經(jīng)和石油業(yè)、汽車業(yè)并列為世界三大產(chǎn)業(yè)；根據(jù) WTTC 的統(tǒng)計，它每年產(chǎn)出 萬億美金的收入，直接或間接地為 2 億 700 萬人提供了就業(yè)機(jī)會，并支持著數(shù)以萬計的企業(yè)的發(fā)展。旅游行政管理部門存在管理方式落后，缺乏信息化管理手段，信息溝通渠道不通暢等問題.，面對困難和挑戰(zhàn)，我國旅游業(yè)必須轉(zhuǎn)變觀念，創(chuàng)新思維，以信息化建設(shè)為突破口和新手段，整合各種資源，從而實(shí)現(xiàn)整個行業(yè)的新跨越?，F(xiàn)行的旅游信息管理模式的問題主要體現(xiàn)在如下幾個方面：，工作強(qiáng)度大。計算機(jī)學(xué)院軟件工程課程設(shè)計2，處于不安全的狀態(tài)，許多信息容易泄露。數(shù)據(jù)庫是數(shù)據(jù)管理的最新技術(shù)，是計算機(jī)科學(xué)的重要分支。數(shù)據(jù)庫的研究范圍是十分廣泛的，概括地講可以包括以下三個領(lǐng)域：；；；數(shù)據(jù)庫學(xué)；計算機(jī)領(lǐng)域中其他新興技術(shù)的發(fā)展對數(shù)據(jù)庫技術(shù)產(chǎn)生了重大影響。它們共同構(gòu)成了數(shù)據(jù)庫系統(tǒng)大家族，使數(shù)據(jù)庫技術(shù)不斷地涌現(xiàn)新的研究方向。學(xué)習(xí)版適用于普通學(xué)習(xí)者及大多數(shù)使用 Visual Basic開發(fā)一般 Windows應(yīng)用程序的人員，但是；專業(yè)版適用于計算機(jī)專業(yè)開發(fā)人員，包括了學(xué)習(xí)版的全部內(nèi)容功能以及Inter控件開發(fā)工具之類的高級特性；企業(yè)版除包含專業(yè)版全部的內(nèi)容外，還有自動化構(gòu)件管理器等工具，使得專業(yè)編程人員能夠開發(fā)功能強(qiáng)大的組骨子里分布式應(yīng)用程序。隨著版本的提高，Visual Basic 的功能也越來越強(qiáng)。實(shí)現(xiàn)旅游信息的增加、查詢、刪除、修改以及接受游客的查詢等。2. 有一定數(shù)量旅游景點(diǎn)相關(guān)信息可供處理。，使前臺的用戶操作方便簡單，突出旅游特點(diǎn)，具有較美觀的界面設(shè)計，保證系統(tǒng)安全穩(wěn)定的運(yùn)行。開發(fā)本系統(tǒng)的可行性研究如下：：技術(shù)上的可行性分析主要分析技術(shù)條件能否順利完成開發(fā)工作，軟、硬件能否滿足需要。硬件方面，在科技飛速發(fā)展的今天，硬件更新速度越來越快，可靠性越來越高，價格越來越便宜，因此硬件平臺也能夠滿足本系統(tǒng)所需。本系統(tǒng)在開發(fā)設(shè)計時盡可能做到界面友好以及操作的人性化，使得操作人員輕松上手。計算機(jī)學(xué)院軟件工程課程設(shè)計6圖 旅游管理系統(tǒng)第一層數(shù)據(jù)流圖用戶首先的登錄系統(tǒng)，正確登錄進(jìn)入系統(tǒng)后用戶可以進(jìn)行如下操作：：主要查詢景點(diǎn)、導(dǎo)游、線路、財務(wù)報表的信息。 圖 用戶登錄數(shù)據(jù)流圖圖 ，用戶進(jìn)行信息查詢時可選擇景點(diǎn)輸入的關(guān)鍵字進(jìn)行查詢，就會查詢出景點(diǎn)庫中所有包括你輸入字段的信息，另外用戶可以查看所有線路信息。數(shù)據(jù)字典的任務(wù)是對于數(shù)據(jù)流程圖中出現(xiàn)的元素的名字都有一個確切的解釋。在關(guān)系型數(shù)據(jù)庫中，遵循的規(guī)則就是范式，范式是符合某一種級別的關(guān)系模式的集合。 數(shù)據(jù)庫概念結(jié)構(gòu)設(shè)計概念結(jié)構(gòu)設(shè)計是數(shù)據(jù)庫設(shè)計的核心。實(shí)體是用戶工作環(huán)境中所涉及的事物，屬性是對實(shí)體特征的描述。通常人們先將現(xiàn)實(shí)世界抽象為概念世界，然后再將概念世界轉(zhuǎn)為機(jī)器世界。（1）數(shù)據(jù)結(jié)構(gòu)表達(dá)為實(shí)體和屬性；（2）數(shù)據(jù)操作表達(dá)為實(shí)體中的記錄的插入、刪除、修改、查詢等操作；（3）完整性約束表達(dá)為數(shù)據(jù)的自身完整性約束（如數(shù)據(jù)類型、檢查、規(guī)則等）和數(shù)據(jù)間的參照完整性約束（如聯(lián)系、繼承聯(lián)系等） ；由此可得本設(shè)計數(shù)據(jù)庫設(shè)計 CDM圖如下圖所示：計算機(jī)學(xué)院軟件工程課程設(shè)計11圖 數(shù)據(jù)庫設(shè)計 CDM圖 數(shù)據(jù)庫邏輯結(jié)構(gòu)設(shè)計本次設(shè)計系統(tǒng)所包括的信息有景點(diǎn)信息、導(dǎo)游信息、線路信息、管理員信息、財務(wù)信息等。數(shù)據(jù)庫管理系統(tǒng)（DBMS）用一定的機(jī)制來檢查數(shù)據(jù)庫中的數(shù)據(jù)是否滿足規(guī)定的條件——完整性約束條件，數(shù)據(jù)的約束條件是語義的體現(xiàn)，將作為模式的一部分存入數(shù)據(jù)庫中。在系統(tǒng)中，用戶通過運(yùn)行進(jìn)入系統(tǒng)首頁后，必須經(jīng)過登錄，方可對本站景點(diǎn)進(jìn)行瀏覽、查看、查詢等操作。通過這個階段的工作將劃分出組成系統(tǒng)的物理元素——程序，數(shù)據(jù)庫，文檔等等。(1) 旅游信息的管理。(3) 導(dǎo)游信息管理。 圖 系統(tǒng)功能模塊圖2. 信息查詢模塊，該模塊主要是方便用戶對本站景點(diǎn)進(jìn)行相關(guān)查詢，并返回查詢結(jié)果。旅游管理系統(tǒng)的輸入界面主要包括用戶登錄，信息查詢，信息更新和游客登記等，輸入設(shè)計的內(nèi)容包括以下幾點(diǎn)：，包括確定輸入數(shù)據(jù)項名稱、數(shù)據(jù)內(nèi)容、精度、數(shù)值范圍。例如在用戶登錄時，必須校驗用戶名和密碼，只有在二都正確的情況下才能正確登錄.旅游管理系統(tǒng)系統(tǒng)的輸出界面主要包括景點(diǎn)信息，查詢結(jié)果，財務(wù)報表等，輸出設(shè)計的內(nèi)容包括以下幾點(diǎn)：。在本系統(tǒng)中，輸出頁面的設(shè)計，盡量滿足用戶的信息需要，并有相關(guān)的提示信息。近年來，人機(jī)界面在系統(tǒng)中所占的比例越來越大。用戶登錄系統(tǒng)的處理流程圖如圖 所示。 工程啟動主界面設(shè)計1. 執(zhí)行 【工程 】? 【添加窗體】命令，給工程添加一個新窗體，將窗體保存為： ，工程啟動主界面采用陽光大氣的圖片作為界面，如下圖所示：計算機(jī)學(xué)院軟件工程課程設(shè)計20圖 工程啟動界面圖 系統(tǒng)登錄選擇界面設(shè)計1. 執(zhí)行 【工程 】? 【添加窗體】命令，給工程添加一個新窗體，將窗體保存為：登錄 ，系統(tǒng)的登錄選擇界面用簡潔風(fēng)格的界面，可以清楚看到登錄選項。 系統(tǒng)測試本系統(tǒng)的測試和糾錯信息流程如圖 所示。黑 盒 測 試 是 以 用 戶 的 角 度 ， 從 輸 入 數(shù) 據(jù) 與 輸 出 數(shù) 據(jù) 的 對 應(yīng) 關(guān) 系 出 發(fā) 進(jìn) 行 測 試 的黑 盒 測 試 法 注 重 于 測 試 軟 件 的 功 能 需 求 ， 主 要 試 圖 發(fā) 現(xiàn) 下 列 幾 類 錯 誤 ： 功 能 不 正確 或 遺 漏 ； 界 面 錯 誤 ； 數(shù) 據(jù) 庫 訪 問 錯 誤 ； 性 能 錯 誤 初 始 化 和 終 止 錯 誤 等 。測試界面如下圖所示：圖 導(dǎo)游查詢測試輸入為空圖圖 10時導(dǎo)游查詢圖計算機(jī)學(xué)院軟件工程課程設(shè)計28圖 1時導(dǎo)游查詢圖以上測試結(jié)果基本上達(dá)到預(yù)期目標(biāo)，只有在導(dǎo)游查詢時，如果輸入的導(dǎo)游編號為空，那么顯示的應(yīng)該是空信息，但是測試時顯示的卻是所有導(dǎo)游帶領(lǐng)的游客信息，所以在這個查詢時還是有待改正的。例如，在導(dǎo)游查詢時，如果輸入的導(dǎo)游編號為空，那么顯示的應(yīng)該是空信息，但是測試時顯示的卻是所有導(dǎo)游帶領(lǐng)的游客信息，所以在這個查詢時還是有待改正的。在測試過程中發(fā)現(xiàn)的系統(tǒng)錯誤必須及時改正，為了改正錯誤往往需要修正原來的設(shè)計，則必須通盤考慮統(tǒng)籌兼顧，以盡量避免在調(diào)試過程中引進(jìn)新錯誤。本次課程設(shè)計是我大學(xué)生活中忙碌而又充實(shí)一段時光。在此，向給我?guī)椭?、關(guān)心、支持我的老師、朋友、同學(xué)，表達(dá)我最真誠的謝意。雖然系統(tǒng)已經(jīng)可以運(yùn)行，但由于能力有限，所以該系統(tǒng)還有許多不盡如人意之處，這些都有待本人能力的提高和對系統(tǒng)的改善。Password=。 。啟動拖放moveit = Truecx = X: cy = YEnd Sub計算機(jī)學(xué)院軟件工程課程設(shè)計33Private Sub Image1_MouseMove(Button As Integer, Shift As Integer, X As Single, Y As Single)If moveit = True Then 39。 amp。如果當(dāng)前記錄位置位于 Recordset 對象的最后一個記錄之后 MsgBox 用戶名錯誤！, vbExclamation + vbOKOnly, 警告 = Else 39。 39。強(qiáng)制定義變量Dim strsql As StringPrivate Sub Combo1_Click()39。更新記錄源 = strsql End If計算機(jī)學(xué)院軟件工程課程設(shè)計39If = 4000 元—4999 元 Then strsql = select * from 報價表 where 人均費(fèi)用 between 4000 and 4999 = adCmdText 39。更新記錄源 = strsql End IfIf = 5000 元—9999 元 Then strsql = select * from 財務(wù)表 where 利潤 between 5000 and 9999 = adCmdText 39。更新記錄源 = strsql計算機(jī)學(xué)院軟件工程課程設(shè)計40 End IfIf = 25000 元以上 Then strsql = select * from 財務(wù)表 where 利潤 = 25000 = adCmdText 39。關(guān)閉當(dāng)前窗體，顯示新窗體: 管理員總控 .ShowEnd SubPrivate Sub Image2_Click()39。 39。 amp。更新記錄源 = strsql = Else MsgBox 請輸入景點(diǎn)編號！, vbExclamation + vbOKOnly, 警告 = End IfEnd SubPrivate Sub Label2_Click()39。刪除記錄 = True 39。允許更新End SubPrivate Sub Label5_Click()39。關(guān)閉當(dāng)前窗體，顯示新窗體: 管理員總控 .Show計算機(jī)學(xué)院軟件工程課程設(shè)計42End SubPrivate Sub opt1_Click()If = True Then = True = False = True = True = False = FalseEnd If 39。更新記錄源 = strsql End SubPrivate Sub opt3_Click()39。更新記錄源 = strsql If = True Then = True = False = False = True = FalseEnd IfEnd SubPrivate Sub opt5_Click()If = True Then = True = False = True = False = TrueEnd IfEnd SubPrivate Sub opt6_Click()If = True Then = True = False = False = True = FalseEnd IfEnd Sub：Private Sub Form_Load()39。更新記錄源 = strsql If = True Then = True = False = True = False = True計算機(jī)學(xué)院軟件工程課程設(shè)計43End IfEnd SubPrivate Sub opt4_Click()39。更新記錄源 = strsql End SubPrivate Sub opt2_Click()If = True Then = False = True = True = True = False = FalseEnd If 39。更新數(shù)據(jù)庫 = False 39。允許刪除End SubPrivate Sub Label4_Click()39。允許更新 39。 39。更新記錄源 = strsql 計算機(jī)學(xué)院軟件工程課程設(shè)計41 = Else MsgBox 請輸入景點(diǎn)編號！, vbExclamation + vbOKOnly, 警告 = End IfEnd SubPrivate Sub Image3_Click()39。 amp。窗體加載時 datagrid 的屬性 = False = False = False39。更新記錄源 = strsql End IfIf = 15000 元—19999 元 Then strsql = select * from 財務(wù)表 where 利潤 between 15000 and 19999