長途汽車信息管理系統(tǒng)的設(shè)計與實現(xiàn)畢業(yè)設(shè)計論文

《長途汽車信息管理系統(tǒng)的設(shè)計與實現(xiàn)畢業(yè)設(shè)計論文》由會員分享，可在線閱讀，更多相關(guān)《長途汽車信息管理系統(tǒng)的設(shè)計與實現(xiàn)畢業(yè)設(shè)計論文（35頁珍藏版）》請在裝配圖網(wǎng)上搜索。

1、 畢 業(yè) 設(shè) 計 (論 文 ) 長途汽車信息管理系統(tǒng)的設(shè)計與實現(xiàn) 論文作者姓名： 申請學(xué)位專業(yè)： 申請學(xué)位類別： 指 導(dǎo) 教 師 姓 名 （ 職 稱 ） ： 論文提交日期： 長途汽車信息管理系統(tǒng)的設(shè)計與實現(xiàn) 摘 要 隨著社會的發(fā)展，人類進入了一個高速發(fā)展的信息時代，高新技術(shù)飛速發(fā) 展的同時,計算機的使用范圍也滲透到人類生活的方方面面，給人們的生活和工 作帶來極大的便利。 長途汽車信息管理系統(tǒng)是長途汽車車站信息匯總和管理的重要組成部分， 是一種典型的信息管理系統(tǒng)，囊括了對長途汽車車站相關(guān)信息的管理，可以化 簡繁瑣的工作過程，使車站的管理更加合理化和科學(xué)化，大大提高工作效率和 節(jié)省運營成本。 本長

2、途汽車信息管理系統(tǒng)采用 Visual Basic 6.0 作為開發(fā)語言，用 SQL Server 2000 開發(fā)后臺數(shù)據(jù)庫，本系統(tǒng)主要包含了系統(tǒng)用戶管理，汽車線路信 息管理，汽車基本信息管理，車票信息管理四大模塊，可以實現(xiàn)對汽車線路信 息，汽車基本信息和車票信息的錄入，查詢，修改，刪除等功能，能滿足長途 車站汽車管理工作方面的基本要求。 關(guān)鍵詞：Visual Basic 6.0；MSFlexGrid 控件；數(shù)據(jù)庫 Long-distance Bus Information Management System Design and Implementation Abstract With the

3、 development of society, humanity has entered a rapid development in the information age, as the rapid development of high and new technology, the use of computers has infiltrated into each aspect of human life, which bring great convenient to peoples work and life. The Long-distance Bus information

4、 management system is the Long-distance bus station information which decision-making and an important component of management, which is a typical example of the information management system. It includes information which related to the Long-distance Bus station information management. The Long-dis

5、tance Bus information management system can simplify the cumbersome process, station rationalization of the management and scientific, and greatly enhance efficiency and save operating costs. The system uses Visual Basic 6.0 as the development language, with SQL Server 2000 developing the background

6、 database. This system includes the Users management, Bus-line information management, and the basic information of automobile management and Ticket information management four modules. We can input, search, update or delete information from the Bus-line management, the basic information of automobi

7、le management and Ticket information management. This information management system can meet the basic requirements of the Long- distance Bus station management. Key words: Visual Basic 6.0；MSFlexGrid Control；Database 目 錄 論文總頁數(shù)：22 頁 1 前言 .1 1.1 系統(tǒng)開發(fā)背景 .1 1.2 國內(nèi)發(fā)展?fàn)顩r和不足 .1 1.3 系統(tǒng)開發(fā)特點 .1 2 系統(tǒng)需求分析和數(shù)據(jù)庫的設(shè)

8、計 .2 2.1 系統(tǒng)功能需求 .2 2.1.1 系統(tǒng)用戶管理 .3 2.1.2 汽車信息管理 .3 2.1.3 線路信息管理 .3 2.1.4 車票信息管理 .3 2.2 數(shù)據(jù)庫的設(shè)計 .4 2.2.1 系統(tǒng)用戶表設(shè)計 .4 2.2.2 汽車線路信息表設(shè)計 .4 2.2.3 汽車信息表設(shè)計 .4 2.2.4 車票信息表設(shè)計 .5 3 系統(tǒng)功能模塊的設(shè)計與實現(xiàn) .5 3.1 系統(tǒng)登錄的實現(xiàn) .5 3.2 系統(tǒng)主界面的設(shè)計 .6 3.3 系統(tǒng)用戶管理模塊設(shè)計 .7 3.4 汽車信息管理模塊設(shè)計 .9 3.4.1 添加汽車信息子模塊 .9 3.4.2 修改汽車信息子模塊 .10 3.4.3 刪除汽

9、車信息子模塊 .10 3.4.4 查詢汽車信息子模塊 .11 3.5 線路信息管理模塊設(shè)計 .11 3.5.1 添加線路信息子模塊 .12 3.5.2 線路信息查詢子模塊 .13 3.5.3 修改線路信息子模塊 .13 3.5.4 刪除線路信息子模塊 .14 3.6 車票信息管理模塊設(shè)計 .14 3.6.1 車票信息添加子模塊 .15 3.6.2 車票信息修改子模塊 .16 3.6.3 車票信息查詢子模塊 .16 4 測試 .18 結(jié) 論 .19 參考文獻 .20 致 謝 .21 聲 明 .22 第 1 頁 共 22 頁 1 前言 1.1系統(tǒng)開發(fā)背景 自從人類進入 21 世紀(jì),也就進入了一個高

