“程序設(shè)計(jì)”課程設(shè)計(jì)（報(bào)告）上海公交站點(diǎn)查詢系統(tǒng)

1、學(xué)號(hào)：201010311059程序設(shè)計(jì)”課程設(shè)計(jì)（報(bào)告）設(shè)計(jì)題目上海公交站點(diǎn)查詢系統(tǒng)學(xué)院：信息t程學(xué)院 專，：計(jì)算機(jī)科學(xué)與技術(shù) 班級(jí)：計(jì)算機(jī)102 姓名：張瑋諱 指導(dǎo)老師：章夏芬 完成円期：2012年12月目錄1. 引言11.1 能11.2 棚 l11.3要解決的悶題22. 尉充轉(zhuǎn)22.1查詢系統(tǒng)框架閣22.2輸出結(jié)果33. 數(shù)據(jù)表設(shè)計(jì)34. 翅財(cái)41展示功能44.2連接數(shù)據(jù)庫44.3公交查詢算法54. 3.1最短路徑査詢54. 3.2車次查詢算法84. 3.3站點(diǎn)査詢算法94.4清除響應(yīng)函數(shù)10系統(tǒng)運(yùn)行結(jié)果1()5.1系統(tǒng)運(yùn)行環(huán)境105.2系統(tǒng)服務(wù)模式105.3系統(tǒng)運(yùn)行結(jié)果10調(diào)試分析131

2、調(diào)試問題一13調(diào)試問題二13心得體會(huì)141 14改進(jìn)方向15主要參考文獻(xiàn)：15引言隨著上海經(jīng)濟(jì)的速發(fā)展，道路也變得四通八達(dá)。政府為了適應(yīng)道路的更改、 方便人們的生活，設(shè)立了很多的公交站點(diǎn)，增加了很多公交線路。這一方而方便 了人們的円常生活，另一方面也給不熟悉上海交通的人出行帶來了不便。與此同 時(shí)internet的普及，互聯(lián)網(wǎng)已成為人們獲取信息和傳遞信息的主要渠道，成為了 人們生活的一部分。公交站點(diǎn)查詢系統(tǒng)打破人們局限于通過地圖和詢問來獲取道 路信息的局而。這個(gè)系統(tǒng)可以根據(jù)用戶輸入的公交站點(diǎn)給出相應(yīng)的公交線路，向 用廣呈現(xiàn)經(jīng)過該站點(diǎn)的所用公交線路，方便用戶出行。1.1背景上海公交站點(diǎn)查詢系統(tǒng)如果

3、開發(fā)成功冇以下幾個(gè)好處：(1) 能夠清晰的呈現(xiàn)出上海各公交線路的乘車信息，省去丫用戶出門隨身攜帶 地圖的麻煩。(2) 通過計(jì)算機(jī)可以給用戶提供一個(gè)最合適的路線，減少不必要的坐車吋間。(3) 輸入某站點(diǎn)名稱，系統(tǒng)會(huì)顯示出經(jīng)過該站點(diǎn)的線路名稱和首末班車吋間。(4) 僅需輸入公交線路名即可查詢出該線路的始發(fā)站、終點(diǎn)站以及首末班車吋 間，讓用戶充分了解所查線路的信息。(5) 隨吋隨地的查詢系統(tǒng)可以消除城郊市民和外來務(wù)工人員對(duì)一個(gè)城市的不安， 讓他們出門無后顧之憂，某種程度上促進(jìn)了上海的發(fā)展。所以木系統(tǒng)旨在開發(fā)一個(gè)適合所有年齡段用戶使用的能夠極大程度方便人們h 常出行的上海公交站點(diǎn)查詢系統(tǒng)，冇了這個(gè)系統(tǒng)

