【文章內(nèi)容簡介】 2000 (2) = 2000 (3) = 1200 (4) = 1200Set rs = NothingEnd Sub 當(dāng)兩個(gè)線路沒有交叉部分的時(shí)候就必須換乘，有時(shí)候換乘一次就能夠到達(dá)目的地，有時(shí)候需要換乘多次才能到達(dá)目的地。根據(jù)出行者輸入的起點(diǎn)和終點(diǎn)，確定出行要選擇的起始公交站點(diǎn)A和目的公交站點(diǎn)B。搜索數(shù)據(jù)庫，查詢站點(diǎn)A和站點(diǎn)B之間是否有相同的車經(jīng)過，如果有一條或幾條直達(dá)線路，通過比較選擇距離最短的公交線路推薦給出行者。如果沒有，則計(jì)算站點(diǎn)A和站點(diǎn)B之間有沒有一個(gè)公共站點(diǎn)C，從站點(diǎn)C可以換乘到達(dá)站點(diǎn)B。這就有兩種情況：(1)如果有，屬于一次換乘。計(jì)算站點(diǎn)A和公共站點(diǎn)C之間有沒有相同的公交車經(jīng)過并存入集合X；同樣，計(jì)算站點(diǎn)B和公共站點(diǎn)C之間有沒有相同的公交車經(jīng)過并存入集合Y。將這兩個(gè)集合比較后就可以得到從站點(diǎn)A經(jīng)過公共站點(diǎn)C到達(dá)站點(diǎn)B的公交線路，在這些線路中進(jìn)行比較，選擇距離最短的推薦給出行者。（2）如果沒有公共站點(diǎn)C，就出現(xiàn)了要換乘兩次的情況。將經(jīng)過站點(diǎn)A的每條公交線路的所有站點(diǎn)存入集合O；同樣，經(jīng)過站點(diǎn)B的每條線路的所有站點(diǎn)存入集合P。比較這兩個(gè)集合，先乘經(jīng)過站點(diǎn)A的某一路車到達(dá)某一站點(diǎn)D，計(jì)算站點(diǎn)D與站點(diǎn)B之間有沒有公共站點(diǎn)E,如果有則站點(diǎn)D、E為換乘站點(diǎn)。這種方案可能有多種，比較選擇距離最短的推薦給出行者。如果不存在公共站點(diǎn)E，說明經(jīng)過兩次換乘無法從站點(diǎn)A到達(dá)站點(diǎn)B，停止搜索計(jì)算l 直達(dá)算法：當(dāng)兩個(gè)站點(diǎn)之間有直達(dá)條件的時(shí)候是不需要進(jìn)行換乘的，可以通過查詢實(shí)現(xiàn)直達(dá)，直達(dá)算法為在起始站點(diǎn)和目的站點(diǎn)選擇一條不用換乘的車次線路。在線路表中查找其實(shí)站點(diǎn)的車輛，形成線路A，在在線路表中查找目的站點(diǎn)，形成線路B，線路A和線路B進(jìn)行比較，當(dāng)線路A和線路B中有相交的部分時(shí)候說明有直達(dá)線路，否則無直達(dá)線路，需要換乘車次。在SQl中的代碼如下：select 站點(diǎn) from(select 站點(diǎn) from 線路表) A,(select 站點(diǎn) from 線路表) Bwhere = l 一次換乘根據(jù)直達(dá)算法，算出起始站的所有車輛信息A，同樣的方式算出目的站點(diǎn)所有車輛信息B，然后通過A與B在線路經(jīng)過站點(diǎn)表中進(jìn)行比對(duì)，找出A與B相交的部分C，由于沒有直達(dá)的車輛，所以C為A與B站點(diǎn)相交的信息。因此乘客若需要從其實(shí)站點(diǎn)到達(dá)目的站點(diǎn)需要在相交信息存在的站點(diǎn)下車，并再次乘坐B車輛信息所包含的車輛才能到達(dá)目的地。 select 站點(diǎn) from(select distinct 站點(diǎn)from 線路表 where線路號(hào) in(select線路號(hào) from 線路過站表where 站點(diǎn) = 起始站點(diǎn)))A,(select distinct 站點(diǎn)from 線路表 where線路號(hào) in(select線路號(hào) from 線路過站表where 站點(diǎn) = 起始站點(diǎn)))Bwhere = 多次換乘主要算法代碼如下：Private Sub Command1_Click() Dim rs As New 39。經(jīng)過起點(diǎn)A的線路 Dim ArrS() As String Dim ArrE() As String select 線路 from 線路過站表 where 站點(diǎn)名稱=39。 amp。 Trim(Combo1) amp。 39。, Cnn Set MSH(0).DataSource = rs If = True Then MsgBox 沒有可達(dá)線路！ Exit Sub End If = Dim intMaxCol As Integer select 線路 from 線路過站表 where 站點(diǎn)名稱=39。 amp。 Trim(Combo2) amp。 39。, Cnn Set MSH(1).DataSource = rs If = True Then MsgBox 沒有可達(dá)線路！ Exit Sub End If Dim strFA As String Dim intFA As Integer intFA = 1 For i = 1 To MSH(0).Rows 1 select * from 線路過站表 where 線路 =39。 amp。 Trim(MSH(0).TextMatrix(i, 0)) amp。 39。 order by 站點(diǎn)序號(hào) desc, Cnn If = False Then ReDim ArrS( 1) For k = 0 To 1 ArrS(k) = Trim((站點(diǎn)名稱)) Next For j = 1 To MSH(1).Rows 1 If Trim(MSH(0).TextMatrix(i, 0)) = Trim(MSH(1).TextMatrix(j, 0)) Then strFA = 乘坐 amp。 Trim(MSH(0).TextMatrix(i, 0)) amp。 直達(dá) amp。 vbCrLf = amp。 intFA amp。 . amp。 strFA intFA = intFA + 1 strFA = Else select * from 線路過站表 where 線路 =39。 amp。 Trim(MSH(1).TextMatrix(j, 0)) amp。 39。 order by 站點(diǎn)序號(hào) desc, Cnn If = False Then ReDim ArrE( 1) For k = 0 To 1 ArrE(k) = Trim((站點(diǎn)名稱)) Next strFA = For m = 0 To UBound(ArrS) For n = 0 To UBound(ArrE) If ArrS(m) = ArrE(n) Then strFA = 乘坐 amp。 Trim(MSH(0).TextMatrix(i, 0)) amp。 到 amp。 ArrS(m) amp。 換乘 amp。 Trim(MSH(1).TextMatrix(j, 0)) amp。 vbCrLf = amp。 intFA amp。 . amp。 strFA intFA = intFA + 1 strFA = End If Next Next Else End If End If Next Else End If Next Set rs = Nothing End Sub VB與SQLSERVER數(shù)據(jù)庫連接使用本系統(tǒng)中VB主要做前臺(tái)界面設(shè)計(jì)和查詢算法，SQL主要做后臺(tái)數(shù)據(jù)。在兩者設(shè)計(jì)完成后需要實(shí)現(xiàn)VB和SQl的連接，這樣才能使得系統(tǒng)成為一個(gè)有前臺(tái)有后臺(tái)完整的系統(tǒng)。PrivateSubCommand1_Click()On Error GoTo ErrH = Provider=。Integrated Security=SSPI。Persist Security Info=False。Initial Catalog=公交查詢車系統(tǒng)。Data Source=HACGUOYS17 = adUseClient Exit SubErrH: MsgBox END SUB首先聲明一個(gè)數(shù)據(jù)庫連接對(duì)象CNN，然后設(shè)置數(shù)據(jù)庫連接對(duì)象的連接字符串，接著調(diào)用open方法，建立與數(shù)據(jù)庫的連接。 系統(tǒng)的實(shí)現(xiàn)l 系統(tǒng)登陸模塊設(shè)計(jì) 在本模塊中主要實(shí)現(xiàn)管理員和用戶的登錄任務(wù)，用戶輸入姓名和密碼，系統(tǒng)根據(jù)不同的名稱自動(dòng)判斷是管理員還是普通用戶，輸入結(jié)束后點(diǎn)擊登錄，在用戶名和密碼正確的情況下會(huì)進(jìn)入系統(tǒng)主界面，當(dāng)用戶輸入錯(cuò)誤的時(shí)候點(diǎn)擊取消可清除輸入的姓名和密碼，等待用戶再次輸入。當(dāng)用戶輸入次數(shù)超過三次，系統(tǒng)會(huì)自動(dòng)關(guān)閉，用戶無再次輸入權(quán)限。l 系統(tǒng)主界面設(shè)計(jì) 進(jìn)入主界面后系統(tǒng)會(huì)根據(jù)用戶身份（管理員或普通用戶）顯示不同的菜單欄，為用戶提供不同的功能。管理員進(jìn)入系統(tǒng)后可對(duì)系統(tǒng)進(jìn)行維護(hù)管理，用戶只能實(shí)現(xiàn)查詢，留言功能。系統(tǒng)管理：系統(tǒng)管理中包密碼修改和用戶管理。 用戶管理：實(shí)現(xiàn)對(duì)用戶的管理，如添加，修改用戶信息，刪除用戶信息和對(duì)用戶權(quán)限進(jìn)行設(shè)置。密碼修改： 用戶登錄后輸入原始密碼，并輸入新密碼，在再次輸完新密碼后點(diǎn)擊確定便可實(shí)現(xiàn)密碼修改。點(diǎn)擊取消返回到主視圖。公交信息管理 公交信息管理是由管理員來實(shí)現(xiàn)的，其中包括站點(diǎn)信息管理，線路信息管理,線路站點(diǎn)管理。主要是對(duì)信息的錄入，刪除，和修改這三個(gè)操作。站點(diǎn)信息管理： 主要實(shí)現(xiàn)對(duì)站點(diǎn)信息的錄入，在以后線路，站點(diǎn)，乘車方案查詢的時(shí)候提供基本站點(diǎn)信息。線路信息管理： 線路管理主要是管理員對(duì)線路信息進(jìn)行操作，如添加信的公交信息，刪除，修改當(dāng)前改變線路的公交信息。為查詢實(shí)現(xiàn)準(zhǔn)確性提供可靠保證。線路站點(diǎn)管理： 線路管理主要實(shí)現(xiàn)由其實(shí)站點(diǎn)到目的站點(diǎn)之間所經(jīng)過站點(diǎn)的管理。其中站點(diǎn)序號(hào)是所經(jīng)過站點(diǎn)的序號(hào)，線路框里輸入車次，站點(diǎn)中輸入本線路經(jīng)過的站點(diǎn)。點(diǎn)擊添加就會(huì)把信息添加到數(shù)據(jù)庫中。并在前臺(tái)進(jìn)行顯示。此管理主要對(duì)與用戶線路查詢和乘車方案查詢提供關(guān)鍵支持。信息查詢中心：站點(diǎn)查詢：本查詢主要實(shí)現(xiàn)站點(diǎn)公交的查詢，輸入站點(diǎn)名稱后，點(diǎn)擊查詢，會(huì)出現(xiàn)本站點(diǎn)所有車次。 乘車方案查詢： 用戶輸入其實(shí)站點(diǎn)和目的站點(diǎn)和目的站點(diǎn)，點(diǎn)擊查詢，系統(tǒng)經(jīng)過分析會(huì)顯示出所有能夠到達(dá)的乘車方式，其中有哦路線有直達(dá)的，需要換乘的，根據(jù)距離和換乘次數(shù)判斷，會(huì)換乘多次。站點(diǎn)信息瀏覽： 信息瀏覽部分主要是提供車次，始發(fā)地，目的地，服務(wù)類型等，對(duì)公家信息進(jìn)行全部展示。第6章 運(yùn)行測試與維護(hù)(1)測試是為了發(fā)現(xiàn)程序中的錯(cuò)誤而執(zhí)行的過程；(2)好的測試方案實(shí)際可能發(fā)現(xiàn)迄今為止尚為發(fā)現(xiàn)的錯(cuò)誤的測試方案；成功的測試是發(fā)現(xiàn)了至今為止尚未發(fā)現(xiàn)的錯(cuò)誤測試。應(yīng)當(dāng)把“盡早地和不斷地進(jìn)行軟件測試”作為軟件開發(fā)者的座右銘。測試用例應(yīng)由測試輸入數(shù)據(jù)和與之對(duì)應(yīng)的預(yù)期輸出結(jié)果兩部分組成。程序員應(yīng)避免檢查自己的程序。（注意不是指對(duì)程序的調(diào)試）在設(shè)計(jì)測試用例時(shí)，應(yīng)當(dāng)包括合理的輸入條件和不合理的輸入條件。不合理的輸入條件是指異常的，臨界的，可能引起問題異變的輸入條件。充分注意測試中的群集現(xiàn)象。經(jīng)驗(yàn)表明，測試后程序殘存的錯(cuò)誤數(shù)目與該程序中以發(fā)現(xiàn)的錯(cuò)誤數(shù)目或檢錯(cuò)率成正比。應(yīng)該對(duì)錯(cuò)誤群集的程序段進(jìn)行重點(diǎn)測試。嚴(yán)格執(zhí)行測試計(jì)劃，排除測試的隨意性。應(yīng)當(dāng)對(duì)每一個(gè)測試結(jié)果做全面的檢查。妥善保存測試計(jì)劃，測試用例，出錯(cuò)統(tǒng)計(jì)和最終分析報(bào)告，為維護(hù)提供方便（1）測試乘客登陸是否成功打開公交車查詢信息系統(tǒng)，在“乘客名”里填入001“密碼”框里我們填入001作為乘客登錄密碼。填寫完成點(diǎn)擊“確定”按鈕，將會(huì)出現(xiàn)操作程序頁面，即該乘客已經(jīng)登陸成功了。（2）測試其他乘客是否能夠登錄打開公交車查詢信息系統(tǒng)，輸入任意密碼，點(diǎn)擊“登錄”按鈕。將出現(xiàn)密碼出錯(cuò)提示頁面。然后點(diǎn)“確定”返回旅行社管理系統(tǒng)登錄頁面。（3）測試乘客管理功能是否成功在登錄成功之后，即可進(jìn)入相應(yīng)的管理頁面，點(diǎn)擊“乘客管理”，即出現(xiàn)對(duì)應(yīng)管理頁面，即可以修改和刪除乘客的信息資料。點(diǎn)擊“密碼修改”，即出現(xiàn)對(duì)應(yīng)管理頁面，即可以修改自身的密碼。（4）測