10、速發(fā)展的信息時代，高新技術(shù)飛 速發(fā)展的同時,計算機的使用范圍也大大擴展，它已經(jīng)涉及到人類生活的方方面 面。計算機使用的方便快捷,使它在越來越多的方面顯示出比傳統(tǒng)手工制作更迅 速和準(zhǔn)確的優(yōu)點,尤其在信息記錄,檢索和查詢方面,避免了不必要的麻煩。 一個性能良好的長途汽車信息管理系統(tǒng)能夠使管理員快速方便地對長途汽 車站的相關(guān)信息,如長途汽車線路信息, 汽車基本信息,車票信息等進行各種諸 如添加，查詢，刪除，修改操作。使用傳統(tǒng)的手工方式管理長途汽車車站相關(guān) 信息,不僅讓管理員感到非常的厭倦,也存在著不可避免的缺點,如效率太低，管 理不夠科學(xué)等。 使用計算機對長途汽車信息進行管理,有著傳統(tǒng)的手工管理所沒

11、法比擬的優(yōu) 點。例如:查找方便,可靠性高,科學(xué)性好。這些優(yōu)點能夠極大地提高長途汽車信 息管理的效率。正是根據(jù)計算機管理信息的這些優(yōu)點以及長途汽車站管理長途 汽車信息方面的具體需求,利用 VB6.0 和 SQL2000 數(shù)據(jù)庫,使用軟件工程開發(fā)的 方法,開發(fā)了這套長途汽車信息管理系統(tǒng)。 1.2國內(nèi)發(fā)展?fàn)顩r和不足 在國內(nèi)，也只有在一些經(jīng)濟發(fā)達的地區(qū)才更多的實現(xiàn)了企業(yè)的信息化管理。 在汽車站信息管理方面，也只有在一些大中城市才實現(xiàn)了汽車的信息化管理， 然而即使在這些發(fā)達的地區(qū)的汽車站，所采用的汽車站管理系統(tǒng)仍然存在或多 或少的缺陷，使得在整個車站的運行過程中會出現(xiàn)一些問題，給車站造成一些 不必要的損

12、失。在一些偏遠(yuǎn)的小城市，小車站卻仍然采用傳統(tǒng)的手工管理方式 來管理汽車站的相關(guān)信息，這樣的管理方式與現(xiàn)代的信息化社會脫離，不但浪 費寶貴的人力，物力資源，而且管理不科學(xué)，錯誤率高，大大降低了工作效率。 只有在整個社會不斷的推進企業(yè)的信息化管理方式，才能更好的創(chuàng)造更多的經(jīng) 濟效益，節(jié)省更多的時間和資源，不斷提升整個社會信息化發(fā)展的進程。 1.3系統(tǒng)開發(fā)特點 長途汽車信息管理系統(tǒng)是典型的信息管理系統(tǒng)，其開發(fā)主要包括后臺數(shù)據(jù) 庫的建立和維護以及前端應(yīng)用程序的開發(fā)兩個方面。對于數(shù)據(jù)庫的，要求建立 起數(shù)據(jù)的一致性和完整性，數(shù)據(jù)安全性好的數(shù)據(jù)庫。對于應(yīng)用程序的開發(fā)，要 求應(yīng)用程序功能完善，方便使用的特點。

13、 本長途汽車信息管理系統(tǒng)，使用計算機為工具，完成對長途汽車信息的管 理。本長途汽車信息管理系統(tǒng)采用 C/S 模式結(jié)構(gòu)。 第 2 頁 共 22 頁 C/S （Client/Server）結(jié)構(gòu)，即客戶機和服務(wù)器結(jié)構(gòu)。它是軟件系統(tǒng)體系 結(jié)構(gòu)，通過它可以充分利用兩端硬件環(huán)境的優(yōu)勢，將任務(wù)合理分配到 Client 端 和 Server 端來實現(xiàn)，降低了系統(tǒng)的通訊開銷。目前大多數(shù)應(yīng)用軟件系統(tǒng)都是 Client/Server 形式的兩層結(jié)構(gòu)，由于現(xiàn)在的軟件應(yīng)用系統(tǒng)正在向分布式的 Web 應(yīng)用發(fā)展，Web 和 Client/Server 應(yīng)用都可以進行同樣的業(yè)務(wù)處理，應(yīng)用不同 的模塊共享邏輯組件；因此，內(nèi)部的

14、和外部的用戶都可以訪問新的和現(xiàn)有的應(yīng) 用系統(tǒng)，通過現(xiàn)有應(yīng)用系統(tǒng)中的邏輯可以擴展出新的應(yīng)用系統(tǒng)。這也就是目前 應(yīng)用系統(tǒng)的發(fā)展方向。 優(yōu)勢和劣勢： （1）應(yīng)用服務(wù)器運行數(shù)據(jù)負(fù)荷較輕。 （2）數(shù)據(jù)的儲存管理功能較為透明。 （3）C/S 架構(gòu)的劣勢是高昂的維護成本且投資大。 1.4系統(tǒng)開發(fā)環(huán)境 1.硬件環(huán)境： CPU: AMD 2.53GHZ 內(nèi)存：512MB 硬盤：80GB 顯卡：NAIDIA FX 5200 2.軟件環(huán)境： 操作系統(tǒng)： Windows XP 開發(fā)工具：Microsoft VB 6.0 開發(fā)語言：VB 2 系統(tǒng)需求分析和數(shù)據(jù)庫的設(shè)計 2.1系統(tǒng)功能需求 在交通運輸系統(tǒng)高度發(fā)達繁忙的今

