【正文】
If avehc = bzhc Then = 合格 Else : = 不合格 End IfEnd SubPrivate Sub Button5_Click_1(ByVal sender As , ByVal e As ) Handles Dim aveco As Double maxco = minco = aveco = (maxco + minco) / 2 = aveco If aveco = bzco Then = 合格 Else : = 不合格 End IfEnd SubTimer1控件代碼:Private Sub Timer1_Tick(ByVal sender As , ByVal e As ) Handles Dim num As Integer Dim khc As Double Dim l As Double Dim kco As Double Dim aco As Double Dim bco As Double Dim cco As Double Dim ahc As Double Dim bhc As Double Dim chc As Double maxco = minco = maxhc = minhc = num = l = Int(jian / num * 1000) = l If = 一次函數(shù) Then kco = (maxco minco) / (num 1) khc = (maxhc minhc) / (num 1) shujuhc = khc * n + minhc shujuco = kco * n + minco ElseIf = 兩次函數(shù) Then cco = minco bco = 4 * (maxco minco) / num aco = 4 * (minco maxco) / (num * num) shujuco = aco * n * n + bco * n + cco chc = minhc bhc = 4 * (maxhc minhc) / num ahc = 4 * (minhc maxhc) / (num * num) shujuhc = ahc * n * n + bhc * n + chc ElseIf = sin函數(shù) Then shujuco = (maxco minco) * Abs(Sin(n)) + minco shujuhc = (maxhc minhc) * Abs(Sin(n)) + minhc End If = shujuco = shujuhc n = n + 1 If n = num Then = False = 檢測完畢 End IfEnd SubTimer2控件代碼:Private Sub Timer2_Tick(ByVal sender As , ByVal e As ) Handles shi = shi 1 = shi If shi = jian Then = True = 檢測中 End If If shi = 0 Then = False End IfEnd Sub“開始發(fā)送”按鈕代碼:Private Sub Button6_Click(ByVal sender As , ByVal e As ) Handles = True = 預(yù)熱中End Sub其他檢測窗口的代碼設(shè)計思路與方法和以上的基本相同,不再一一介紹。至此,軟件的代碼設(shè)計介紹完畢。 第四章:軟件模擬系統(tǒng)調(diào)試軟件的界面以及代碼設(shè)計完畢后,保存工程,按按鈕來進行調(diào)試,軟件能夠按照預(yù)期設(shè)計的功能進行運行。將時間設(shè)置窗體中檢測廢氣的“預(yù)熱時間”設(shè)置為5s,“檢測時間”設(shè)置為10s,按“確定”按鈕。將標(biāo)準(zhǔn)設(shè)置窗體中CH和CO的標(biāo)準(zhǔn)設(shè)置為50和60,按確定按鈕。在主界面中選擇廢氣的復(fù)選框,按“進入”按鈕。在廢氣檢測的界面中CH和CO的最大值和最小值設(shè)置為100和10,數(shù)據(jù)個數(shù)為20,選擇輸出方式為“一次函數(shù)”,按“確定”按鈕,此時界面如圖示:符合程序的設(shè)計,然后按“開始發(fā)送按鈕”,狀態(tài)區(qū)前5s顯示狀態(tài)為“預(yù)熱中”;后10s顯示狀態(tài)為“檢測中”,同時按要求開始發(fā)送數(shù)據(jù)。數(shù)據(jù)為10,。100。經(jīng)過驗算,符合程序設(shè)計。聯(lián)機調(diào)試前,首先要在每張需要發(fā)送數(shù)據(jù)窗體中添加Msm控件,,才能使用。添加完控件后在窗體載入代碼處寫入如下串口打開的代碼:Imports MSCommLibPrivate Sub Form4_Load(ByVal sender As , ByVal e As ) Handles If Not Then = 2400,n,8,1 = 1 = = True End If接下來用RS232串口線連接兩臺計算機,另一臺計算機上用串口接受數(shù)據(jù)的軟件進行接收,如圖示:將波特率與軟件中的設(shè)置相同,串口號為COM1,按打開串口,此時,在程序中按發(fā)送數(shù)據(jù),剛才的數(shù)據(jù)便會在窗口中顯示出來。至此,軟件調(diào)試成功,基本實現(xiàn)了預(yù)期的功能。第五章:總結(jié)畢業(yè)設(shè)計,可以說是對這四年大學(xué)學(xué)習(xí)的一個總結(jié),又可以說是一門聯(lián)系書本基礎(chǔ)知識理論與實際操作、制作實踐的課程,正如我們將結(jié)束這十幾年的學(xué)生生涯,走上工作崗位,它標(biāo)志了一個時代的結(jié)束另一個時代的來臨,在這大學(xué)中的最后一堂課中,帶給我們的已經(jīng)不僅僅是那幾十頁紙就能說清的知識,而是更多的啟示。1.很多東西不會并不要緊,只要有這份毅力去學(xué)習(xí),去鉆研。在剛剛接到這份畢業(yè)設(shè)計的題目時,對于汽車檢測的不了解,以及從來沒有單獨設(shè)計過程序,使我對我的畢業(yè)設(shè)計完全沒了方向,我覺得自己完全是一個門外漢。于是,我開始不斷去圖書館借關(guān)于編程的書看,問老師關(guān)于汽車檢測的原理,過程。再請教同學(xué)如何編程,漸漸的自己通過摸索開始對程序設(shè)計有所了解。于是自己開始嘗試著設(shè)計與編寫,在經(jīng)過很多困難后終于能夠看到自己的成果。都說萬事開頭難,原來只要自己努力鉆研,多問多嘗試,從完全不會到熟練也并不需要很長時間。關(guān)鍵是要有遇到困難不退縮的精神。,其實在大學(xué)的四年中我們所學(xué)的知識在踏上工作崗位后是遠(yuǎn)遠(yuǎn)不夠的,我們必須在今后的工作中繼續(xù)不斷的學(xué)習(xí)。在這次畢業(yè)設(shè)計中真真領(lǐng)悟到了,如何自學(xué)一門自己以前完全不懂的技能,學(xué)習(xí)方法真的很重要,包括自己去圖書館、網(wǎng)上找資料,如何在資料中尋找自己所要得東西,如何請教別人,如何自己嘗試并漸漸掌握。相信這次畢業(yè)設(shè)計對我今后在工作中的自學(xué)能力會有很大提高。3.這次畢業(yè)設(shè)計還培養(yǎng)了自己的動手能力,不論是自己設(shè)計軟件的界面,自己編寫源代碼,還是在調(diào)試時自己焊接RS232串口,都是自己以前從來沒有動手做過的。人的心理始終是非常燦爛的一幕,再多的理論也無法完全勾露它的全貌,在這次的畢業(yè)設(shè)計中使設(shè)計者得到的不僅僅是新鮮知識,更是對奮斗的人生的一點感悟。在將離開大學(xué)學(xué)習(xí)生活之即,本人者不禁感慨世界之大,知識的海洋之廣闊,但靜下心來便能夠在其中任意遨游,受益匪淺。致謝在本次的畢業(yè)設(shè)計過程中,所獲得的成果部分也要歸功于得到了別人的幫助,我特別要感謝的是我的指導(dǎo)老師朱忠弟老師。他不僅僅在技術(shù)上給我很大的幫助,鼓勵我,指導(dǎo)我,讓我避免了很多不必要的錯誤,少走了彎路,進程自然順利了很多。同時他耐心的指導(dǎo)和督促幫助我,使我對順利地完成整個畢業(yè)設(shè)計信心變大,許多地方更是敢于邁前一步。此外,我還要感謝汪子頡同學(xué),朱慧毓同學(xué),以及在實習(xí)單位的一些老師,他們在技術(shù)方面給了我很大的幫助,讓我更好的完成畢業(yè)設(shè)計。最后我要感謝的在四年里教給我們豐富知識的各位老師,正因為有了良好的基礎(chǔ)才使得我能順利完成學(xué)業(yè),謝謝大家!參考資料[1]張樹泉 《Visual 》 清華大學(xué)出版社[2]朱靜,李玉國 《Visual Basic 》人民郵電出版社[3]中國車輛檢測網(wǎng) [4]方錫邦 《汽車檢測技術(shù)與設(shè)備》 人民交通出版社[5]童愛紅《