【正文】 9。 amp。 amp。 39。) If Then Else MsgBox 此車已經(jīng)報(bào)廢，不能參加運(yùn)營(yíng)！, , 車輛管理系統(tǒng) = Exit Sub End If 39。此車是否異動(dòng)了 Set rss2 = (select * from 車輛異動(dòng)表 where 車牌號(hào)碼=39。 amp。 amp。 39。) If Then Else MsgBox 此車為“異動(dòng)車輛”不能參加運(yùn)營(yíng)！, , 車輛管理系統(tǒng) = Exit Sub End If 在“添加”按鈕的 Click 事件下，通過 ADO 對(duì)象創(chuàng)建“車輛運(yùn)營(yíng)表”的記錄集，通過對(duì)記錄集中記錄數(shù)的判斷對(duì)“營(yíng)運(yùn)編號(hào)”進(jìn)行自動(dòng)編號(hào)，其代碼如下： Dim rs As New select * from 車輛運(yùn)營(yíng)表, n, adOpenKeyset, adLockOptimistic If 0 Then aa = (0) = YY + Format(Val(Right((運(yùn)營(yíng)編號(hào)), 3)) + 1, 000) Else = YY001 End If在“刪除”按鈕的 Click 事件下，通過 ADO 控件的 Delete 方法刪除數(shù)據(jù)，代碼如下： If MsgBox(您確實(shí)要?jiǎng)h除記錄嗎？ , vbOKCancel, 車輛管理系統(tǒng)) = vbOK Then MsgBox 記錄已刪除！, , 車輛管理系統(tǒng) End If 車輛運(yùn)營(yíng)列表運(yùn)行結(jié)果，如圖 49 所示：圖 49 車輛運(yùn)營(yíng)列表結(jié)果圖 車輛違章列表 窗體界面設(shè)計(jì)（1）新建一個(gè)窗體，Caption 屬性為“車輛違章記錄” 。（2）在窗體上添加 Test、Label、CommandButton、DTPicker 控件。如圖410 所示：圖 410 車輛違章記錄圖 程序代碼設(shè)計(jì)判斷報(bào)廢車輛和異動(dòng)車輛不可以添加到違章列表中，在 Text1 控件LostFocus 事件下，添加如下核心代碼： Set rss = (select * from 車輛檔案 where 車牌號(hào)碼=39。 amp。 amp。 39。) If Then MsgBox 這輛車不屬于本公司的！, , 車輛管理系統(tǒng) = Exit Sub End If Set rss1 = (select * from 車輛異動(dòng)表 where 車牌號(hào)碼=39。 amp。 amp。 39。) If Then Else MsgBox 該車為異動(dòng)車輛！, , 車輛管理系統(tǒng) = Exit Sub End If Set rss2 = (select * from 車輛報(bào)廢表 where 車牌號(hào)碼=39。 amp。 amp。 39。) If Then Else MsgBox 該車已經(jīng)報(bào)廢！, , 車輛管理系統(tǒng) = Exit Sub End If 車輛違章記錄窗體運(yùn)行結(jié)果，如圖 411 所示。圖 411 車輛違章記錄運(yùn)行結(jié)果圖 車輛運(yùn)營(yíng)查詢車輛運(yùn)營(yíng)查詢窗體主要完成按車牌號(hào)碼、運(yùn)營(yíng)日期和運(yùn)營(yíng)時(shí)間段查詢車輛運(yùn)營(yíng)情況。 窗體界面設(shè)計(jì)（1）新建一個(gè)窗體，Caption 屬性為“車輛運(yùn)營(yíng)查詢窗體” ，在改窗體上一次添加控件。（2）在窗體上添加 DataGrid 控件，用來顯示查詢車輛運(yùn)營(yíng)的結(jié)果。（3）在窗體中添加 Text、 Label、Image、DTPicker 控件，如圖 412 所示：圖 412 車輛運(yùn)營(yíng)查詢圖 程序代碼設(shè)計(jì)設(shè)計(jì)一個(gè) Rebind 過程，用于顯示表中所有數(shù)據(jù)。 = 車輛運(yùn)營(yíng)列表 = Provider=。Data Source= amp。 amp。 \ amp。 。Persist Security Info=False = select * from 車輛運(yùn)營(yíng)表 設(shè)計(jì)一個(gè)清空過程，用于顯示查詢結(jié)果數(shù)據(jù)。 = 您所要查詢的車輛運(yùn)營(yíng)記錄如下： = Provider=。Data Source= amp。 amp。 \ amp。 。Persist Security Info=False = select * from 車輛運(yùn)營(yíng)表 where 1=0 車輛運(yùn)營(yíng)查詢窗體運(yùn)營(yíng)結(jié)果，如圖 413 所示：圖 413 車輛運(yùn)營(yíng)查詢結(jié)果圖 程序調(diào)試和錯(cuò)誤處理運(yùn)行“車輛違章查詢”模塊，查詢車輛違章信息時(shí)出現(xiàn)“FROM 子句語法錯(cuò)誤”的錯(cuò)誤提示。如圖 414 所示：圖 414 車輛違章查詢單擊“確定”按鈕后，執(zhí)行的代碼如下：If Then Call QingKong MsgBox 對(duì)不起，沒有符合您查詢條件的車輛違章記錄！, , 車輛管理系統(tǒng) Else = sql End If第五章 系統(tǒng)總結(jié)經(jīng)過幾個(gè)月的設(shè)計(jì)和開發(fā)，車輛運(yùn)輸管理系統(tǒng)基本開發(fā)完畢。其功能基本符合用戶需求，能夠完成信息錄入，信息查詢和統(tǒng)計(jì)，并提供一定的系統(tǒng)維護(hù)功能，使用戶方便的對(duì)數(shù)據(jù)進(jìn)行錄入，修改，刪除，備份等操作，并且對(duì)于數(shù)據(jù)的一致性的問題也通過程序進(jìn)行了一定的解決。但是由于畢業(yè)設(shè)計(jì)時(shí)間較短，但還存在如下問題：（1） 界面做得不是很協(xié)調(diào)，過于簡(jiǎn)單。（2） 在登陸頁面，對(duì)密碼沒有限制，可以使其數(shù)字和字符混合并控制其長(zhǎng)度。（3） 在設(shè)計(jì)其中幾項(xiàng)功能的時(shí)候，出現(xiàn)了一些問題，使其功能無法實(shí)現(xiàn)。（4） 在設(shè)置的登錄界面，比較簡(jiǎn)單，我們可以直接按 Enter 鍵就可以登錄。（5）在數(shù)據(jù)庫的選擇存在不足，我們可以選用 SQL，因?yàn)槲覀?Access 存在一個(gè)缺點(diǎn)就是他可以再數(shù)據(jù)量小的時(shí)候使用，而 SQL 可以再數(shù)據(jù)量大的情況下使用，而且 SQL 的高負(fù)載時(shí)的穩(wěn)定性較好。（6） 在編寫軟件部分的時(shí)候，會(huì)遇到很多意想不到的問題，自己可能會(huì)認(rèn)為代碼沒有錯(cuò)，但是當(dāng)你細(xì)心一點(diǎn)查找的時(shí)候，你會(huì)發(fā)現(xiàn)你的代碼還是有問題的，而且在編寫的過程中，要不斷地調(diào)試，才可以保證你的代碼是沒有錯(cuò)誤的。這些都是需要完善的地方，該系統(tǒng)離實(shí)際使用也還有相當(dāng)?shù)木嚯x，需要我進(jìn)行不斷地補(bǔ)充和完善。結(jié)束語本軟件的設(shè)計(jì)目的是為車管人員方便管理機(jī)動(dòng)車與駕駛員信息提供方便。通過這幾個(gè)月的畢業(yè)設(shè)計(jì)，我學(xué)到很多以前沒有學(xué)到的 visual basic 開發(fā)技術(shù)，在軟件工程學(xué)上更是取得了很大的進(jìn)步。經(jīng)過大量的測(cè)試和試用，我深信本軟件達(dá)到了方便和實(shí)用的設(shè)計(jì)目的，并在軟件界面和易用實(shí)用等方面有著獨(dú)到之處。車輛管理系統(tǒng)的功能基本能夠符合用戶的需求，能夠完成用戶提出的信息管理要求，并提供部分系統(tǒng)維護(hù)功能，使用戶方便進(jìn)行數(shù)據(jù)備份、恢復(fù)、數(shù)據(jù)刪除。但是由于畢業(yè)設(shè)計(jì)時(shí)間較短，所以該系統(tǒng)還有許多不盡如人意的地方，將在日后繼續(xù)完善。參考文獻(xiàn)[1] 劉彬彬、高春艷、孫秀梅 等著，Visual Basic 從入門到精通[M]. 北京:清華大學(xué)出版社，[2] 明日科技、安劍、孫秀梅編著，Visual Basic 數(shù)據(jù)庫系統(tǒng)開發(fā)自學(xué)手冊(cè)[M]. 北京:人民郵電大學(xué)大學(xué)出版社，[3] 許慶芳、翁婉真編著，Visual Basic 6 程序設(shè)計(jì)與應(yīng)用教程[M].北京:清華大學(xué)出版社，[4] 張桂元、 開發(fā)入門與項(xiàng)目實(shí)踐[M].北京:人民郵電出版社，[5] 薩師煊、[M].北京:高等教育出版社，[6] 龍姚淑、[M].北京:電子工業(yè)出版社，[7] [M].重慶:重慶大學(xué)出版社，[8] [M].北京:清華大學(xué)出版社，[9] 張健沛、[M].北京:中國(guó)鐵路出版社，[10] [M].北京:科學(xué)出版社，[11] 張翼英 等著，Visual Basic 課程設(shè)計(jì)[M]. 北京:清華大學(xué)出版社，[12] 胡同森 趙劍鋒 等著， visual 程序設(shè)計(jì)教程 [M]. 浙江科學(xué)技術(shù)出版社，[13] basic 程序設(shè)計(jì)第二版[M]. 清華大學(xué)出版社，2022[14] 史嘉權(quán). 數(shù)據(jù)庫系統(tǒng)概論[M].北京：清華大學(xué)出版社，2022[15] 秦斌 等. visual basic 數(shù)據(jù)庫系統(tǒng)開發(fā)與應(yīng)用 [M]. 中國(guó)水利水電出版社，2022 .1[16] 求是科技. Visual Basic 程序設(shè)計(jì)與開發(fā)技術(shù)[M]. 人民郵電出版社，[17] 陳明. 軟件工程學(xué)教程[M]. 科技出版社，2022[18] 美 Cantu,U. 王輝等譯. visual basic 從入門到精通 [M]. 電子工業(yè)出版社，2022[19] 飛思科技產(chǎn)品研發(fā)中心. visual basic 數(shù)據(jù)庫應(yīng)用開發(fā) [M]. 電子工業(yè)出版社，2022[20] 飛思科技產(chǎn)品研發(fā)中心. visual basic 開發(fā)者手冊(cè)[M]. 電子工業(yè)出版社, 2022