15、天，人們在各地不同城市之間的往返更 加頻繁，極大的增加了旅客對交通行業(yè)的需求。人們可以選擇空中客車，也可 以選擇火車，但是這兩種交通工具在某方面存在著問題。航空運輸普遍費用太 高，火車運輸又太過于煩悶，而且這兩種方式都只適合于遠(yuǎn)距離的交通運輸。 于是，為了讓旅客能方便快捷舒適的在兩個城市間穿梭，人們就更傾向于長途 汽車這樣一種交通運輸方式。因此，長途汽車站為了滿足大量旅客的需求，很 有必要建立一套現(xiàn)代化的長途汽車站管理體系和管理流程。長途汽車信息管理 系統(tǒng)就是針對長途汽車站使用計算機對長途汽車的各種信息進行匯總和管理的 一種現(xiàn)代化管理軟件，為長途汽車站提供準(zhǔn)確，快捷，科學(xué)的信息化管理方式， 第

16、 3 頁 共 22 頁 大大提高車站運營效率。 通過對用戶需求的分析,本系統(tǒng)具有以下特點： (1)由于一項新的軟件在被使用之前,對于使用者來說是陌生和嶄新的,所 以要求系統(tǒng)為用戶提供簡單，友好，易于操作的界面。 (2)修改，查詢，刪除數(shù)據(jù)方便,數(shù)據(jù)的穩(wěn)定性和可靠性好。 (3)數(shù)據(jù)計算自動完成,盡量減少人工干預(yù)。 本系統(tǒng)具有以下四個功能模塊:系統(tǒng)管理模塊,汽車信息管理模塊,線路信息 管理模塊,車票信息管理模塊。系統(tǒng)整體的簡單模塊圖如圖 1 所示，以下將對具 體功能需求進行描述。 圖 1 系統(tǒng)模塊圖 2.1.1 系統(tǒng)用戶管理 用戶以合法身份登入系統(tǒng)后,管理員可以進行系統(tǒng)用戶的添加,密碼的修改 操作

17、。 2.1.2 汽車信息管理 管理員可以在汽車信息管理模塊實現(xiàn)對汽車信息的管理。管理員首先應(yīng)該 建立汽車信息數(shù)據(jù)庫，輸入原始的數(shù)據(jù)信息，當(dāng)有新的汽車信息的時候或者管 理員需要修改某個汽車的相關(guān)信息以及想要刪除某個汽車信息的時候，就可以 完成相應(yīng)的操作。管理員也可以在整個數(shù)據(jù)庫中查尋相關(guān)汽車信息。 2.1.3 線路信息管理 車站管理員可以在線路信息管理模塊對車站線路信息進行管理。管理員首 先建立汽車線路信息數(shù)據(jù)庫，輸入原始的線路信息，當(dāng)有新的線路需要添加或 汽車信息管理 線路信息管理 車票信息管理 系統(tǒng)用戶管理長 途 汽 車 信 息 管 理 系 統(tǒng) 第 4 頁 共 22 頁 者需要對已有的線路信

18、息進行修改，刪除的時候，管理員就可以進行相應(yīng)的操 作。管理員也可以通過本模塊查詢到所有需要查詢的線路的詳細(xì)信息。 2.1.4 車票信息管理 管理員可以在車票管理模塊實現(xiàn)對線路車票信息的管理。管理員根據(jù)相應(yīng) 的汽車線路信息來設(shè)置相應(yīng)的車票詳細(xì)信息。當(dāng)有新的線路添加的時候，要把 相應(yīng)的車票信息添加到數(shù)據(jù)庫中，管理員還可以對某條線路的車票信息進行修 改，刪除和查詢操作。 2.2數(shù)據(jù)庫的設(shè)計 本系統(tǒng)是一個關(guān)于長途汽車站相關(guān)信息的管理系統(tǒng)，主要包括用戶、汽車 信息、汽車線路信息、車票信息的管理。因此，在設(shè)計數(shù)據(jù)庫表的時候設(shè)計了 系統(tǒng)用戶表、汽車線路信息表、汽車信息表和車票信息表用來存儲對應(yīng)的信息。 由于

19、本系統(tǒng)的管理員需要對車站的信息進行管理，這些信息對于車站來說是十 分重要的，這就決定了本系統(tǒng)的用戶都是必須是擁有最高權(quán)限的系統(tǒng)管理員。 2.2.1 系統(tǒng)用戶表設(shè)計 該表是存儲管理員用戶名和密碼的信息表，以供登錄時候用戶名和密碼的 驗證。 表 1 系統(tǒng)用戶表 字段名稱 數(shù)據(jù)類型 字段大小 必填字段 描述 字段說明 UserName nvarchar 10 是 用戶名 主鍵 Password nvarchar 20 是 密碼 無 2.2.2 汽車線路信息表設(shè)計 該表是存儲汽車線路信息的表，主要用來存儲線路的編號，起始城市，到 達城市，起始日期，到達時間，汽車編號，車票價格和備注信息。 表 2 汽車

20、線路信息表 字段名稱 數(shù)據(jù)類型 字段大小 必填字段 描述 字段說明 buslineNO nvarchar 10 是 線路編號 主鍵 departCity nvarchar 20 是 起始城市 無 arricalCity nvarchar 20 是 到達城市 無 departdate nvarchar 20 是 起始日期 無 arrivaltime nvarchar 20 是 到達時間 無 busNO nvarchar 10 是 汽車編號 無 第 5 頁 共 22 頁 Price float 8 否 車票價格 無 memo nvarchar 50 否 備注 無 2.2.3 汽車信息表設(shè)計 該表存

21、放了汽車的基本信息，包括汽車的編號，車型，購買時間，使用時 間，座位數(shù)，有無空調(diào)，電視和備注信息。 表 3 汽車信息表 字段名稱 數(shù)據(jù)類型 字段大小 必填字段 描述 索引 busNO nvarchar 10 是 長途汽車編號 主鍵 bustype nvarchar 20 是 長途汽車車型 無 buydate datatime 8 否 購買時間 無 usedate nvarchar 20 否 使用時間 無 seatNO nvarchar 10 否 汽車座位數(shù)量 無 TV nvarchar 2 否 有無電視 無 aircondition nvarchar 2 否 有無空調(diào) 無 memo nvarc

