【導讀】維修管理系統(tǒng)的整體結構及流程化設計的基本方法。全文共分前言、系統(tǒng)分析、系統(tǒng)設計、系統(tǒng)實施、開發(fā)總結共五章。重點闡述了可視化編程技術、數據庫管。該系統(tǒng)通過VisualBasic中文版的開發(fā)工具進行桌面開發(fā)，主要。庫，在該數據庫中數據以表的形式存儲，介紹了表的創(chuàng)建及存儲過程。輛維修企業(yè)的管理工作。系統(tǒng)對計算機軟硬件的運行要求和設計開發(fā)環(huán)境介紹????當今社會已進入信息化時代。信息化正以其巨大的現(xiàn)實作用，引起人們前所。未有的廣泛關注。對企業(yè)來說，用信息化規(guī)范企業(yè)的管理，為顧客提供標準化、一體化的服務，達到提高企業(yè)管理水平的目的。

　　

【正文】 et rs = New SQL, Cnn, adOpenKeyset, adLockOptimistic, adCmdText If = 0 Then = False MsgBox 沒有該車資料 ! Exit Function End If = True = rs!cph = rs!cph = rs!clxh 25 = rs!fdjhm = rs!dph = rs!sccj = rs!fyjs = rs!bz q = rs!khid Set rs = Nothing strCnn = Provider=。Data Source= amp。 amp。 \。 Set Cnn = New strCnn SQL = select * from kh where id = amp。 q SQL Set rs = New SQL, Cnn, adOpenKeyset, adLockOptimistic, adCmdText = rs!khmc = rs!khdz = rs!khdh = rs!khcz = rs!lxr Set rs = Nothing = Provider=。Data Source= amp。 amp。 \。 = select jddh,jcrq,wxxm,wxfy,clmcsl,clfy,qtfy,zfy,wxry,jyy,ccrq,lcb,jcr from js where cphm=39。 amp。 amp。 39。 order by jddh Set = Adodc1 (0).Caption = 接待單號 (1).Caption = 進廠日期 (2).Caption = 維修項目 (3).Caption = 維修費用 (4).Caption = 材料明細 (5).Caption = 材料費用 26 (6).Caption = 其它費用 (7).Caption = 總費用 (8).Caption = 維修人員 (9).Caption = 檢驗員 (10).Caption = 出廠日期 (11).Caption = 里程表 (12).Caption = 接車人 = 維修詳細記錄一覽表 For u = 0 To 12 (u).Locked = True Next u Dim t1 As String t1 = 二級維護 = Provider=。Data Source= amp。 amp。 \。 = select jddh,jcrq,wxxm,wxfy,clmcsl,clfy,qtfy,zfy,wxry,jyy,ccrq,lcb,jcr from js where cphm=39。 amp。 amp。 39。 and wxxm like % amp。 t1 amp。 % Set = Adodc2 (0).Caption = 接待單號 (1).Caption = 進廠日 期 (2).Caption = 維修項目 (3).Caption = 維修費用 (4).Caption = 材料明細 (5).Caption = 材料費用 (6).Caption = 其它費用 (7).Caption = 總費用 (8).Caption = 維修人員 (9).Caption = 檢驗員 (10).Caption = 出廠日期 (11).Caption = 里程表 (12).Caption = 接車人 = 二級維護詳細記錄一覽表 For u = 0 To 12 (u).Locked = True 27 Next u End Function 維修單據查詢窗體介紹 點擊主界面窗體的“維修單據查詢”，即進入維修單據查詢窗體。 維修單據查詢時，要先指定查詢的時間段。根據指定的時間段，即可查詢到相應的業(yè)務接待單 ，而 報修單和領料單 則是在選定相應的業(yè)務接待單后才顯示 。 維修單據查詢窗體使用了三個 ListView 控件，分別顯示業(yè)務接待單、報修單和領料單三種單據。在使用這三個控件時，采用了與一個 ImageList 控件相綁定的方法，顯示相關單據的圖標。圖標類似 文本狀，也形象地表示出單據的文本性質。 系統(tǒng)在業(yè)務接待單 的 ListView 控件上使用了 Click 和 KeyUp 事件，這樣在當前業(yè)務接待單發(fā)生改變時可以顯示相應的派工單和領料單 ，同時也在 Frame 中顯示業(yè)務接待和結算出廠的相關信息 。 派工單和領料單的 ListView控件的 Click和 KeyUp 事件也與些類似。 維修單據查詢窗體 使用了五個 Frame 控件，主要是為了在顯示相關的單據內容時，隱藏掉其它單據的內容。 因三種單據在出廠 時已經結算，所以在本窗體查詢到的單據信息不提供更改功能，這也 避免 了 對歷史記錄造成破壞 ，產生信息 不 一致的情況 。 本窗體在使用 ListView 控件 的 Click 和 KeyUp 事件 調用了自定義的 五個 函數， 主要是避免重復代碼。這里只列舉一下業(yè)務接待單 ListView 控件的 Click和 KeyUp 事件調用的派工單 ListView 控件的函數（ lv1）的實現(xiàn)過程。函數如下： Function lv1() = True = lvwIcon strCnn = Provider=。Data Source= amp。 amp。 \。 Set Cnn = New strCnn SQL = select * from wx where jdid = amp。 amp。 and yc= amp。 False SQL Set rs = New SQL, Cnn, adOpenKeyset, adLockOptimistic, adCmdText If 0 Then 28 Do For i = 1 To With ListView2 . , , rs!pgdh, 2, 2 If Not rs!pgdh = Then .ListItems(i). , , rs!jdid End With Next i Loop While = False End If Set rs = Nothing End Function 維修單據查詢窗體預覽如下： 29 第 5 章 系統(tǒng)實 現(xiàn) 車輛維修管理系統(tǒng)屬單機版軟件，系統(tǒng)數據庫為 Access 2020，基本上能夠滿足大多數汽車修理廠的數據處理要求。該系統(tǒng) 以汽車維修企業(yè)的基本需求為開發(fā)要點， 以維修流程為開發(fā)脈絡，由始及終，涵蓋了進廠報修、維修派工、材料領用、出廠結算全過程 ，為汽車維修企業(yè)的維修業(yè)務提供了一個信息化管理的操作平臺。 本系統(tǒng)經多次虛擬測試，功能正常。在此過程中，對一些錯誤中斷進行了處理，使系統(tǒng)運行更加穩(wěn)定。 30 致謝 通過開發(fā)這個車輛維修系統(tǒng)，進一步明確了開發(fā)一個信息系統(tǒng)開發(fā)的方法、方式以及思路，加深了我對管理系統(tǒng)的認識，鞏固了以前所學的有關信息管理系統(tǒng)的開發(fā)知識和計算機軟件知識，特別是對具體系統(tǒng)開發(fā)的步驟與方法有了更深層次的認識，提高了軟件開發(fā)的水平，同時也為我今后進一步學習、運用計算機有關知識打下了堅實的基礎 。因時間緊張，水平有限，一些數據處理顯得不夠精練，冗余代碼較多，系統(tǒng)的功能不夠全面，這都有待于我在以后的時間里再仔細地深入學習。 同時，在此感謝我的指導老師 —— 李明才老師，及其它給予我?guī)椭?、支持的電?老師們、同學們！ 31 參考文獻 [1] 丁寶康， 數據庫原理 ，經濟科學出版社， [2] 陳偉， 中文版 Visual Basic ，人民郵電出版社， [3] 郭瑞軍，唐邦民，謝晗昕 等編著 ， Visual Basic 數據庫開發(fā)實例精粹 ，電子工業(yè)出版社，