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

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

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

2、途汽車信息管理系統(tǒng)采用 Visual Basic 6.0 作為開(kāi)發(fā)語(yǔ)言，用 SQL Server 2000 開(kāi)發(fā)后臺(tái)數(shù)據(jù)庫(kù)，本系統(tǒng)主要包含了系統(tǒng)用戶管理，汽車線路信 息管理，汽車基本信息管理，車票信息管理四大模塊，可以實(shí)現(xiàn)對(duì)汽車線路信 息，汽車基本信息和車票信息的錄入，查詢，修改，刪除等功能，能滿足長(zhǎng)途 車站汽車管理工作方面的基本要求。 關(guān)鍵詞：Visual Basic 6.0；MSFlexGrid 控件；數(shù)據(jù)庫(kù) 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 目 錄 論文總頁(yè)數(shù)：22 頁(yè) 1 前言 .1 1.1 系統(tǒng)開(kāi)發(fā)背景 .1 1.2 國(guó)內(nèi)發(fā)展?fàn)顩r和不足 .1 1.3 系統(tǒng)開(kāi)發(fā)特點(diǎn) .1 2 系統(tǒng)需求分析和數(shù)據(jù)庫(kù)的設(shè)

8、計(jì) .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ù)庫(kù)的設(shè)計(jì) .4 2.2.1 系統(tǒng)用戶表設(shè)計(jì) .4 2.2.2 汽車線路信息表設(shè)計(jì) .4 2.2.3 汽車信息表設(shè)計(jì) .4 2.2.4 車票信息表設(shè)計(jì) .5 3 系統(tǒng)功能模塊的設(shè)計(jì)與實(shí)現(xiàn) .5 3.1 系統(tǒng)登錄的實(shí)現(xiàn) .5 3.2 系統(tǒng)主界面的設(shè)計(jì) .6 3.3 系統(tǒng)用戶管理模塊設(shè)計(jì) .7 3.4 汽車信息管理模塊設(shè)計(jì) .9 3.4.1 添加汽車信息子模塊 .9 3.4.2 修改汽車信息子模塊 .10 3.4.3 刪除汽

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

26、 頁(yè) 判斷用戶兩次輸入的密碼是否相同 If password.Text checkpassword.Text Then MsgBox 兩次輸入密碼不同！, vbOKOnly password.SetFocus End If 系統(tǒng)用戶管理模塊為管理員用戶提供了修改密碼的功能，用戶必須輸入正 確的舊密碼和兩次輸入的新密碼相同才能完成對(duì)現(xiàn)有用戶密碼的修改，其設(shè)計(jì) 界面如圖 5 所示： 圖 5 系統(tǒng)用戶密碼修改界面 實(shí)現(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 原密碼不對(duì), vbOKOnly objRS.Close CloseDB 如果用戶輸入正確的舊密碼和新密碼，提示用戶密碼修改成功 objRS.Fields(1).Value = Trim(password.Text) objRS.Update 更新數(shù)據(jù)庫(kù) objRS.Close CloseDB 第 9 頁(yè) 共 22 頁(yè) MsgBox 用戶密碼已修改, vbOKOnly 提示用戶密碼修改成功提示 框 Unload Me

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

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

30、 共 22 頁(yè) 圖 7 添加汽車信息界面 3.4.2 修改汽車信息子模塊 修改汽車信息時(shí)，當(dāng)用戶選定 MSFlexGrid 控件中的一組記錄時(shí)，其相應(yīng)的 信息就會(huì)顯示在修改欄中，將指定記錄附給修改欄中各個(gè)文本框使得用戶可以 對(duì)汽車的所有信息進(jìn)行修改。對(duì)指定記錄進(jìn)行修改的代碼片段如下： 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)需要?jiǎng)h除某條汽車信息的時(shí)候，選中需要?jiǎng)h除的信息，點(diǎn)擊刪除按鈕， 完成對(duì)該條信息的刪除操作。實(shí)現(xiàn)功能核心代碼如下： SelectedRowIndex = FGridDatatable.Row 選中需要?jiǎng)h除的那條汽 車信息 CurrentBus = FGridDatatable.TextMatrix(SelectedRowIndex, 1) If MsgBox(真的要?jiǎng)h除此條記錄嗎？, vbOKCancel + vbExclamation, 警告) = vbOK

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

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

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

35、，單擊“添加” 按鈕，將啟動(dòng) cmd_ok_Click 事件，將添加的線路信息插入數(shù)據(jù)庫(kù)表中，完成對(duì) 線路信息的添加。 第 13 頁(yè) 共 22 頁(yè) 3.5.2 線路信息查詢子模塊 當(dāng)管理員需要查詢線路信息的時(shí)候，點(diǎn)擊查詢按鈕，進(jìn)入查詢線路信息模 塊。在啟動(dòng)界面的時(shí)候，在兩個(gè)下拉式組合框中已經(jīng)載入了線路信息表中已有 的起始城市和到達(dá)城市的信息，管理員在下拉列表中選中起始城市和到達(dá)城市， 點(diǎn)擊查詢按鈕，就可以完成對(duì)線路信息的查詢。線路信息查詢子模塊的設(shè)計(jì)界 面如圖 11： 圖 11 線路信息查詢界面 實(shí)現(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 在下拉式組合框 中選擇到達(dá)城市 strSQL = strSQL + and Arrivalcity= + cmbArrivalCity.Text + End If E

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

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

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

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

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

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

43、信息，載入下拉式組合框 中 strSQL = Select Distinct arrivalcity from ticketinfo 第 18 頁(yè) 共 22 頁(yè) objRS.Open strSQL, objConn, 1, 3 Do While Not objRS.EOF 當(dāng)無(wú)該數(shù)據(jù)的時(shí)候跳出循 環(huán) cmbacity.AddItem objRS.Fields(0).Value objRS.MoveNext Loop objRS.Close 選中到達(dá)日期的信息，載入下拉式組合框 中 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 選中車票時(shí)間的信息，載入下拉式組合框中 strSQL = Select Distinct tickettime from ticketinfo objRS.Open strSQL, objConn, 1, 3 Do While Not objRS.EOF 當(dāng)無(wú)該數(shù)據(jù)的時(shí)候就跳出循 環(huán) cmbttime.AddItem objRS.Fields(0).Va

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

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

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

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

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

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