22、har 50 否 備注 無 2.2.4 車票信息表設(shè)計 該表主要存儲了車票的信息，包括車票編號，汽車編號，起始城市，到達 城市，購票日期，購票時間，車票價格和備注信息。 表 4 車票信息表 字段名稱 數(shù)據(jù)類型 字段大小 必填字段 描述 索引 ticketNO nvarchar 10 是 車票編號 主鍵 busNO nvarchar 10 是 汽車編號 無 departCity nvarchar 20 是 起始城市 無 arrivalcity nvarchar 20 是 到達城市 無 ticketdate nvarchar 20 是 購票日期 無 tickettime nvarchar 20 是

23、 購票時間 無 ticketprice float 8 是 車票價格 無 ticketMemo nvarchar 50 否 備注 無 3 系統(tǒng)功能模塊的設(shè)計與實現(xiàn) 3.1 系統(tǒng)登錄的實現(xiàn) 系統(tǒng)登錄界面也是本長途汽車信息管理系統(tǒng)的第一個界面，其界面如圖 2： 第 6 頁 共 22 頁 圖 2 系統(tǒng)登錄界面 管理員可以通過這個界面進入主頁面對其他模塊進行管理，如對長途汽車 站相關(guān)信息進行修改，添加，查詢，刪除。同樣，在主頁面中，管理員可以修 改自己密碼，或者添加新的管理員用戶。管理員要登錄本系統(tǒng)，首先需要輸入 用戶名和密碼，在登錄過程中驗證用戶名和密碼是否正確，是否為空，如果不 正確或者為空，就會

24、彈出相應(yīng)的對話框，提示用戶輸入錯誤，不能進入該系統(tǒng)。 當(dāng)用戶名和密碼都輸入正確，打開數(shù)據(jù)庫，進入系統(tǒng)管理界面。 3.2 系統(tǒng)主界面的設(shè)計 系統(tǒng)主界面，也就是程序主窗體 frm_main,它是整個系統(tǒng)的主要操作界面， 也是在登錄之后出現(xiàn)的系統(tǒng)操作界面，采用菜單結(jié)構(gòu)，簡單明了，主要包括系 統(tǒng)用戶，線路信息，汽車信息，車票信息 4 個模塊，管理員可以通過這個界面 進入到相應(yīng)的模塊里面，完成對系統(tǒng)用戶，線路信息，汽車信息和車票信息的 管理工作。主界面所擁有的功能是通過整個系統(tǒng)子程序的調(diào)用,提供工具菜單中 的操作方式，方便管理員用戶根據(jù)需要選擇進入不同的模塊，如圖 3： 第 7 頁 共 22 頁 圖 3

25、 系統(tǒng)操作界面 3.3系統(tǒng)用戶管理模塊設(shè)計 系統(tǒng)用戶管理模塊主要包括用戶的添加和密碼修改兩個子模塊。主要實現(xiàn) 管理員對用戶的管理。 當(dāng)需要添加新的管理員的時候，管理員可以進入添加新的管理員用戶界面， 輸入需要添加的用戶的用戶名和密碼，用戶名不能和數(shù)據(jù)庫中已有的用戶名相 同，兩次輸入的密碼必須一致，然后點擊添加按鈕，即可完成對管理員用戶的 添加，添加用戶設(shè)計界面如圖 4： 圖 4 系統(tǒng)用戶添加界面 實現(xiàn)功能部分關(guān)鍵代碼如下： If username.Text = Then 判斷用戶名是否為空 MsgBox 用戶名不能為空！, vbOKOnly Exit Sub End If 第 8 頁 共 22

26、 頁 判斷用戶兩次輸入的密碼是否相同 If password.Text checkpassword.Text Then MsgBox 兩次輸入密碼不同！, vbOKOnly password.SetFocus End If 系統(tǒng)用戶管理模塊為管理員用戶提供了修改密碼的功能，用戶必須輸入正 確的舊密碼和兩次輸入的新密碼相同才能完成對現(xiàn)有用戶密碼的修改，其設(shè)計 界面如圖 5 所示： 圖 5 系統(tǒng)用戶密碼修改界面 實現(xiàn)功能關(guān)鍵代碼如下： 判斷兩次輸入的密碼是否相同 If password.Text checkpassword.Text Then MsgBox 兩次輸入密碼不同, vbOKOnly p

27、assword.SetFocus Else 判斷用戶舊密碼是否輸入正確 If Oldpassword.Text objRS.Fields(1).Value Then MsgBox 原密碼不對, vbOKOnly objRS.Close CloseDB 如果用戶輸入正確的舊密碼和新密碼，提示用戶密碼修改成功 objRS.Fields(1).Value = Trim(password.Text) objRS.Update 更新數(shù)據(jù)庫 objRS.Close CloseDB 第 9 頁 共 22 頁 MsgBox 用戶密碼已修改, vbOKOnly 提示用戶密碼修改成功提示 框 Unload Me

28、End If 3.4汽車信息管理模塊設(shè)計 汽車信息管理模塊主要實現(xiàn)管理員對汽車信息的管理工作，提供方便快捷 的操作。蓋模塊主要包括四個子模塊,其主要功能是對車站的汽車信息進行添加,修 改,刪除操作。四個子模塊之間的層次關(guān)系如圖 6： 汽車編號 備注信息 汽車型號 購買時間 使用時間 座位數(shù)量 有無電視 有無空調(diào) 汽車 信息 管理 添加信息 修改信息 刪除信息 查詢信息 圖 6 汽車信息管理模塊關(guān)系圖 在此模塊的設(shè)計過程中,使用了 MSFlexGrid 控件來顯示汽車信息,使用 ShowTitle 和 loadData 兩個函數(shù)來初始化 MSFlexGrid 控件，加載后就在窗口 顯示出長途汽車

