【導(dǎo)讀】求，這就要求航空公司要有一套好的數(shù)據(jù)庫系統(tǒng)。及有效的程序結(jié)構(gòu)支持各種數(shù)據(jù)操作的執(zhí)行。對數(shù)據(jù)的添加、修改、刪除及查詢等方面的操。作應(yīng)簡單易行，并且能夠具有較好的穩(wěn)定性。序設(shè)計方法，進行開發(fā)與設(shè)計的。本系統(tǒng)的使用界面具有十分人性化的特征，具有方便的查

　　

【正文】 在航線信息列表中單擊“查詢”按鈕，將出現(xiàn)如圖 13 所示的窗 圖 航線信息查詢窗體 載入窗體時自動加入出發(fā)城市和到達城市的內(nèi)容。 設(shè)置查詢內(nèi)容后，單擊“確定”按鈕，所有滿足查詢條件的內(nèi)容顯示在航線信息列表中。 五、客戶類型信息管理模塊的創(chuàng)建 客戶類型信息管理模塊主要實現(xiàn)如下功能： 吉林大學(xué)計算機科學(xué)與技術(shù)學(xué)院 本科生畢業(yè)論文 題目： 航空公司信息管理系統(tǒng) 第 23 頁 共 40 頁 ? 添加客戶類型信息。 ? 修改客戶類型信息。 ? 刪除客戶類型信息。 （一）顯示客戶類型信息窗體的創(chuàng)建 選擇“ 客戶信息管理 |客戶類型”菜單，將出現(xiàn)如圖 所示的窗體。所有客戶類型信息都將顯示出來。窗體的 Load 事件調(diào)用 ShowTitle、 ShowData 函數(shù)，將所有記錄顯示出來。 圖 顯示客戶類型信息窗體 （二）添加客戶類型信息窗體的創(chuàng)建 在客戶類型信息列表中單擊“添加”按鈕，將出現(xiàn)如圖 所示的窗體，用來添加客戶類型信息。 圖 輸入內(nèi)容完畢，單擊“保存”按鈕，程序?qū)⑹紫葯z查內(nèi)容是否符合要求，然后檢查是否有重復(fù)記錄，最后添加到數(shù)據(jù)庫中。 吉林大學(xué)計算機科學(xué)與技術(shù)學(xué)院 本科生畢業(yè)論文 題目： 航空公司信息管理系統(tǒng) 第 24 頁 共 40 頁 （三）修改客戶類型信息 在 客戶類型信息列表中選擇需要修改的記錄，然后單擊“修改”按鈕，當(dāng)前記錄將出現(xiàn)在如圖 914 所示的窗體中。修改完畢，單擊“保存”按鈕，修改后的記錄保存到數(shù)據(jù)庫中。代碼如下： Private Sub cmdModify_Click() Dim intCount As Integer ‘判斷列表內(nèi)容是否為空 If 1 Then gintTmode = 2 ‘記載選擇記錄的位置 intCount = ‘判斷是否選擇記錄 If intCount 0 Then ‘顯示需要修改的記錄 = select * from customerType where ctypeNO =39。 amp。 Trim((intCount, 1)) amp。 39。 1 Else MsgBox 警告 , vbOKOnly + vbExclamation, 請首先選擇需要修改的記錄！ End If End If End Sub （四）刪除客戶類型信息 選擇客戶類型信息列表中需要刪除的記錄，然后單擊“刪除”按鈕，可以刪除所選記錄。代碼如下： Private Sub cmdDelete_Click() Dim txtSQL As String Dim intCount As Integer Dim mrc As Dim MsgText As String ‘判斷列表內(nèi)容是否為空 If 1 Then 吉林大學(xué)計算機科學(xué)與技術(shù)學(xué)院 本科生畢業(yè)論文 題目： 航空公司信息管理系統(tǒng) 第 25 頁 共 40 頁 ‘提示信息 If MsgBox(真的要刪除客戶種類為 amp。 Trim((, 2)) amp。 的記錄嗎？ , vbOKCancel + vbExclamation, 警告 ) = vbOK Then ‘記載選擇記錄的位置 intCount = ‘刪除記錄 txtSQL = delete from customerType where ctypeNO =39。 amp。 Trim((intCount, 1)) amp。 39。 Set mrc = ExecuteSQL(txtSQL, MsgText) ‘卸載窗體 Unload frmcType ‘選擇所有記 錄 = select * from customerType ‘顯示窗體 End If End If End Sub 六、客戶信息管理模塊的創(chuàng)建 客戶信息管理模塊主要實現(xiàn)如下功能： ? 添加客戶信息。 ? 修改客戶信息。 ? 刪除客戶信息。 ? 查詢客戶信息。 （一）顯示客戶信息窗體的創(chuàng)建 選擇“客戶信息管理 |客戶信息”菜單，將首先出現(xiàn)如圖 所示的窗體。所有客戶 類型信息都將顯示出來。窗體的 Load 事件調(diào)用 ShowTitle、 ShowData函數(shù)，將所有記錄顯示出來。 吉林大學(xué)計算機科學(xué)與技術(shù)學(xué)院 本科生畢業(yè)論文 題目： 航空公司信息管理系統(tǒng) 第 26 頁 共 40 頁 圖 顯示客戶信息窗體 （二）添加客戶信息窗體的創(chuàng)建 在客戶信息列表中單擊“添加”按鈕，將出現(xiàn)如圖 所示的窗體，用來添加客戶信息。 圖 添加客戶信息窗體 輸入內(nèi)容完畢，單擊“保存”按鈕，程序?qū)⑹紫葯z查內(nèi)容是否符合要求，然后檢查是否有重復(fù)記錄，最后添加到數(shù)據(jù)庫中。 （三）修改客戶信息 在客戶信息列表中選擇需要修改的記錄，然后單擊“修改”按鈕，當(dāng)前記錄將出現(xiàn)在如圖 16 所示的窗體 中。修改完畢，單擊“保存”按鈕，修改后的記錄保存到數(shù)據(jù)庫中。代碼如下： Private Sub cmdModify_Click() Dim intCount As Integer ‘判斷列表內(nèi)容是否為空 If 1 Then 吉林大學(xué)計算機科學(xué)與技術(shù)學(xué)院 本科生畢業(yè)論文 題目： 航空公司信息管理系統(tǒng) 第 27 頁 共 40 頁 gintCmode = 2 ‘記載選擇記錄的位置 intCount = ‘判斷是否選擇記錄 If intCount 0 Then ‘選擇點擊記錄 = select * from customerInfo where customerNO =39。 amp。 Trim((intCount, 1)) amp。 39。 ‘顯示 1 Else ‘提示信息 MsgBox 警 告 , vbOKOnly + vbExclamation, 請首先選擇需要修改的記錄！ End If End If End Sub （四）刪除客戶信息 選擇客戶信息列表中需要刪除的記錄，然后單擊“刪除”按鈕，可以刪除所選記錄。代碼如下： Private Sub cmdDelete_Click() Dim txtSQL As String Dim intCount As Integer Dim mrc As Dim MsgText As String ‘判斷列表內(nèi)容是否為空 If 1 Then If MsgBox(真的要刪除客戶姓名為 amp。 Trim((, 2)) amp。 的客戶記錄嗎？ , vbOKCancel + vbExclamation, 警告 ) = vbOK Then ‘記載選擇記錄的位置 intCount = ‘刪除當(dāng)前記錄 txtSQL = delete from customerInfo where customerNO =39。 吉林大學(xué)計算機科學(xué)與技術(shù)學(xué)院 本科生畢業(yè)論文 題目： 航空公司信息管理系統(tǒng) 第 28 頁 共 40 頁 amp。 Trim((intCount, 1)) amp。 39。 ‘執(zhí)行查詢語句 Set mrc = ExecuteSQL(txtSQL, MsgText) ‘卸載客戶信息列表 Unload frmCustomer ‘選擇所有記錄 = select * from customerInfo ‘顯示 End If End If End Sub （五）查詢客戶信息 在如圖 18 所示的客戶信息列表中，單擊“查 按鈕，出現(xiàn)如圖 所示的對話框。 圖 客戶信息查詢窗體 客戶信息查詢窗體在載入時所有客戶信息自動加入到查詢內(nèi)容中。選擇合適的 查詢方式，滿足查詢條件的記錄顯示在如圖 17 所示的客戶信息列表中。 七、訂票信息管理模塊的創(chuàng)建 訂票信息管理模塊主要實現(xiàn)如下功能： ? 添加訂票信息。 ? 修改訂票信息。 ? 刪除訂票信息。 ? 查詢剩余機票信息。 吉林大學(xué)計算機科學(xué)與技術(shù)學(xué)院 本科生畢業(yè)論文 題目： 航空公司信息管理系統(tǒng) 第 29 頁 共 40 頁 （一）顯示訂票信息窗體的創(chuàng)建 選擇“票務(wù)信息管理 |訂票信息”菜單，將首先出現(xiàn)如圖 所示的窗體。所有訂票類型信息都將顯示出來。窗體的 Load 事件調(diào)用 ShowTitle、 ShowData函數(shù)，將所有記錄顯示出來。 圖 顯示機票信息的窗體 （二）添加訂票信息窗體的創(chuàng)建 機票信息包括兩部分：航線信息和客 戶信息。選擇出發(fā)城市和到達城市，將得到相應(yīng)的航線信息；選擇客戶姓名得到相應(yīng)的客戶信息。窗體載入時要求在列表框中加入所有有關(guān)航線和客戶的信息。 選擇航線信息和客戶信息后，輸入機票日期，單擊“保存”按鈕，訂票信息保存到數(shù)據(jù)庫中。除了對數(shù)據(jù)格式的檢查，還要檢查相應(yīng)航班是否滿員。 （三）修改訂票信息 在機票信息列表中選擇需要修改的記錄，然后單擊“修改”按鈕，當(dāng)前記錄將出現(xiàn)在如圖 13 所示的窗體中。修改完畢，單擊“保存”按鈕，修改后的記錄保存到數(shù)據(jù)庫中。 （四）刪除訂票信息 選擇機票信息列表中需要刪除的記錄，然后單擊“ 刪除”按鈕，可以刪除所選記錄。 吉林大學(xué)計算機科學(xué)與技術(shù)學(xué)院 本科生畢業(yè)論文 題目： 航空公司信息管理系統(tǒng) 第 30 頁 共 40 頁 第四章 系統(tǒng)的編譯和發(fā)行 完成了航空公司管理信息系統(tǒng)的編程和調(diào)試工作，最后一步就是該系統(tǒng)的編譯和發(fā)行。這涉及到工程項目屬性的設(shè)置、可執(zhí)行應(yīng)用程序的生成。 在系統(tǒng)的編 譯和發(fā) 行以前 ，需要設(shè) 置工程 項目的 屬性。選擇“ Project|MIS_TICKET Properties”菜單，進行屬性設(shè)置，如圖 20 示。 最后選擇“ File|Make ”菜單，編譯開始。編譯完畢后，即生成了相應(yīng)的可執(zhí)行文件。編譯通過后，生成可執(zhí)行文件 。我們 需要在發(fā)行前對生成的可執(zhí)行文件進行測試。通過測試的可執(zhí)行文件，就可以進行發(fā)布了。 圖 進行項目的屬性設(shè)置 吉林大學(xué)計算機科學(xué)與技術(shù)學(xué)院 本科生畢業(yè)論文 題目： 航空公司信息管理系統(tǒng) 第 31 頁 共 40 頁 第五章 系統(tǒng)測試與維護 系統(tǒng)完成之后， 需要 對各個模塊的功能進行了詳細的測試，輸入數(shù)據(jù)和預(yù)測輸出數(shù)據(jù)相比，發(fā)現(xiàn)了 一些 問題。主要 是在 查詢過程中預(yù)計查詢結(jié)果和實際結(jié)果不一致， 有時候 達不到目的，對數(shù)據(jù)庫的操作表 之 間的關(guān)聯(lián) 考慮得不夠周到 ，因此往往會出現(xiàn) 一些小 的錯誤。各個模塊組裝完成后，又會出現(xiàn)一些問題。 軟件在運行過程中可能會產(chǎn)生各種各樣的問題，也可能帶來不同程序的嚴(yán)重后果。軟件測試 是保證軟件質(zhì)量的最重要的手段。軟件測試的概念 IEEE 定義為：使用人工或自動手段來運行或測定某個系統(tǒng)過程，其目的在于檢驗它是否滿足規(guī)定的需求或是弄清預(yù)期結(jié)果與實際結(jié)果之間的差別。 測試功能名稱：添加客機信息測試 表 51 測試用例 001