4、即使人們丟掉過去的地圖也可以 出行無憂。1.2動(dòng)機(jī)隨著現(xiàn)在社會(huì)的發(fā)展，人們避免不了要到某些城市公干或者干其他的事情。 一旦你對(duì)這個(gè)城市不熟悉，你的出門就會(huì)舉步維艱。打的對(duì)于一些因公差的人算 不了什么，但是對(duì)于旅游者或者個(gè)人來說就不是很好的選擇。因此開發(fā)一個(gè)公交 杳洵系統(tǒng)就顯得十分必耍，可以說關(guān)系到一個(gè)城市的形象問題。本系統(tǒng)開發(fā)的主 要的是向公交車用戶提供公交的相關(guān)信息查詢，為他們的出行提供相關(guān)的線路 杳洵和選擇，包括提供經(jīng)過某站點(diǎn)的車次信息及兩站點(diǎn)之間的最短路徑杳洵等。1.3要解決的問題本系統(tǒng)主要提供以下兒個(gè)功能：首末班車查詢：用戶可以通過鍵入文木的方式輸入某一個(gè)站點(diǎn)名稱，查詢 出經(jīng)過該站點(diǎn)的

5、線路及該線路的首末班車時(shí)問。距離最短路徑計(jì)算：利用dijkstra算法求最短路後，用戶在下拉框屮選擇 了起點(diǎn)和終點(diǎn)后，利用該算法從起點(diǎn)開始在所存在的可達(dá)路徑中不斷選擇最短路 徑，累加所得實(shí)際最短路徑，輸出路徑和最短距離。線路查找：用戶可通過鍵入文本的方式輸入需要查詢的線路名稱，查詢后 顯示出該線路的始發(fā)站、終點(diǎn)站和首末班車吋間。系統(tǒng)框架2.1查詢系統(tǒng)框架圖以t為上海公交站點(diǎn)查詢系統(tǒng)的框架閣，用戶登錄系統(tǒng)輸入所要查詢的站點(diǎn) 名稱進(jìn)行線路杳詢。如來用戶對(duì)奔洵結(jié)來不滿意或者要重新選定站點(diǎn)可返回重新 查詢，杏則退出系統(tǒng)。管理員可根據(jù)身份驗(yàn)證的功能登錄系統(tǒng)對(duì)站點(diǎn)進(jìn)行操作， 包括站點(diǎn)的添加、修改和刪除。用

6、戶閣2.1上海交通站點(diǎn)查詢系統(tǒng)框架閣2. 2輸出結(jié)果下圖為輸入車次名稱時(shí)輸岀結(jié)果結(jié)構(gòu)示意圖：如輸入車次busl,點(diǎn)擊車次查詢后輸出結(jié)果為：你所查詢的車次信息為：婁山關(guān)路到南京兩路 運(yùn)營時(shí)間為7:00:00到22:00:00如輸入站點(diǎn)名稱上?；疖囌?。點(diǎn)擊站點(diǎn)查詢后輸岀結(jié)果為：經(jīng)過該站點(diǎn)的車次及對(duì)應(yīng)線路區(qū)間為：line3 7:00:00到22:30:00如選擇起點(diǎn)和終點(diǎn)分別為婁山關(guān)路和靜安寺，點(diǎn)擊最短路徑齊詢后輸出結(jié)果為: 您所查找的最短線路是：婁山關(guān)路一屮山公閌一江蘇路一靜安寺 該線路的總長度為：23公里圖2.2查詢結(jié)果輸出結(jié)構(gòu)圖數(shù)據(jù)表設(shè)計(jì)此表為車次表，其屮name代表車次名，price是代表該

7、車次的票價(jià)，start 代表該車次的始發(fā)站，finish代表該牢次的終點(diǎn)站。表3. 1車次表index *name首班時(shí)間末班時(shí)間*發(fā)車間隔罾price，start finish busl7:00:0022:00:00102婁山關(guān)路南京西路1 bus 26:30:0023:00:0053延安西路上海火車站2 bus 37:00:0022:30:00152楓橋路江蘇路3 bus 46:30:0022:30:00104常熟路鎮(zhèn)坪路此衷為站名衷的部分示例，bus代發(fā)經(jīng)過該站點(diǎn)的車次名，name代衣該站點(diǎn) 的名稱。表3. 2站點(diǎn)表index-bus haae，對(duì)e線路序號(hào)，與起始站點(diǎn)的距離，學(xué)價(jià)站點(diǎn)序