29、站所有汽車的相關(guān)信息。主要包括汽車的編號，汽車的型號， 購買時間，使用時間，座位數(shù)量，有無電視，有無空調(diào)和備注信息。管理員可 以通過該窗口了解到所有汽車的信息。以下將具體介紹各個功能的實現(xiàn)。 3.4.1 添加汽車信息子模塊 在長途汽車站的運營過程中，添加新的汽車信息是一件很平常的事情。在 添加汽車信息子模塊的設(shè)計時候,使用 text 文本框添加汽車信息,包括添加汽車 編號,汽車類型,購買日期，使用時間，座位個數(shù)，有無電視，有無空調(diào)和備注 信息，當(dāng)用戶按要求填寫了相應(yīng)的文本框之后點擊添加按鈕,將啟動 cmd_OK_Click 事件，將添加的汽車信息放入數(shù)據(jù)庫表中。設(shè)計界面如圖 7： 第 10 頁

30、 共 22 頁 圖 7 添加汽車信息界面 3.4.2 修改汽車信息子模塊 修改汽車信息時，當(dāng)用戶選定 MSFlexGrid 控件中的一組記錄時，其相應(yīng)的 信息就會顯示在修改欄中，將指定記錄附給修改欄中各個文本框使得用戶可以 對汽車的所有信息進行修改。對指定記錄進行修改的代碼片段如下： Private Sub cmd_edit_Click() 修改信息按鈕 Dim SelectedRowIndex As Integer SelectedRowIndex = FGridDatatable.Row 選中需要修改的那一行 CurrentBus = FGridDatatable.TextMatrix(S

31、electedRowIndex, 1) frm_editbusinfo.Show 1 End Sub 3.4.3 刪除汽車信息子模塊 當(dāng)需要刪除某條汽車信息的時候，選中需要刪除的信息，點擊刪除按鈕， 完成對該條信息的刪除操作。實現(xiàn)功能核心代碼如下： SelectedRowIndex = FGridDatatable.Row 選中需要刪除的那條汽 車信息 CurrentBus = FGridDatatable.TextMatrix(SelectedRowIndex, 1) If MsgBox(真的要刪除此條記錄嗎？, vbOKCancel + vbExclamation, 警告) = vbOK

32、Then 提示用戶是否真的要刪除該條信息 第 11 頁 共 22 頁 OpenDB strSQL = delete from businfo where busno = + CurrentBus + 從數(shù)據(jù)庫中 刪除該條信息 objConn.Execute (strSQL) CloseDB MsgBox 記錄已刪除, vbOKOnly 提示用戶記錄已經(jīng)刪除 End If 3.4.4 查詢汽車信息子模塊 面對繁多的汽車信息，本系統(tǒng)設(shè)計了汽車信息查詢功能，方便管理員用戶 快捷，準(zhǔn)確地查出想要了解的汽車的信息。管理員輸入汽車編號和汽車型號， 就可以在數(shù)據(jù)庫中找到相應(yīng)的汽車信息。設(shè)計界面如圖 8 所示

33、： 圖 8 汽車信息查詢界面 3.5線路信息管理模塊設(shè)計 線路信息管理是長途汽車站必須處理的事務(wù)，線路信息管理模塊的設(shè)計能 給車站管理員提供科學(xué)，準(zhǔn)確的管理方式。因此，從四個方面設(shè)計了線路信息 管理模塊，即線路信息的添加，線路信息的修改，刪除和查詢。在此模塊的設(shè) 計過程中,同樣使用了 MSFlexGrid 控件來顯示線路信息,使用 ShowTitle 和 loadData 兩個函數(shù)來初始化 MSFlexGrid 控件，加載后就在窗口顯示出長途汽 車站所有線路的相關(guān)信息。主要包括線路的編號，起始城市，到達城市，起始 日期，起始時間，到達時間，汽車編號，車票價格和備注信息。管理員可以通 過該窗口了

34、解到所有線路的詳細(xì)信息。四個過程模塊之間的關(guān)系圖如圖 9，以 下將具體介紹各個功能的實現(xiàn)。 第 12 頁 共 22 頁 線路編號 車票價格 起始城市 到達城市 起始日期 起始時間 到達時間 汽車編號 線路 信息 管理 添加信息 修改信息 刪除信息 查詢信息 圖 9 線路信息管理模塊關(guān)系圖 3.5.1 添加線路信息子模塊 隨著城市交通的飛速發(fā)展，當(dāng)長途汽車站原先已有的線路信息不能滿足需 求的時候，就需要添加新的汽車線路，有關(guān)他們的詳細(xì)信息必須由長途汽車站 管理員添加到數(shù)據(jù)庫，線路信息添加的設(shè)計界面如圖 10 所示： 圖 10 線路信息添加界面 在此模塊設(shè)計中，在相應(yīng)得文本框中輸入需要添加的內(nèi)容后

35、，單擊“添加” 按鈕，將啟動 cmd_ok_Click 事件，將添加的線路信息插入數(shù)據(jù)庫表中，完成對 線路信息的添加。 第 13 頁 共 22 頁 3.5.2 線路信息查詢子模塊 當(dāng)管理員需要查詢線路信息的時候，點擊查詢按鈕，進入查詢線路信息模 塊。在啟動界面的時候，在兩個下拉式組合框中已經(jīng)載入了線路信息表中已有 的起始城市和到達城市的信息，管理員在下拉列表中選中起始城市和到達城市， 點擊查詢按鈕，就可以完成對線路信息的查詢。線路信息查詢子模塊的設(shè)計界 面如圖 11： 圖 11 線路信息查詢界面 實現(xiàn)該查詢功能的核心代碼如下： Private Sub cmd_que_Click() 查詢按鈕函

