【正文】 (Content(i, 0)amp。)NextEnd SubPrivate Sub ListBox1_SelectedIndexChanged(sender As , e As)Handles 39。選定listbox某一項(xiàng)所觸發(fā)的事件If 1 Then = Content(, 1) = Content(, 2) = Content(, 3) = Content(, 4) = NothingFor u = 1 To UBound(Detail, 2)If Detail(Selection, u, 0) Nothing And Detail(Selection, u, 0) ”“ ThenIf Detail(Selection, u, 1)= ”“ Then amp。= Detail(Selection, u, 0)amp。 Space(482 * Len(Detail(Selection, u, 1)))amp。 Detail(Selection, u, 2)amp。 vbCrLfElse amp。= Detail(Selection, u, 0)amp。 Space(555 * Len(Detail(Selection, u, 0)))amp。 Detail(Selection, u, 1)amp。 Space(502 * Len(Detail(Selection, u, 1)))amp。 Detail(Selection, u, 2)amp。 vbCrLfEnd IfEnd IfNextEnd IfEnd SubPrivate Sub ViaStation_SelectedIndexChanged(sender As , e As)Handles 39。經(jīng)停站輸入文字或下拉欄選中某項(xiàng)所觸發(fā)的事件()For z = 0 To UBound(Detail)For c = 1 To UBound(Detail, 2)If Detail(z, c, 0)= ThenIf (Detail(z, 0, 0))= False Then(Detail(z, 0, 0))End IfEnd IfNextNextEnd SubFunction Selection()As Integer 39。根據(jù)Ylistbox選中項(xiàng)，返回其在Detail數(shù)組中所在的位置For q = 0 To UBound(Detail)If Detail(q, 0, 0)= Replace(, ”次228。?“, ”)ThenReturn qExit FunctionEnd IfNextReturn1End FunctionPrivate Sub Form1_Load(ByVal sender As , ByVal e As )Handles End Sub End Class總結(jié)及個(gè)人心得體會(huì)綜合分析，本設(shè)計(jì)有四個(gè)難點(diǎn)：。如果列車時(shí)刻沒(méi)有變化，只需修改這兩個(gè)文件的內(nèi)容即可，不必改動(dòng)程序。，包括車次名，起點(diǎn)站，終點(diǎn)站，發(fā)車時(shí)刻，到達(dá)時(shí)刻，一個(gè)車次占一行。每個(gè)車次信息的保存方式都是相同的：首先一個(gè)星號(hào)“*”為一行：然后是車次名為一行：在后是?？空镜恼久偷竭_(dá)，發(fā)車時(shí)刻，每個(gè)站為一行。起點(diǎn)站的“到達(dá)時(shí)刻”和終點(diǎn)站的“發(fā)車時(shí)刻”均為“”。因?yàn)槊看诬囃？空镜臄?shù)目不同，必須正確判斷星號(hào)“*”的位置。，從而不必在查詢過(guò)程中頻繁地讀取文件影響查詢速度。存在的不足：只能夠查詢信息，不能夠擴(kuò)充程序使之對(duì)列車信息進(jìn)行修改，添加和刪除操作。心得及體會(huì)：通過(guò)這次的VB課程設(shè)計(jì)，我學(xué)到了很多很多的東西，同時(shí)不僅可以鞏固了以前學(xué)過(guò)的知識(shí)，而且學(xué)到了很多書本上所沒(méi)有學(xué)到的知識(shí)。通過(guò)這次課程設(shè)計(jì)是我懂得了理論與實(shí)踐相結(jié)合是很重要的，只有理論知識(shí)是遠(yuǎn)遠(yuǎn)不夠的，只有把所學(xué)的理論知識(shí)與實(shí)踐相結(jié)合起來(lái)，從理論中得出結(jié)論，才能真正為社會(huì)服務(wù)，從而提高自己的實(shí)際動(dòng)手能力和獨(dú)立思考的能力。在設(shè)計(jì)的過(guò)程中遇到問(wèn)題，可以說(shuō)是困難重重，這畢竟是自己第一次做一個(gè)程序，難免會(huì)遇到各種各樣的問(wèn)題，同時(shí)在設(shè)計(jì)的過(guò)程中發(fā)現(xiàn)了自己的不足之處，對(duì)以前所學(xué)過(guò)的知識(shí)理解的不夠深刻，掌握的不夠牢固。通過(guò)這次課程設(shè)計(jì)之后，一定把以前所學(xué)的知識(shí)重新溫故。程序設(shè)計(jì)師需要大量的時(shí)間去動(dòng)手練習(xí)才能體會(huì)到它的內(nèi)涵，同時(shí)還需要用心去投入，時(shí)間和感情花下去之后，的確慢慢的感受到有所收獲了，我也收獲到了一點(diǎn)點(diǎn)的樂(lè)趣?？赡苁且粋€(gè)良性循環(huán)的開始吧，相信以后會(huì)做的更好的。參考文獻(xiàn)[1].王棟，visual basic課程設(shè)計(jì)，北京，清華大學(xué)出版社 [2].王棟，visual basic程序設(shè)計(jì)實(shí)用教程，北京，清華大學(xué)出版社[3].陳銳，夏敏捷，趙琳編著，Visual ，北京，科學(xué)出版社第四篇：2014 vb課程設(shè)計(jì)報(bào)告Visual Basic課 程 設(shè) 計(jì) 報(bào) 告所屬課程名稱：Visual Basic程序設(shè)計(jì) 課程設(shè)計(jì)題號(hào)：課程設(shè)計(jì)題目：課程設(shè)計(jì)難度：？星課程設(shè)計(jì)時(shí)間： ~ 學(xué)號(hào)：姓名：自評(píng)成績(jī)：二〇一四年三月一、程序功能簡(jiǎn)敘題目的功能要求，涉及的知識(shí)點(diǎn)等。二、課程設(shè)計(jì)的詳細(xì)設(shè)計(jì)總體設(shè)計(jì)思路介紹程序的設(shè)計(jì)思路，給出程序結(jié)構(gòu)框圖。界面設(shè)計(jì)界面構(gòu)成及實(shí)現(xiàn)方法。功能模塊設(shè)計(jì)文字介紹程序主要功能的實(shí)現(xiàn)算法，盡量給出算法流程圖。三、設(shè)計(jì)中遇到的問(wèn)題與解決辦法【問(wèn)題1】：【解決辦法】：【問(wèn)題2】：【解決辦法】：【問(wèn)題3】：【解決辦法】：……四、更上一層樓描述增加的新功能、對(duì)程序的改進(jìn)等。五、課程設(shè)計(jì)總結(jié)列出程序功能未實(shí)現(xiàn)之處，程序運(yùn)行有問(wèn)題之處。說(shuō)明這次課程設(shè)計(jì)的感想和心得體會(huì)、經(jīng)驗(yàn)教訓(xùn)等。六、源程序代碼源程序代碼要求縮進(jìn)書寫，強(qiáng)制變量聲明，變量名及對(duì)象名等的取名應(yīng)具有描述意義。代碼必須有注釋說(shuō)明，對(duì)每個(gè)模塊、函數(shù)，要說(shuō)明其功能、算法等。第五篇：VB 課程設(shè)計(jì)學(xué)生成績(jī)管理系統(tǒng)一、功能描述首先簡(jiǎn)單地闡述本人所要實(shí)現(xiàn)系統(tǒng)的目的，然后應(yīng)較詳細(xì)的敘述本系統(tǒng)所要實(shí)現(xiàn)的功能。************ *******二、概要設(shè)計(jì)系統(tǒng)功能模塊框圖設(shè)計(jì)根據(jù)功能描述，建立系統(tǒng)的體系結(jié)構(gòu)，即將整個(gè)系統(tǒng)分解成若干子功能模塊，并用框圖表示各功能模塊之間的銜接關(guān)系，并簡(jiǎn)要說(shuō)明各模塊的功能。程序流程框圖如圖所示：（僅供參考）圖1 程序流程圖數(shù)據(jù)庫(kù)設(shè)計(jì)包括數(shù)據(jù)庫(kù)的組成說(shuō)明，數(shù)據(jù)庫(kù)中各表的結(jié)構(gòu)說(shuō)明（包括字段名、字段類型等），可以包含圖片例如下表：表1 學(xué)生信息表三、詳細(xì)設(shè)計(jì)詳細(xì)說(shuō)明主要窗體的實(shí)現(xiàn)過(guò)程，包括窗體的設(shè)計(jì)圖片及其上所包含的控件名和屬性設(shè)置；詳細(xì)說(shuō)明主要操作的代碼實(shí)現(xiàn)過(guò)程，包括過(guò)程間的調(diào)用關(guān)系（注：在此給出不完全代碼）。如下所示：賬號(hào)登錄帳號(hào)登錄模塊中登錄與注冊(cè)兩按鈕，單擊注冊(cè)會(huì)進(jìn)入注冊(cè)模塊中，單擊登錄會(huì)進(jìn)入系統(tǒng)進(jìn)行下一步的操作，帳號(hào)文本框與數(shù)據(jù)庫(kù)相連接，當(dāng)在帳號(hào)文本框輸入帳號(hào)后點(diǎn)擊登錄按鈕后，會(huì)在數(shù)據(jù)庫(kù)中進(jìn)行查詢看數(shù)據(jù)庫(kù)中是否會(huì)有該帳號(hào)，且該帳號(hào)的密碼是否與密碼框中輸入的相同，如果相同會(huì)進(jìn)入系統(tǒng)，如果不存在該賬號(hào)或密碼與帳號(hào)不相匹配，則會(huì)提示“帳號(hào)或密碼錯(cuò)誤”，帳號(hào)文本框會(huì)得到焦點(diǎn)，讓重新輸入。（1）窗體截圖（如圖2）圖2 注冊(cè)窗體（2）功能實(shí)現(xiàn)學(xué)生信息查詢窗體圖3 查詢窗體四、調(diào)試中存在的問(wèn)題及解決方法包括調(diào)試過(guò)程中遇到的主要問(wèn)題及采取的解決方法。例如：注冊(cè)賬號(hào)出現(xiàn)的錯(cuò)誤數(shù)據(jù)庫(kù)中帳號(hào)被設(shè)為主鍵，當(dāng)注冊(cè)時(shí)的帳號(hào)與數(shù)局庫(kù)中的帳號(hào)有相同時(shí)就會(huì)出錯(cuò)。解決方法：在寫入數(shù)據(jù)庫(kù)前先進(jìn)行查詢數(shù)據(jù)庫(kù)五、心得體會(huì)本人在本次實(shí)習(xí)中取得的收獲、遇到的困難、如何面對(duì)和克服各種困難、本系統(tǒng)的不足之處，將要改進(jìn)的思想等。六、參考文獻(xiàn)[1] Basic (第3版).人民郵電出版社，2009年2月[2] [3]七、附錄包括全部源程序清單(程序中應(yīng)有足夠的注釋)。