8、號(hào)，0busl婁山關(guān)路10210busl中山公園28220busl江蘇路 313230busl賒安寺423240busl南京西路_530250 bus 2延安西路10361bus 2中山公園一 210321bus 2金沙江路315371bus 2曹楊路419381bus 2錆坪路523392 bus 2中灞路6283102 bus 2上瀉火車站732311關(guān)鍵技術(shù)4. 1展示功能為了方便用戶查詢公交信息和對(duì)查詢結(jié)果有全面的了解，在程序窗u上顯示 丫公交線路簡略圖，此圖為原地鐵線路圖修改后所得，綠色的線路為busl，黃色 的線路為bus2,褐色的線路為bus3,橘色的為bus4。圖4.1公交線路

9、簡略圖4.2連接數(shù)據(jù)庫此部分代碼是將文件路徑根據(jù)目前文件存放位置改變：private sub form 1 _load(byval sender as system.object, byval e assystem.eventargs)handles mybase.load'todo:這行代碼將數(shù)據(jù)加載到表“busdatasetl.車次表”中。您可以根據(jù)需耍移動(dòng)或刪除它。path = my.computer.filesystem.currentdirectoryend sub根據(jù)定義的數(shù)據(jù)庫杳詢變量進(jìn)行杳詢操作，打開數(shù)據(jù)庫，設(shè)置記錄集的數(shù)據(jù) 連接，定義查詢，最后輸出，以下是詳細(xì)代碼：d

10、im cnn as new adodb.connection'連接數(shù)據(jù)庫的connect對(duì)象conn = "provider=microsoft.jet.oledb.4.0;data source=” & path & "bus.mdb胃定義數(shù)據(jù)庫查詢變量cnn.open(conn)*打開數(shù)據(jù)庫rst.activeconnection = cnn設(shè)置記澩集的數(shù)據(jù)連接 rst.close()1關(guān)閉記錄集4.3公交查詢算法4.3.1最短路徑查詢最短路徑查詢運(yùn)用到了 dijkstra算法，此算法按路徑長度遞培的次序產(chǎn)生 最短路徑。首先，引進(jìn)一個(gè)輔助向量d，

11、它的每個(gè)分量d表示當(dāng)前所找到的從始 點(diǎn)v到每個(gè)終點(diǎn)vi的最短路徑的長度。如d3=2表示從始點(diǎn)v到終點(diǎn)3的路徑 相對(duì)最小長度為2。這里強(qiáng)調(diào)相對(duì)就是說在算法過程中i)的值是在不斷逼近最終 結(jié)果但在過程中不一定就等于最短路徑長度。它的初始狀態(tài)為：若從v到vi有 弧，則d為弧上的權(quán)值;否則置d為。顯然，長度為dj=mind|viev的 路徑就是從v出發(fā)的長度最短的一條最短路徑。此路徑為(v, vj)。假設(shè)該次短路 徑的終點(diǎn)是vk,則這條路徑或者是(v，vk)，或者是(v, vj, vk)。它的長度或者是 從v到vk的弧上的權(quán)值，或者是dj和從vj到vk的弧上的權(quán)值之和。假設(shè)s 為已求得最短路徑的終點(diǎn)的

12、集合，則卜*一條最短路徑(設(shè)其終點(diǎn)為x)或者是弧 (v, x),或者是中間只經(jīng)過s中的頂點(diǎn)而最后到達(dá)頂點(diǎn)x的路徑。因此，下一條 長度次短的最短路徑的長度必是dj=mind | vigv-s,其中，d是弧(v，vi) 上的權(quán)值或者是dk (vkes)和弧(vk，vi)上的權(quán)值之和。迪杰斯特拉算法描述 如下：1) arcs表示弧上的權(quán)值。若不存在，則置arcs為。s為已找到從v 出發(fā)的最短路徑的終點(diǎn)的集合，初始狀態(tài)為空集。那么，從v!b發(fā)到圖上其余各 頂點(diǎn)vi可能達(dá)到的最短路挽長度的初值力d=arcslocate vcx(g，v), i vi ev 2) 選擇vj，使得dj=mind | viev