36、數(shù) Dim strSQL As String strSQL = Select * from buslineinfo where 1=1 If cmbDepartcity.ListIndex 0 Then 在下拉式組合框 中選擇起始城市 strSQL = strSQL + and departcity= + cmbDepartcity.Text + End If If cmbArrivalCity.ListIndex 0 Then 在下拉式組合框 中選擇到達城市 strSQL = strSQL + and Arrivalcity= + cmbArrivalCity.Text + End If E

37、nd Sub 3.5.3 修改線路信息子模塊 管理員需要根據(jù)實際情況來調(diào)整汽車的線路信息。當(dāng)管理員需要對某條汽 車線路信息進行修改的時候，選中需要修改的線路，點擊修改按鈕，出現(xiàn)修改 該條線路信息的界面，當(dāng)管理員完成對該條線路的信息的修改后，點擊修改按 鈕，將啟動 cmd_ok_click 事件，更新數(shù)據(jù)庫，完成對該條線路信息的修改，設(shè) 第 14 頁 共 22 頁 計界面如圖 12： 圖 12 線路信息修改界面 3.5.4 刪除線路信息子模塊 當(dāng)已有的線路取消時,該線路對應(yīng)的線路信息也將取消，這時就需要管理員 將該線路信息從數(shù)據(jù)庫中刪除。管理員首先選中需要刪除的線路信息，點擊 “刪除”按鈕，提示

38、管理員是否確定刪除該條信息，管理員點擊“確定”按鈕， 該條數(shù)據(jù)就成功從數(shù)據(jù)庫表中刪除。 3.6車票信息管理模塊設(shè)計 在長途汽車站的管理任務(wù)中，對車票信息的管理更加顯得十分重要。管理 員需要了解到某條線路的詳細(xì)的車票信息，包括汽車的起始和到達城市，車票 日期和時間，車票價格和車票備注信息，通過了解這些信息，管理員可以方便 的完成對相應(yīng)汽車線路車票信息的調(diào)整。車票信息管理模塊主要包括四個子模 塊,其主要功能是對車站的汽車車票信息進行添加,修改,刪除操作。四個子模塊 之間關(guān)系如圖 13： 第 15 頁 共 22 頁 車票編號 備注信息 汽車編號 起始城市 到達城市 購票日期 購票時間 車票價格 車票

39、 信息 管理 添加信息 修改信息 刪除信息 查詢信息 圖 13 車票信息管理模塊關(guān)系圖 車票信息管理模塊界面設(shè)計如圖 14： 圖 14 車票信息管理界面 在這個界面中，同樣使用了 MSFlexGrid 控件來顯示車票信息。在窗口中顯 示出車票信息后，管理員可以通過“添加” ， “修改” ， “刪除” ， “查詢”4 個按 鈕來對車票的編號，汽車編號，起始城市，到達城市，購票日期，購票時間， 車票價格等信息進行管理和操作。 3.6.1 車票信息添加子模塊 當(dāng)有新的汽車線路添加了的時候，管理員就需要設(shè)置相應(yīng)的新的車票信息。 管理員通過車票信息管理界面進入車票管理模塊，點擊添加按鈕，將出現(xiàn)添加 車票

40、信息的界面，管理員輸入車票編號，汽車編號，起始城市，到達城市，購 第 16 頁 共 22 頁 票日期，購票時間，車票價格和備注后，點擊添加按鈕，完成對車票信息的添 加，設(shè)計界面如圖 15： 圖 15 車票信息添加界面 3.6.2 車票信息修改子模塊 在該模塊的設(shè)計中，實現(xiàn)管理員對現(xiàn)有車票信息的修改，管理員首先選中 需要修改的線路的車票信息，管理員在完成對相應(yīng)信息的修改后，點擊“修改” 按鈕，將啟動 cmd_ok_click 事件，更新數(shù)據(jù)庫，完成對車票信息的修改，設(shè)計 界面如圖 16： 圖 16 車票信息修改界面 3.6.3 車票信息查詢子模塊 該模塊的設(shè)計主要是方便管理員對車票信息的查詢而設(shè)

41、計的。管理員可以 在該模塊中，根據(jù)數(shù)據(jù)庫現(xiàn)有車票的信息，在下拉列表中選擇所需要的起始城 市，到達城市，車票日期，車票時間就可以查詢到相關(guān)的車票信息，完成對車 第 17 頁 共 22 頁 票信息的查詢功能。設(shè)計界面如圖 17： 圖 17 車票信息查詢界面 啟動該界面時，需要載入 4 個下拉式組合框的信息，點擊查詢按鈕，啟動 cmd_que_Click 事件，在窗口中顯示出符合要求的購票信息。實現(xiàn)該功能的核 心代碼如下： OpenDB 選中起始城市的信息，載入下拉式組合框中 strSQL = Select Distinct departcity from ticketinfo 打開數(shù)據(jù)庫連接 ob

42、jRS.Open strSQL, objConn, adOpenKeyset, adLockPessimistic 將起始城市信息載入下拉式組合框中 If Not objRS.EOF Then 當(dāng)無該數(shù)據(jù)的時候跳出循 環(huán) Do While Not objRS.EOF cmbdcity.AddItem objRS.Fields(0).Value objRS.MoveNext Loop objRS.Close Else 如果沒有該條信息，提示請先設(shè)置車票信 息 objRS.Close CloseDB MsgBox 請先設(shè)置車票信息, vbOKOnly Exit Sub End If 選中到達城市的

