電控發(fā)動機實訓仿真系統(tǒng)設(shè)計.doc

江蘇技術(shù)師范學院畢業(yè)設(shè)計說明書（論文）電控發(fā)動機實訓仿真系統(tǒng)設(shè)計摘 要：由于汽車發(fā)動機結(jié)構(gòu)復雜，發(fā)動機實驗臺架價格昂貴，日常維護周期長、投入資金大，所以在汽車維修實踐教學中存在不少弊端。因此，如何實現(xiàn)以較小的資金投入提高實踐教學的質(zhì)量，讓學生在有限的時間內(nèi)更好地掌握電控發(fā)動機的整體構(gòu)造和故障排除的基本思路，成為當今汽車維修實踐教學環(huán)節(jié)中的首要任務。本設(shè)計通過理論分析和實驗驗證的方法, 運用電控發(fā)動機標準數(shù)據(jù)流、電控發(fā)動機故障診斷理論及Visual Basic 編程語言的知識, 分析了汽車電控發(fā)動機故障現(xiàn)象與故障原因之間的關(guān)聯(lián)，設(shè)計出了一款具有考核功能的電控發(fā)動機實訓仿真系統(tǒng)。該系統(tǒng)可以在計算機上仿真電控發(fā)動機在不同故障情況下的故障現(xiàn)象和數(shù)據(jù)流，從而有效節(jié)約汽車教學環(huán)節(jié)中的人力、物力和財力。關(guān)鍵詞：實訓仿真；電控發(fā)動機；故障診斷；Visual BasicPractical Training Simulation Design of Electronic Control Engine Abstract: There are many disadvantages during automobile maintenance practice teaching process due to the complicated structure of automobile engine, expensive engine test bench, long period of daily maintenance and large investment funds. Therefore, how to improve teaching quality with smaller capital investment and help the students grasp the overall structure of the electronic control engine and form the basic way of fault exclusion have become the primary task of automotive teaching.This paper combines the theoretical analysis and experimental validation, uses standard data flow of engine and fault diagnosis theory and the Visual Basic programming language knowledge, analyzes the relation ship between the phenomenon and the cause of automobile electronic control engine, designs a set of practical training simulation with the assessment system of electronic control engine fault diagnosis, This system can simulate different failure phenomena and the data flow in different fault situations thus to save human material and financial resources during teaching.Key words: Practical Training Simulation; Electronic Control Engine; Fault Diagnosis; Visual Basic- II -目 錄前 言1第1章 緒論21.1 課題設(shè)計的目的、意義21. 本課題研究的目的22. 本課題研究的意義21.2 課題的主要內(nèi)容21.2.1 三維實體建模21.2.2 利用VB語言編程設(shè)計電控發(fā)動機實訓仿真系統(tǒng)21.3 課題設(shè)計的方法31.3.1 系統(tǒng)整體方案的設(shè)計31.3.2 系統(tǒng)軟、硬件配置31.3.3 窗體設(shè)計31.3.4 程序設(shè)計3第2章 汽車發(fā)動機常見故障及診斷方法52.1 奧迪A4轎車發(fā)動機資料52.2 奧迪A4轎車發(fā)動機常見故障52.3 奧迪A4轎車發(fā)動機常見故障原因62.3.1 故障一：啟動困難或無法啟動62.3.2 故障二：怠速不穩(wěn)62.3.3 故障三：加速無力62.3.4 故障四：動力不足62.3.5 故障五：排放異常72.3.6 故障六：油耗過高7第3章 電控發(fā)動機實訓仿真設(shè)計程序設(shè)計及使用說明83.1 仿真系統(tǒng)各窗體展示83.2 仿真系統(tǒng)各主要功能實現(xiàn)方法133.2.1 點火開關(guān)控制133.2.2 萬用表檔位選擇控制153.2.3 萬用表表針顯示與提示框的控制193.2.4 數(shù)據(jù)庫訪問、添加與修改功能213.2.5 V.A.G1552的仿真233.2.6 評分模塊的實現(xiàn)方法303.2.7 數(shù)據(jù)模擬及實現(xiàn)方法313.3 軟件使用方法介紹34第4章總結(jié)38參考文獻39致 謝40附 錄411. 空氣流量傳感器試驗411. 1 空氣流量信號對小時油耗和混合氣濃度的影響411. 2 空氣流量信號對比油耗的影響411. 3 空氣流量信號對CO 排放的影響421. 4 空氣流量信號對HC排放的影響421. 5 空氣流量信號對啟動性能及怠速的影響432. 節(jié)氣門位置傳感器試驗442. 1 怠速信號對發(fā)動機性能的影響442. 2 全負荷信號對發(fā)動機性能的影響443. 爆震傳感器試驗463. 1 爆震信號對外特性的影響463. 2 爆震信號對發(fā)動機負荷特性的影響474. 冷卻液溫度傳感器試驗495. 無故障情況下發(fā)動機參數(shù)模擬值50- IV -前 言隨著汽車電子化和集成化的發(fā)展,汽車發(fā)動機電控技術(shù)在給發(fā)動機帶來控制精確、系統(tǒng)穩(wěn)定、燃油消耗低和排放污染少等優(yōu)點的同時,也增加了發(fā)動機故障診斷的難度。在對傳統(tǒng)發(fā)動機進行故障診斷時,維修人員僅憑自己的經(jīng)驗,通過問、看、聽、嗅、摸和試等手段便可確定故障部位,而電控發(fā)動機的故障診斷需使用專用診斷儀器設(shè)備對電控系統(tǒng)工作參數(shù)進行定量的測試和分析,這就對汽車維修人員的素質(zhì)提出了更高的要求。近幾年來，隨著我國汽車工業(yè)的飛速發(fā)展以及高速公路、高等級公路的大規(guī)模建設(shè)，車輛密集化和車輛高速化對車輛的安全性能提出了更高要求。同時國家不斷加大職業(yè)教育的投入，汽車維修技師作為“技能緊缺型”人才，對汽車維修專業(yè)學生的技能培訓紛紛成為各職業(yè)學校的熱點項目，在這樣的趨勢下，很多教學教具設(shè)備研發(fā)企業(yè)紛紛加大投入力度，努力開發(fā)出適應職業(yè)學校需要的教學實訓設(shè)備。但這些設(shè)備的價格比較昂貴，使學校的負擔加大，且這些設(shè)備使用時也只能是幾個學生一起使用，使資源的使用效率大大降低。還有就是這些教學教具設(shè)備研發(fā)企業(yè)大多都是“半路出家”，由于對學校的需求了解不足，現(xiàn)有的電控發(fā)動機試驗臺架不能真正實現(xiàn)發(fā)動機在各種工作狀態(tài)下的參數(shù)穩(wěn)定。因此設(shè)計電控發(fā)動機實訓仿真系統(tǒng)代替電控發(fā)動機試驗臺架，不僅可以節(jié)約資源，使得學生能在計算機上進行自我學習考核，而且對于教師提高教學效率也有重要的作用12。本設(shè)計是利用Visual Basic6.0程序語言設(shè)計出汽車電控發(fā)動機系統(tǒng)的仿真軟件，通過計算機模擬實現(xiàn)正常工作、人工故障設(shè)置、故障檢測診斷和故障診斷評分等功能。本軟件界面友好，對于各職業(yè)學校教學具有很好的輔助作用，適用于學生對電控發(fā)動機故障診斷的學習，自行模擬電控發(fā)動機故障診斷，提高教師的教學效率。由于本人水平有限，很多問題考慮欠全面，有些技術(shù)性的問題還須進一步完善。懇請使用者能夠提出寶貴的意見34。第1章 緒論1.1 課題設(shè)計的目的、意義1. 本課題研究的目的發(fā)動機臺架實驗測量數(shù)據(jù)具有隨機性，無法真實穩(wěn)定地反映出發(fā)動機的工作情況，對發(fā)動機的實時動態(tài)檢測帶來不便。利用計算機仿真技術(shù)可模擬電控發(fā)動機的工作過程，實現(xiàn)電控發(fā)動機的數(shù)據(jù)仿真，并能實現(xiàn)動態(tài)參數(shù)檢測、靜態(tài)物理量測量、人工故障設(shè)置等，開發(fā)本系統(tǒng)是為了在實踐教學中更好的掌握電控發(fā)動機的控制原理和故障診斷理論。2. 本課題研究的意義(1) 可以節(jié)約大量的儀器設(shè)備。原本需要價格昂貴的發(fā)動機診斷儀器，使用仿真設(shè)計后則可省去這些儀器設(shè)備的投入。(2) 提高數(shù)據(jù)的讀取可靠性。由于軟件程序具有封裝性和獨立性，不受外界環(huán)境的信息干擾，不像發(fā)動機臺架由于各種環(huán)境因素導致數(shù)據(jù)不穩(wěn)定。(3) 提高數(shù)據(jù)的讀取速度。軟件仿真可通過數(shù)據(jù)模擬的方式，教學者可通過操作界面點擊，連接讀取信號源，無需到真車上尋找，從既而大大減少教學時間并提高數(shù)據(jù)的讀取效率。(4) 提高教學過程的真實度和可操控性。教學者通過投影界面面向廣大學習者進行可視化教學，學習過程直觀可見，提高了學習過程的真實度易于學習者接受和理解。1.2 課題的主要內(nèi)容 1.2.1 三維實體建模1. 研究如何利用3D-MAX軟件進行電控發(fā)動機實訓仿真系統(tǒng)各部件的結(jié)構(gòu)三維實體建模；2. 研究如何將實體模型導入VB環(huán)境中；3. 研究如何將實體模型在VB環(huán)境中進行動畫演示。1.2.2 利用VB語言編程設(shè)計電控發(fā)動機實訓仿真系統(tǒng)1. 利用VB語言編程，將電控發(fā)動機系統(tǒng)動作執(zhí)行、檢測工具以動畫或模型生動、詳盡地展示出來；2. 利用VB語言編程實現(xiàn)電控發(fā)動機系統(tǒng)正常工作、人工故障設(shè)置、故障檢測診斷和故障診斷評分等功能模塊的設(shè)計。1.3 課題設(shè)計的方法本程序有四個主要組成部分，分別為正常模式、故障模擬模式、成績查詢和考核模式。1.3.1 系統(tǒng)整體方案的設(shè)計整個設(shè)計系統(tǒng)以計算機軟件技術(shù)、電控發(fā)動機控制策略為設(shè)計核心，各個控制系統(tǒng)的信號采集，通過程序的數(shù)學建模運算和傳輸，實現(xiàn)電控發(fā)動機的模擬仿真，系統(tǒng)可以模擬發(fā)動機動態(tài)運行參數(shù)，并進行數(shù)據(jù)外觀輸出。1.3.2 系統(tǒng)軟、硬件配置計算機軟件以Visual Basic 6.0程序設(shè)計語言、3Dsmax繪圖軟件為主，實驗硬件配置包括奧迪A4、VGA1552、車用萬用表等。1.3.3 窗體設(shè)計包括主界面窗體、考核界面、故障設(shè)置界面、成績管理界面。1.3.4 程序設(shè)計利用3Dsmax三維建模軟件繪制電控發(fā)動機外觀模型和各檢測設(shè)備模型，并以動畫格式輸出，利用Visual Basic 6.0程序設(shè)計語言導入模擬動態(tài)發(fā)動機，實現(xiàn)靜態(tài)參數(shù)測量、主要儀器設(shè)備的使用、故障檢測與維修、實訓考核等功能。1. 電控發(fā)動機總體認知。本實訓把原發(fā)動機直接展示在電腦屏幕上可以對學生進行發(fā)動機電控方面的構(gòu)造教學，使學生了解各種傳感器和控制部件的安裝位置、作用及工作原理，從而進一步加深學生對電控發(fā)動機的原理認知。2. 軟件模擬利用診斷儀讀取發(fā)動各種傳感器的故障代碼。故障診斷儀器的的使用是學生學習的一方面，在實訓軟件中有故障診斷接口，可以很方便地與故障儀對接，從而讀取發(fā)動機的各個故障碼和數(shù)據(jù)流，使學生學會分析發(fā)動機的工況。3. 電動機電子控制系統(tǒng)、燃油供給系統(tǒng)、點火系統(tǒng)的故障診斷。在發(fā)動機實訓軟件中有故障設(shè)置窗口，在實踐教學上利用故障窗口來設(shè)置實訓系統(tǒng)的故障。學生可以通過故障診斷儀來獲取故障信息，利用萬用表來檢測元件和線路的好壞，從而學會電控發(fā)動機故障的診斷和檢測程序。第2章 汽車發(fā)動機常見故障及診斷方法目前汽車普遍使用電控發(fā)動機，電控發(fā)動機系統(tǒng)常見故障有：無法起動、起動困難、怠速不穩(wěn)、工作不穩(wěn)、加速無力、動力不足、排放異常、油耗過高、發(fā)動機回火等。常見故障原因有：冷卻液溫度傳感器G62故障、霍爾傳感器G28無信號或信號不正確、進氣溫度傳感器、曲軸位置傳感器故障、燃油壓力調(diào)節(jié)器故障、噴油器線路故障或噴油器堵塞、供氣系統(tǒng)不暢、點火系統(tǒng)故障、節(jié)氣門控制組件故障、發(fā)動機控制單元J220故障或編碼不正確等。本章以奧迪A4轎車發(fā)動機為例，詳細介紹誘發(fā)故障癥狀的故障原因和檢查排除故障的步驟5。2.1 奧迪A4轎車發(fā)動機資料發(fā)動機型: AWL型排量：2.0L壓縮比：9.5:1最大扭矩：300Nm（1750-3200r/min時）最大功率：160KW（1600r/min 時）發(fā)動機管理系統(tǒng)：Motronic M3.8.2燃油：95 RON無鉛汽油其它：水冷、直列式、四沖程、六缸、五氣門、電控多點燃油噴射汽油機、渦輪增壓、缸徑?jīng)_程=81.0mm86.4mm、兩級可變進氣歧管長度、可變配氣相位。2.2 奧迪A4轎車發(fā)動機常見故障故障一：啟動困難或無法起動故障二：怠速不穩(wěn)故障三：加速無力故障四：動力不足故障五：排放異常故障六：油耗過高6 2.3 奧迪A4轎車發(fā)動機常見故障原因2.3.1 故障一：啟動困難或無法啟動故障原因：1.燃油壓力低或燃油泵供電系統(tǒng)故障2.噴油器或其線路故障3.冷卻液溫度傳感器G62故障4.節(jié)氣門控制組件故障5.控制單元J220故障或編碼不正確6.發(fā)動機轉(zhuǎn)速傳感G28故障7.點火系統(tǒng)故障7 2.3.2 故障二：怠速不穩(wěn)故障原因：1.噴油器或其線路故障2.燃油壓力低3.氧傳感器G39故障4.節(jié)氣門控制組件故障 5.點火系統(tǒng)故障82.3.3 故障三：加速無力故障原因：1.節(jié)氣門控制組件故障2.供氣系統(tǒng)故障 3.噴油器或其線路故障4.爆燃傳感器G61、G62故障5.點火系統(tǒng)故障92.3.4 故障四：動力不足故障原因：1.霍爾傳感器G40無信號或信號不正確2.燃油壓力低 3.節(jié)氣門控制組件故障4.供氣系統(tǒng)故障 5.噴油器或其線路故障6.點火系統(tǒng)故障 7.爆燃傳感器G61、G62故障102.3.5 故障五：排放異常故障原因：1.冷卻液溫度傳感器G62故障2.供氣系統(tǒng)故障 3.氧傳感器G39故障 4.霍爾傳感器G40無信號或信號不正確5.爆燃傳感器G61、G62故障 6.控制單元J220故障或編碼不正確11 2.3.6 故障六：油耗過高故障原因：爆燃傳感器G61、G62故障供氣系統(tǒng)故障 噴油器或其線路故障燃油壓力低冷卻液溫度傳感器G62故障氧傳感器G39故障霍爾傳感器G40無信號或信號不正確12第3章 電控發(fā)動機實訓仿真設(shè)計程序設(shè)計及使用說明3.1 仿真系統(tǒng)各窗體展示圖3.1 主界面圖3.2 考核界面 圖3.3 考核界面工具欄功能圖3.4 登錄子窗口圖3.5 故障設(shè)置子窗口圖3.6 電路圖子窗口圖3.7 保險絲盒子窗口圖3.8 更換組件子窗口圖3.9 成績查詢子窗口圖3.10 密碼修改子窗口圖3.11 系統(tǒng)說明子窗口3.2 仿真系統(tǒng)各主要功能實現(xiàn)方法3.2.1 點火開關(guān)控制 (a) (b) (c) 圖3.10 點火開關(guān)位置在窗體Form1中加入一個Image控件組名稱為Image2，其中包括3個控件元素；再加入一個Timer控件名稱為Timer1。以上控件屬性設(shè)置見下表。表3-1 控件屬性列表控 件屬 性屬性值Image2（0）Picture圖3.10(a)圖Image2（1）Picture圖3.10(b)圖Image2（2）Picture圖3.10(c)圖Timer2Interval10點火開關(guān)原始狀態(tài)是在OFF檔，單擊Image2后點火開關(guān)撥到ON檔，再次單擊Image2后開關(guān)位置在START檔保持一秒后復位到ON檔，此時發(fā)動機應當處于怠速狀態(tài)，單擊Image2關(guān)閉發(fā)動機，開關(guān)回到OFF檔。下面是實現(xiàn)以上功能所需要的編程代碼13：Private Sub Image2_Click(Index As Integer) Static i 點火開關(guān)控制 i = i + 1Select Case iCase 1Image2(0).Visible = False： Image2(1).Visible = True： Image2(2).Visible = FalseCase 2Timer1.Enabled = True 開關(guān)復位Timer2.Interval = 100Dim a As Integera = a + 1 ：Y = aCase 3Image2(0).Visible = True：Image2(1).Visible = False：Image2(2).Visible = FalseTimer2.Enabled = False Dim b As Integer b = b + 1 Y = b Timer2.Interval = 100End SelectIf i = 3 Theni = 0End IfEnd SubPrivate Sub Timer1_Timer()Static X 點火開關(guān)控制X = X + 1Image2(0).Visible = False ：Image2(1).Visible = False ：Image2(2).Visible = TrueIf X = 10 ThenX = 0Image2(0).Visible = False ：Image2(1).Visible = True ：Image2(2).Visible = FalseTimer1.Enabled = FalseEnd IfEnd Sub分析程序代碼，則程序流程圖如下：3.2.2 萬用表檔位選擇控制(a) (b) (c) (d)圖3.11 萬用表檔位位置在窗體Form1中加入一個Image控件組名稱為Image4，其中包括4個控件元素；加入兩個時間控件Timer7和Timer9；加入一個Label控件組名稱為Label12，其中包括4個控件元素。以上控件屬性設(shè)置見下表。表3-2 控件屬性列表控 件屬 性屬性值Image4(0)Picture圖3.11(a)圖Borderstyle0Image4(1)Picture圖3.11(b)圖Borderstyle0Image4(2)Picture圖3.11(c)圖Borderstyle0Image4(3)Picture圖3.11(d)圖Borderstyle0Timer7Interval100Timer9Interval100Label12(0)Caption空值Label12(1)Caption空值Label12(2)Caption空值Label12(3)Caption空值萬用表開關(guān)原始狀態(tài)是在OFF檔，單擊Label12(1)后萬用表撥到電阻檔，單Label12(2)后萬用表撥到直流電壓檔，單擊Label12(3)后萬用表撥到交流電壓檔，單擊Label12(0)后萬用表關(guān)閉回到OFF檔。下面是實現(xiàn)以上功能所需要的編程代碼：Private Sub Label12_Click(Index As Integer)Select Case IndexCase 0萬用表關(guān)閉Image4(0).Visible = True Image4(1).Visible = FalseImage4(2).Visible = FalseImage4(3).Visible = FalseCase 1 萬用表處于電阻檔Image4(0).Visible = FalseImage4(1).Visible = TrueImage4(2).Visible = FalseImage4(3).Visible = FalseCase 2 萬用表處于直流電壓檔Image4(0).Visible = FalseImage4(1).Visible = FalseImage4(2).Visible = TrueImage4(3).Visible = FalseCase 3 萬用表處于交流電壓檔Image4(0).Visible = FalseImage4(1).Visible = FalseImage4(2).Visible = FalseImage4(3).Visible = TrueEnd SelectEnd Sub分析程序代碼，則程序流程圖如下：Private Sub Timer7_Timer() Dim f As Integer: Dim i As Integer: Dim j As Integer: Dim k As Integer If Image4(0).Visible = True Then f = 1 If Image4(1).Visible = True Then i = 1 If Image4(2).Visible = True Then j = 1 If Image4(3).Visible = True Then k = 1 off = f: dianzu = i: zhiya = j: jiaoya = kEnd Sub分析程序代碼，則程序流程圖如下：off,dianzu,zhiya,jiaoya為Form1中的窗體變量，時間控件Timer7會時時檢測萬用表檔位的變化，并把它們的值記錄在窗體變量off,dianzu,zhiya,jiaoya中，這四個值的保存是為后面的萬用表表筆顯示和不同元器件、不同檔位的測量服務的14。Private Sub Timer9_Timer()If Image2(1).Visible = True And Image4(1).Visible = True ThenMsgBox 不允許帶電測量元件電阻值！Image4(0).Visible = True: Image4(1).Visible = False Image4(2).Visible = False: Image4(3).Visible = FalseEnd IfEnd Sub這段程序是為了防止萬用表在電氣元件帶電的情況下測量電阻值，以免損壞萬用表，這在實際操作中是非常重要的，所以在此列舉出來。分析程序代碼，則程序流程圖如下：3.2.3 萬用表表針顯示與提示框的控制圖3.12 萬用表指針顯示圖圖3.13 萬用指針顯示全圖圖3.14 提示框顯示示例仿真系統(tǒng)中涉及到許多靜、動態(tài)量的測量，在前文中講述了萬用表檔位的控制，在本節(jié)中所述的是在萬用表換檔和測量不同傳感器時萬用表表筆的顯示和提示框顯示內(nèi)容的控制方法，在本段程序中的控制核心是Timer控件，Timer控件具有監(jiān)控功能，它的Interval屬性可以設(shè)置它激發(fā)間隔的時間。要實現(xiàn)萬用表表筆的顯示功能則需添加以下控件，在發(fā)動機結(jié)構(gòu)圖各傳感器測量點處加入1個 OptionButton控件數(shù)組，其中有11個控件元素，設(shè)置其Style屬性值為1；然后再添加8個Image控件數(shù)組，每組中有兩個控件元素，設(shè)置其BroderStyle屬性值為0,Visible屬性為False；最后添加一個Timer控件，Interval屬性為100。各表筆的具體位置如圖3.13所示。要實現(xiàn)提示框顯示內(nèi)容的控制則需添加以下控件，在Form1窗體中加入一個Label控件，其Name屬性為ts，提示框的顯示內(nèi)容如圖3.14所示。下面是實現(xiàn)萬用表表筆顯示和提示窗體顯示控制的部分代碼：Private Sub Option1_Click(Index As Integer) 萬用表表筆顯示控制段 Select Case Index Case 0 Image7(0).Visible = True: Image7(1).Visible = True: Image3(0).Visible = False Image3(1).Visible = False: Image17(0).Visible = False: Image17(1).Visible = False Image8(0).Visible = False: Image8(1).Visible = False: Image13(0).Visible = False Image13(1).Visible = False: Image10(0).Visible = False: Image10(1).Visible = False Image9(0).Visible = False: Image9(1).Visible = False: Image14(0).Visible = False Image14(1).Visible = False: Image12(0).Visible = False: Image12(1).Visible = False Image16(0).Visible = False: Image16(1).Visible = False: Image15(0).Visible = False Image15(1).Visible = False End SelectEnd Sub上段程序利用SelectCase選擇結(jié)構(gòu)，利用Timer6對Option1控件數(shù)組進行監(jiān)控，Select定義的是Option1中控件元素在控件數(shù)組中的標識號，當條件滿足時程序就會執(zhí)行對應的程序段繼而顯示對應的萬用表表筆。Private Sub Timer6_Timer( ) 提示框顯示內(nèi)容控制段 Dim i As Integer 提示窗控制For i = 0 To 10 If Option1(i).Value = True Then If dianzu = 1 Then ts.Caption = 測量 & Option1(i).ToolTipText & 電阻值 If zhiya = 1 Then ts.Caption = 測量 & Option1(i).ToolTipText & 直流電壓值 If jiaoya = 1 Then ts.Caption = 測量 & Option1(i).ToolTipText & 交流電壓值 If off = 1 Then ts.Caption = 目前無測量項目！ End IfNext iEnd Sub上段程序利用FroNext循環(huán)結(jié)構(gòu)和IfThen選擇結(jié)構(gòu)，利用Timer6的監(jiān)控功能，監(jiān)控Optin1中各控件的Value值，然后根據(jù)萬用表檔位的位置來顯示當前系統(tǒng)具體的測量項目。3.2.4 數(shù)據(jù)庫訪問、添加與修改功能圖3.13 與數(shù)據(jù)庫相關(guān)的窗體以上窗體涉及數(shù)據(jù)庫訪問、添加與修改功能，在設(shè)計程序時運用了一些Visual Basic訪問數(shù)據(jù)庫的簡單命令，結(jié)合數(shù)據(jù)庫軟件Access2003就本軟件在設(shè)計工程中的一些技術(shù)特點做一下介紹。利用Visual Basic對數(shù)據(jù)庫進行操作需要借助控件Data或Adodc，要對數(shù)據(jù)庫進行操作首先要建立數(shù)據(jù)庫，本程序利用Access2003建立數(shù)據(jù)庫文件，數(shù)據(jù)庫建立成功后對其進行dll加密。在數(shù)據(jù)庫中共建立了兩個數(shù)據(jù)表格以便程序訪問，一個用于密碼管理，一個用于成績記錄、管理。連接數(shù)據(jù)庫有兩種方法：一種是絕對地址引用，一種是隨機引用，本程序在連接數(shù)據(jù)庫時運用的是隨機引用方式，這樣即使工程文件在改變了存放地址后，只要保證數(shù)據(jù)源與工程文件在同一個文件夾下Visual Basic就能準確地鎖定它，從而避免數(shù)據(jù)庫連接錯誤或無法找到數(shù)據(jù)庫的問題。下面是數(shù)據(jù)訪問、添加和修改所設(shè)計的程序源碼15：Public Function ConnectString( ) As StringConnectString = Provider=Microsoft.Jet.OLEDB.4.0;Data Source _ & = & App.Path & 電控發(fā)動機實訓仿真.dll;Persist Security Info=FalseEnd Function以上語句是對工程啟動時定義數(shù)據(jù)連接方式時所需的，放在工程模塊中定義。Data1.Recordset.AddNew：Data1.Recordset(學號) = xhData1.Recordset(成績) = Trim(cj)： Data1.Recordset(故障) = GZ1Data1.Recordset(操作時間) = sjData1.Recordset(成績提交時間) = StatusBar1.Panels.Item(3).TextData1.Recordset.Update以上語句是對數(shù)據(jù)庫進行添加數(shù)據(jù)所需要的代碼，在成績提交語段中定義。Private Sub Picture1_Click()Adodc1.Recordset.DeleteEnd Sub以上語句是對數(shù)據(jù)庫進行刪除操作，在成績管理語段中定義。3.2.5 V.A.G1552的仿真圖3.12 VAG1552外觀在窗體Form1中加入一個Frme控件名稱為VGA1；加入一個時間控件Timer11，加入一個CommandButton控件組名稱為Command1，其中包括10個控件元素；加入五個CommandButton控件，名稱分別為C、Q、you、up、down；加入一個RichTextBox控件名稱為RT；加入一個TextBox控件名稱為JT。以上控件屬性設(shè)置見下表。表3-3 控件屬性列表控件Name屬性Command1(0)0Command1(1)1Command1(2)2Command1(3)3Command1(4)4Command1(5)5Command1(6)6Command1(7)7Command1(8)8Command1(9)9V.A.G1552故障診斷操作步驟：1.打開自診斷系統(tǒng)插座的蓋板，將故障診斷儀V.A.G1552與自診斷插座相連接，此時屏幕顯示：Test of vehicle systema Enter adress word XXHELP車輛系統(tǒng)測試輸入地址碼 XX幫助2.打開點火開關(guān)，或者發(fā)動機怠速運轉(zhuǎn)。輸入“發(fā)動機電子系統(tǒng)“地址碼01，按“Q”鍵確認。屏幕顯示：330 907 404 2.0L R4/2V MOTR HS D01Coding 08001WSC XXXXX其中，330 907 404 發(fā)動機控制單元零件號2.0L 發(fā)動機排量R4/2V 直列式發(fā)動機，4缸，每缸2氣門MOTR MotronicHS 手動變速器D01 控制單元軟件版本Coding 08001 控制單元編碼WSC XXXXX 維修站代碼按“”鍵，屏幕顯示：Test of vehicle systemsHELPSelect function XX車輛系統(tǒng)測試幫助選擇功能 XX3.按“02”鍵，選定查詢故障存儲器的內(nèi)容，并按“Q”鍵確認，顯示器將顯示出所存儲的故障數(shù)目：X Faulta recongnized識別出（X）個故障！4.如果顯示器上顯示“未識別出故障碼”，按“”鍵，退出 ；如果有一個或多個故障被存儲，通過按“”，可將故障代碼及內(nèi)容先后顯示出來；5.按“05”鍵，選擇功能“刪除故障存儲”，并按“Q”鍵確認，屏幕顯示：Test of vehicle systemsFault memory is erased!車輛系統(tǒng)測試故障代碼已被清除！6.按“”鍵，退出“查詢故障存儲器的內(nèi)容”功能，重新進入“功能選擇界面”；7.按“06”鍵，選擇功能“結(jié)束輸出”，并按“Q”鍵確認16。下面是實現(xiàn)以上功能所需要的編程代碼：Private Sub Command1_Click(Index As Integer) Select Case Index Case 0 If VGA = 0 Then RT.Text = & HELP & vbCrLf & Test of vehicle systems Enter address word + 0 + X If VGA = 2 Then RT.Text = Test of vehicle stytems HELP & vbCrLf & Select function 0X Case 1 If VGA = 0 Then RT.Text = & HELP & vbCrLf & Test of vehicle systems Enter address word 0 + 1 + Q 01功能 Case 2 If VGA = 2 Then RT.Text = Test of vehicle stytems HELP & vbCrLf & Select function 02 Q 02功能 Case 3 If VGA = 2 Then RT.Text = Test of vehicle stytems HELP & vbCrLf & Select function 03 Q 03功能 End SelectEnd Sub以上語段是通過工程級變量VGA作為層數(shù)記錄源，既通過詢問VGA當前的數(shù)值來判別診斷儀運行到那個層面，繼而運行選擇的數(shù)據(jù)功能。分析程序代碼，則程序流程圖如下：Private Sub Q_Click(Index As Integer)Select Case VGA Case 0 VGA = 1 RT.Text = 330 907 404 2.0L R4/2V MOTR HS D01 & vbCrLf & Coding 08001 WSC 00001 Case 2 If RT.Text = Test of vehicle stytems HELP & vbCrLf & Select function 02 Q Then If GZ = OR GZ = 燃油泵保險絲ORIf GZ = 點火線圈供電保險絲 ORGZ = 噴油閥供電保險絲 Then XY = 0 If GZ = 轉(zhuǎn)速傳感器 OR GZ = 前氧傳感器 OR GZ = 后氧傳感器OR GZ = 爆震傳感器 OR GZ = 進氣歧管壓力傳感器 OR GZ = 噴油器 Then XY = 1 If GZ = 凸輪軸位置傳感器 OR GZ = 節(jié)氣門位置傳感器OR GZ = 水溫傳感器 OR GZ = 空氣流量計Then XY = 2 RT.Text = XY & Faults recognized! End If If RT.Text = Test of vehicle stytems HELP & vbCrLf & Select function 03 Q Then RT.Text = 功能模塊未開發(fā) ：jt.Visible = True End If If RT.Text = Test of vehicle stytems HELP & vbCrLf & Select function 05 Q Then RT = Fault memory is erased! 清除故障 jt.Visible = True End If If RT.Text = Test of vehicle stytems HELP & vbCrLf & Select function 06 Q Then RT.Text = & HELP & vbCrLf & Test of vehicle systems Enter address word XX RT.SetFocus VGA = 0 Timer11.Enabled = False jt.Visible = False End If End SelectEnd Sub以上語段是詢問VGA的的值，并對其進行賦值后記錄到工程中，在VGA=2時判別當前系統(tǒng)存在的故障類型（GZ，工程級故障記錄源），根據(jù)所設(shè)故障計算出故障個數(shù)并保存在窗體級變量XY中；判別05、06功能，并做返回。Private Sub you_Click()Select Case VGACase 1 系統(tǒng)進口 RT.Text = Test of vehicle stytems HELP & vbCrLf & Select function XX VGA = 2Case 2 Select Case XY Case 0 無故障按鍵返回 RT.Text = Test of vehicle stytems HELP & vbCrLf & Select function XX VGA = 2 jt.Visible = False Case 1 有故障查詢,故障碼為1 If GZ = 轉(zhuǎn)速傳感器 Then RT.Text = Sensor G28 circuit roads or short circuit jt.Visible = True VGA = 3 End If If GZ = 前氧傳感器 Then RT.Text = of sensors G39 no signal input jt.Visible = True VGA = 3 End IfIf GZ = 后氧傳感器 Then RT.Text = of sensors G108 no signal input jt.Visible = True VGA = 3 End If If GZ = 爆震傳感器 Then RT.Text = Knock sensor G61 no signal input jt.Visible = True VGA = 3 End If If GZ = 進氣歧管壓力傳感器 Then RT.Text = The gas manifold absolute pressure sensor G71 no signal input VGA = 3 End If If GZ = 噴油器 Then RT.Text = Three-way catalytic bad results jt.Visible = True VGA = 3 End If End Select Case 3 判斷程序?qū)訑?shù)及返回接口 Timer11.Enabled = True If RT.Text = Three-way cat