13、-s 3)修改從v出發(fā)到集合v-s上任一頂點(diǎn) vk 口j*達(dá)的最短路校長度。根據(jù)上述算法思想具體編程步驟以及詳細(xì)代碼如下所示：步驟1.聲明算法中用到的變量，對(duì)變量進(jìn)行初始化操作，包括站點(diǎn)變量 verta、臨時(shí)暫存變量minstance、最短路徑標(biāo)識(shí)符possible (15, 15)、最短路徑 strmin等重要變量，具體代碼如下：private function shortestpath(byval vertstart as integer, byval vertfinish as integer, by ref shortpath as integer, byval numvert as

14、integer) di jkastra算法的實(shí)現(xiàn)dim isfinished(15) as boolean 聲明一個(gè)數(shù)損類型力介爾型的變量數(shù)組，判斷是 否到達(dá)終點(diǎn)dim distance(15) as integer兩節(jié)點(diǎn)2間的路徑長度dim possible(15, 15) as boolean 最短路校標(biāo)識(shí)符dim vert a, vertb, verttemp as integer 循環(huán)變量dim vertt as integerdim mindistance as integer 臨時(shí)最小變量 dim str(15) as string 路徑字符串 dim strmin as stri

15、ng最短路徑暫存 聲明變量strmin = ”步驟2.聲明變量結(jié)束£；，進(jìn)行循環(huán)，判斷點(diǎn)到點(diǎn)之間是否存在路徑，并將 自己到自己的路徑初始化為真，從距離矩陣屮獲得兩點(diǎn)之間的距離，若起始點(diǎn)相 同，則距離為0。for vert a = 1 to numvert 循環(huán)次序isfinished(verta) = false判斷有沒有到終點(diǎn)distance(verta) = graph(vertstart, verta)到某一節(jié)點(diǎn)的距離等于距離姐陳中起點(diǎn) 到該節(jié)點(diǎn)的距離 str(verta)="”for vertb = 1 to numvertpossible(verta，vertb)

16、 = false 有沒有到終點(diǎn)nextif distance(verta) < 999999 thenpossible(verta, vertstart) = true 路徑存在possible(verta, verta) = true 節(jié)點(diǎn)到自己可達(dá)end if判斷所查兩站點(diǎn)之m是否存在一條路徑nextdistance(vertstart) = 0 到己的距離力 0isfinished(vertstart) = true 初始化結(jié)束步驟3.在步驟2的基礎(chǔ)上將最短路徑初始化為正無窮，進(jìn)行判斷循環(huán)，若 存在路徑比最短路徑的值小則更新最短路徑、存卜字符申，直到到達(dá)終點(diǎn)更新路 徑字符嗤，結(jié)束此

17、次循環(huán)。for vert a = 1 to numvertmindistance = 999999最小值設(shè)為正無窮for vertb = 1 to numvertif isfinished(vertb) = false then若可達(dá)性為假，現(xiàn)在不可達(dá)if distance(vertb) < mindistance then且路徑長度小于最小值(初始值為正無窮)verttemp = vertb存卜節(jié)點(diǎn)號(hào)mindistance = distance(vertb) 更新最小值 strmin = str(vertb)end if end if循環(huán)進(jìn)行路程?hào)嗽兪欠翊嬖趎extisfinished