43、信息，載入下拉式組合框 中 strSQL = Select Distinct arrivalcity from ticketinfo 第 18 頁 共 22 頁 objRS.Open strSQL, objConn, 1, 3 Do While Not objRS.EOF 當(dāng)無該數(shù)據(jù)的時候跳出循 環(huán) cmbacity.AddItem objRS.Fields(0).Value objRS.MoveNext Loop objRS.Close 選中到達日期的信息，載入下拉式組合框 中 strSQL = Select Distinct ticketdate from ticketinfo objRS

44、.Open strSQL, objConn, 1, 3 Do While Not objRS.EOF cmbtdate.AddItem objRS.Fields(0).Value objRS.MoveNext Loop objRS.Close 選中車票時間的信息，載入下拉式組合框中 strSQL = Select Distinct tickettime from ticketinfo objRS.Open strSQL, objConn, 1, 3 Do While Not objRS.EOF 當(dāng)無該數(shù)據(jù)的時候就跳出循 環(huán) cmbttime.AddItem objRS.Fields(0).Va

45、lue objRS.MoveNext Loop objRS.Close 關(guān)閉數(shù)據(jù)庫連接和關(guān)閉數(shù)據(jù) 庫 CloseDB End Sub 4 測試 由于本系統(tǒng)的開發(fā)使用了 visual basic 6.0 作為開發(fā)工具,具有可視化的 編程環(huán)境,在編程的過程中就可以對所做的結(jié)果進行運行,以立即進行改正。經(jīng) 過不斷地修改和更正，本系統(tǒng)能很好地完成預(yù)期效果。 管理員在通過登錄界面的身份驗證之后，進入系統(tǒng)主界面，在主界面中， 第 19 頁 共 22 頁 用戶可以通過菜單形式選擇進入的模塊。在系統(tǒng)用戶管理中，可以添加，修改 系統(tǒng)用戶信息；在汽車信息管理中，可以添加，查詢，修改，刪除汽車信息； 在汽車線路信息

46、管理中，可以添加，查詢，修改，刪除線路信息；在車票信息 管理中，可以完成對車票信息的添加，查詢，修改和刪除車票信息。 第 20 頁 共 22 頁 結(jié) 論 經(jīng)過測試，根據(jù)車站對長途汽車信息管理的需求而設(shè)計的功能全部能運行 正常。由于第一次獨立開發(fā)實際應(yīng)用的系統(tǒng)，整個開發(fā)過程經(jīng)歷了很多的波折。 經(jīng)過不斷地查詢各種資料和信息，不斷地解決一個一個的問題，當(dāng)然更加感謝 指導(dǎo)老師的幫助，使得設(shè)計能夠順利進行。然而由于時間的限制，使得該系統(tǒng) 也存在很多沒有解決的問題，這是比較遺憾的。比如說在身份驗證這一模塊， 對于怎樣保證數(shù)據(jù)的安全性沒有很好的完成。 通過對整個畢業(yè)設(shè)計的開發(fā)，讓人學(xué)會怎樣去做一件事情，盡管

47、從沒有做 過，但是卻知道怎樣去利用一切可以利用的資源和尋求一切可能得到的幫助去 解決問題，并且在解決問題的同時不斷增加經(jīng)驗和心得體會，為以后的生活和 工作打下堅實的基礎(chǔ)。 第 21 頁 共 22 頁 參考文獻 1 劉瑞新,汪遠(yuǎn)征.visual basic 程序設(shè)計教程M.北京:機械工業(yè)出版社,2000。 2 魯榮江,王立豐.Visual Basic 項目案例導(dǎo)航M.北京:科學(xué)出版社,2002。 3 趙建敏,郭慶.Visual Basic 編程指南M.北京:航空工業(yè)出版社,2001。 4 盧毅.Visual Basic 6 數(shù)據(jù)庫設(shè)計實例導(dǎo)航M.北京:科學(xué)出版社,2001。 5 張勇.Visua

48、l Basic 課程設(shè)計案例精編M.北京:中國水利水電出版社,2003。 6 美Mike Gunderloy 著.開發(fā)指南-ADO 篇M.北京:電子工業(yè)出版社,2000。 7 黃志峰.Visual Basic 高級編程實例精解M.北京:國防工業(yè)出版社,2001。 第 22 頁 共 22 頁 致 謝 本文是在朱西平和陳念偉老師的熱情關(guān)心和指導(dǎo)下完成的，他們淵博的知 識和嚴(yán)謹(jǐn)?shù)闹螌W(xué)作風(fēng)使我受益匪淺，對順利完成本課題起到了極大的作用。在 此向他們表示我最衷心的感謝！ 感謝陳念偉老師在課題研究初期給予的幫助，在陳念偉老師的幫助下課題 才得以很好的展開，有了一個很好的開端！感謝陳行同學(xué)在課題開發(fā)過程中給

49、 予的幫助，因為他的協(xié)助，才得以高效率的完成了所有的開發(fā)工作！ 在論文完成過程中，本人還得到了其他老師和許多同學(xué)的熱心幫助，本人 向他們表示深深的謝意！ 最后向在百忙之中評審本文的各位專家、老師表示衷心的感謝！ 作者簡介 姓 名： 何緒輝 性別： 男 出生年月： 1984 年 1 月 民族： 漢 E-mail: 第 23 頁 共 22 頁 聲 明 本論文是 2007 年 2 月至 2007 年 6 月在成都信息工程學(xué)院網(wǎng)絡(luò)工程系完成 的。 文中除了特別加以標(biāo)注地方外，不包含他人已經(jīng)發(fā)表或撰寫過的研究成果， 也不包含為獲得成都信息工程學(xué)院或其他教學(xué)機構(gòu)的學(xué)位或證書而使用過的材 料。除非另有說明，

50、本文的工作是原始性工作。 關(guān)于學(xué)位論文使用權(quán)和研究成果知識產(chǎn)權(quán)的說明： 本人完全了解成都信息工程學(xué)院有關(guān)保管使用學(xué)位論文的規(guī)定，其中包括： （1）學(xué)校有權(quán)保管并向有關(guān)部門遞交學(xué)位論文的原件與復(fù)印件。 （2）學(xué)?？梢圆捎糜坝?、縮印或其他復(fù)制方式保存學(xué)位論文。 （3）學(xué)校可以學(xué)術(shù)交流為目的復(fù)制、贈送和交換學(xué)位論文。 （4）學(xué)?？稍试S學(xué)位論文被查閱或借閱。 （5）學(xué)?？梢怨紝W(xué)位論文的全部或部分內(nèi)容（保密學(xué)位論文在解密后 遵守此規(guī)定） 。 除非另有科研合同和其他法律文書的制約，本論文的科研成果屬于成都信息 工程學(xué)院。 特此聲明！ 作者簽名： 2007 年 06 月 日 第 24 頁 共 22 頁 A

51、re you hungry now? No, I am tired and lazy now; if I pursue you I will not catch you, and if I catch you-through your own slowness and clumsiness-I will not kill you, and if I kill you I will not eat you. Nicholas had begun to back away, and at the last; words, realizing that they were a signal, he

52、turned and began to run, splashing through the shallow water. Ignacio ran after him, much helped by his longer legs, his hair flying behind his dark young face, his square teeth-each white as a bone and as big as Nicholass thumbnail-showing like spectators who lined the railings of his lips. Dont ru

53、n, Nicholas, Dr. Island said with the voice of a wave. It only makes him angry that you run. Nicholas did not answer, but cut to his left, up the beach and among the trunks of the palms, sprinting all the way because he had no way of knowing Ignacio was not right behind him, about to grab him by the

54、 neck. When he stopped it was in the thick jungle, among the boles of the hardwoods, where he leaned,.; out of breath, the thumping of his own heart the only . sound in an atmosphere silent and unwaked as Earths long, prehuman day. For a time he listened for any sound Ignacio might make searching fo

55、r him; there was none. He drew a deep breath then and said, Well, thats over, expecting Dr. Island to answer from somewhere; there was only the green hush. The light was still bright and strong and nearly, shadowless, but some interior sense told him the day, was nearly over, and he noticed that suc

56、h faint shades as he could see stretched long, horizontal distortions of their objects. He felt no hunger, but he had fasted be- fore and knew on which side of hunger he stood; he was not as strong as he had been only a day past, and by this time next day he would probably be unable to outrun Ignaci

57、o. He should, he now realized, have eaten the monkey he had killed; but his stomach revolted at the thought of the raw flesh, and he did not know how he might build a fire, although Ignacio seemed to have done so the night before. Raw fish, even if he were able to catch a fish, would be as bad, or w

58、orse, than raw monkey; he remembered his effort to open a coconut-he had failed, but it was surely not impossible. His mind was hazy as to what a coconut might contain, but there had to be an edible core, because they were eaten in books. He decided to make a wide sweep through the jungle that would

59、 bring him back to the beach well away from Ignacio; he had several times seen coconuts lying in the sand under the trees. He moved quietly, still a little afraid, trying to think of ways to open the coconut when he found it. He imagined himself standing before a large and raggedly faceted stone, ho

60、lding the coconut in both hands. He raised it and smashed it down, but when it struck it was no longer a coconut but Mayas head; he heard her nose cartilage break with a distinct, rubbery snap. Her eyes, as blue as the sky above Madhya Pradesh, the sparkling blue sky of the egg, looked up at him, bu

61、t he could no longer look into them, they retreated from his own, and it came to him quite suddenly that Lucifer, in falling, must have fallen up, into the fires and the coldness of space, never again to see the warm blues and browns and greens of Earth: 1 was watching Satan fall as lightning from h

62、eaven. He had heard that on tape somewhere, but he could not remember where. He had read that on Earth lightning did not come down from the clouds, but leaped up from the planetary surface toward them, never to return. Nicholas. He listened, but did not hear his name again. Faintly water was babblin

63、g; had Dr. Island used that sound to speak to him? He walked toward it and found a little rill that threaded a way among the trees, and followed it. In a hundred steps it grew broader, slowed, and ended in a long blind pool under a dome of leaves. . Diane was sitting on moss on the side opposite him

64、; she looked up as she saw him, and smiled. Hello, he said. Hello, Nicholas. I thought I heard you. I wasnt mistaken after all, was I? I didnt think I said anything. He tested the dark water with his foot and found that it was very cold. 第 25 頁 共 22 頁 You gave a little gasp, I fancy. I heard it, and

65、 I said to myself, thats Nicholas, and I called you. Then I thought I might be wrong, or that it might be Ignacio. Ignacio was chasing me. Maybe he still is, but h think hes probably given up by now. The girl nodded, looking into the dark waters of they pool, but did not seem to have heard him. He b

66、egan to work his way around to her, climbing across the snakelike roots of the crowding trees. Why does Ignacio want to kill me, Diane? Sometimes he wants to kill me, too, the girl said. But why? I think hes a bit frightened of us. Have you ever talked to him, Nicholas? Today I did a little. He told me a story about a pet fish he used to have. Ignacio grew up all alone; did he tell you that? On= Earth. On a plantation in Brazil, way up the Amazon -Dr. Island told me. I thought it was crowded on