18、(verttemp) = true節(jié)點(diǎn)可達(dá)性矩陣為真步驟4.完成步驟3的循環(huán)后判斷所得的最短路徑是否為最短路徑，若為最 短路徑則最短路徑為最短距離加上上一點(diǎn)到終點(diǎn)之間的距離，同時(shí)在輸出框中輸 出字符串，最短路徑即為循環(huán)屮累加所得的最短距離。for vertb = 1 to numvertif isfinished(vertb) = false and (mindistance + graph(verttemp, vertb) distance(vertb) thendistance(vertb) = mindistance + graph(verttemp, vertb) str(vertb)

19、 = strmin & n & combobox3.items(verttemp - 1)for vertt = 1 to numvertpossible(vertb, vertt) = possible(verttemp, vertt)nextpossible(vertb, vertb) = trueend if對(duì)存在的線路進(jìn)行線路杳詢nextnextshortpath = distance(vertfinish) return str(veilfinish)查詢輸出end function4.3.2車次查詢算法車次杏詢主要用到數(shù)據(jù)庫中的車次表，連接到數(shù)據(jù)后根據(jù)其中的車次信息

20、輸 出所要查詢的內(nèi)容，有關(guān)連接數(shù)據(jù)庫的語句以及具體步驟如下：步驟1.定義連接數(shù)據(jù)厙和保存結(jié)果集的對(duì)象，聲明連接數(shù)據(jù)庫中所需變量， 并定義杏詢變量的數(shù)據(jù)源。dim cnn as new adodb.connection 連接數(shù)據(jù)座的 connect 對(duì)象dim rst as new adodb.recordset 保存結(jié)果集的 recordset 對(duì)象dim conn as string聲明conn是一個(gè)變k:寧符申變量dim start, finish as string 聲明 start, finish 是變長字符串變量conn = "provider=microsoft.jet.

21、oledb.4.0;data source? & path & bus.mdb定義數(shù)據(jù)庫查詢變量dim strl as string聲明strl是一個(gè)變長字符申變量dim strsql as string聲明strsql是一個(gè)邊長字符串常量步驟2.去文本框中的字符，打開數(shù)據(jù)厙進(jìn)行數(shù)據(jù)連接，定義查詢語句，包 括車次表、首末班車時(shí)間，取數(shù)據(jù)庫中的字符信息，齊詢完成后輸出齊詢結(jié)果并 關(guān)閉記錄集。strl = textbox 1 .text 取 textboxl 的字符cnn.open(conn)打開數(shù)據(jù)座rst.activeconnection = cnn設(shè)置記錄集的數(shù)據(jù)連接strs

22、ql = "select start from 車次表 where name=" & strl & " 定義齊詢語 rst.open(strsql) 連接數(shù)據(jù)庫 start = rst.getstringo 取字符rst.close()關(guān)閉記錄集rst.open(strsql)連接數(shù)據(jù)庫finish = rst.getstringo取字符label6.text = 您所杳洵的車次信息為：n & station(start, finish) &輸出起點(diǎn)和終點(diǎn)strsql = "select 首班時(shí)間 from 車次表 whe

23、re name=n, & strl & ",h定義查詢語句strsql = "select 末班時(shí)間 from 車次表 where name=n, & strl & ",h定義查詢語句label6.text = label6.text & "運(yùn)營時(shí)間為"& station(start, finish) & ”"輸出起始站點(diǎn)以及運(yùn)營吋鬧cnn.close()關(guān)閉記求集4. 3.3站點(diǎn)查詢算法站點(diǎn)奔詢運(yùn)用到數(shù)據(jù)庫中站點(diǎn)表，同車次杳詢相似，首先定義齊詢變量，連 接數(shù)據(jù)庳，定義查詢語句，

24、包拈車次表及首末班車時(shí)問，完成查詢后輸出查詢結(jié) 果變關(guān)閉記錄集，以下是部分主要代碼及注釋：conn = "provider=microsoft.jet.oledb.4.0;data source? & path & bus.mdb定義數(shù)據(jù)庫查詢變量 strl = textbox2.textstrsql = "select車次表.index,站名表.line,車次表.首班時(shí)問，車次表.末班 時(shí)間from (車次表inner join站名表on車次表.index=站名表.index) where(站名表.name 二& strl & "

25、廣定義査詢語句rst.open(strsql)strl6 = rst.getstringo 取字符rst.close()label6.text = n經(jīng)過該站點(diǎn)的車次及對(duì)應(yīng)運(yùn)營時(shí)間為："& strl6 &輸出查詢結(jié)果，車次信息及運(yùn)營時(shí)間4.4清除響應(yīng)函數(shù)點(diǎn)士窗口上的清除按鈕后響應(yīng)該函數(shù)，將所有的查詢信息清除，以下是詳細(xì) 代碼及注釋信息：private sub button4_click(byval sender as system.object，byval e as system.eventargs) handles button4.clicktextbox 1 .t

26、ext =""textbox2.text = ,n,combobox3.text =""combobox4.text =""label6.text=h"end sub系統(tǒng)運(yùn)行結(jié)果5.1系統(tǒng)運(yùn)行環(huán)境硬件處理器：intel core (tm) i3 intel pentium dual-core intel celeron 安裝內(nèi)存(ram)： 4gb 系統(tǒng)類型：64位操作系統(tǒng)軟件操作系統(tǒng)：windows 7家庭版編程軟件：microsoft vistual studio 2012、microsoft access 20105.

27、2系統(tǒng)服務(wù)模式microsoft access 20105.3系統(tǒng)運(yùn)行結(jié)果以下是系統(tǒng)的主界血示意圖:forml(=歡迎使用公交查詢系統(tǒng)。柄橋路中愛路上?；疖囌緎v ©曹楊路金沙遼路&)昌平路婁山關(guān)路中山公園江蘇路靜安旬南京西路延安西路車次名稱站點(diǎn)名稱起點(diǎn)終點(diǎn)車次查詢站點(diǎn)查洵»kgsi&查詢結(jié)果圖3. 1系統(tǒng)界而示意圖k圖力輸入busl,點(diǎn)擊車次査詢后輸出的結(jié)果不例圖:橋路瑱坪路中湮路上海火車站_，嘆©©曹楊路金沙江路昌平路婁山關(guān)路中山公園遼蘇路釋安$南京西路逛安西路常熟喊車次名稱bnsl站點(diǎn)名稱終點(diǎn)查詢結(jié)果您所査詢的車次信息為：婁山關(guān)路到

28、南京西路 運(yùn)營時(shí)間為7:00:00到22:00:00車次查詢站點(diǎn)查詢線路查詢圖3.2車次查詢示意圖k圖為輸入上?；疖囌竞?，點(diǎn)擊站點(diǎn)杳詢輸出的結(jié)果示例圖站點(diǎn)名稱起點(diǎn)g點(diǎn)上海火車站站點(diǎn)查詢線路窒詢金沙江路查詢結(jié)婁山關(guān)路中山公園江蘇路踭安3南奈西路s安西路線踣奎詢圖3.3站點(diǎn)查詢輸出結(jié)果圖卜圖為系統(tǒng)為方便用戶使用設(shè)置下拉框選擇起點(diǎn)和終點(diǎn)的示意圖:婁山關(guān)抵中山公0江蘇路掛安寺南京西踣址安西路金沙江抵曹揚(yáng)踣鏑坪抵中雜上?；疖囌緱鳂騥隆萑踣昌平踣常孰踣圖3.4下拉樞示意圖下圖為選擇起點(diǎn)為中l(wèi)h公園，終點(diǎn)為鎮(zhèn)坪路后點(diǎn)擊最短路徑查詢輸出的最短路線 以及該線路的總長度：圖3. 5最短路徑查詢圖調(diào)試分析6.1調(diào)試問題一在編寫最短路徑查詢算法過程中，運(yùn)行后輸入起點(diǎn)和終點(diǎn)后輸出結(jié)果中出現(xiàn) 形如a>b>c>a的情況，修改代碼情況如下： t = combobox3.selectedindex + 1p = combobox4.selectedindex + 1 if spl < 999999 thenlabel6.text ="您所查找的最短線路是："& combobox3.items(卜 1) & "” &shortestpath(t, p, spl, nvet) & ” & comb