【正文】 ............................... 12 車輛管理模 塊設(shè)計 .................................................................................................. 13 查詢模塊設(shè)計 .......................................................................................................... 15 公司管理模塊設(shè)計 .................................................................................................. 18 用戶管理模塊設(shè)計 .................................................................................................. 20 第五章 系統(tǒng)的測試與維護 ................................................................................................. 21 系統(tǒng)測試的流程 ...................................................................................................... 21 系統(tǒng)的維護 .............................................................................................................. 21 結(jié)論 ....................................................................................................................................... 22 附 錄 ................................................................................................................................. 23 參考文獻 ............................................................................................................................... 29 致 謝 ..................................................................................................................................... 30 出租車信息管理系統(tǒng)畢業(yè)論文 1 第一章 系統(tǒng)概述 題目來源及背景 隨著生產(chǎn)社會化趨勢的擴大、科學(xué)技術(shù)的進步、人類知識總量的增長速度不斷加快、以及市場競爭的日益激烈，人們對信息的認識產(chǎn)生了根本性的變化。 司機和出租車輛是出租車公 司最主要的資源，是創(chuàng)造效益的源泉。 而 出租車服務(wù) 也 是人類現(xiàn)代生活的重要組成部分， 特別是 在大容量公共交通尚沒有建立和完善之前，在許多城市特別是在小城市，出租汽車通常成為城市的重要交通工具，在滿足居民特殊出行需求中發(fā)揮著 重要作用 。 真正實現(xiàn)了減少勞動力提高勞動質(zhì)量的目的。作為一種功能強大的 MIS 系統(tǒng)開發(fā)工具，它具有界面友好，易學(xué)易用，開發(fā)簡單，接口靈活等特點，是一個典型的新一代數(shù)據(jù)管理和信息系統(tǒng)開發(fā)工具。 （ 3）對公司收入支出信息和財產(chǎn)信息進行管理， 為出租車公司提供了一個現(xiàn)代化的管理手段 。出租車信息管理系統(tǒng)功能主要包括車輛管理、公 司管理、報表管理、系統(tǒng)維護等。 ○ 3 完善的數(shù)據(jù)輸入，維護，輸出。設(shè)計數(shù)據(jù)庫系統(tǒng)時應(yīng)該首先充分了解用戶各個方面的需求，包括現(xiàn)有的及將來可能增加的需求。而且該數(shù)據(jù)庫中表的添加、修改、刪除非常方便，與 VB 連接后可直接通過設(shè)計的界面對其進行操作 。買費信息表的結(jié)構(gòu)如圖 44 所示。 圖 48 用戶表 字段名稱 數(shù)據(jù)類型 字段大小 允許空字符串 用戶姓名 文本 20 否 密碼 文本 20 否 用戶類型 文本 8 否 出租車信息管理系統(tǒng)畢業(yè)論文 12 第五章 系統(tǒng)實施 系統(tǒng)登錄窗體設(shè)計 當(dāng)系統(tǒng)運行時，首先打開歡迎窗體，單擊窗體的任意位置進入如下圖所示的登錄界面，只有權(quán)限的用戶才能進入系統(tǒng)。 ② 用戶可以點擊上一條或下一條記錄來選擇要修改或要刪除的記錄，然后單擊【修改】 /【刪除】按鈕對記錄進行修改 /刪除操作。窗口界面如圖 54 所示： 圖 54 司機信息管理 ④ 車輛買票管理 車輛買票管理用于對出租車的買票情況進行登記以及維護，可通 過首記錄、上一條、下一條、末記錄等來查看以及修改操作。窗口界面如下圖 510 所示： 出租車信息管理系統(tǒng)畢業(yè)論文 18 圖 510 買費信息查詢 公司管理模塊設(shè)計 (1) 公司收支管 理 公司收支管理主要是用來記錄出租車公司的各項收入支出，便于公司更好的管理。 對于用戶的刪除，充分考慮了系統(tǒng)安全問題，只有管理員才能對用戶進行刪除，其它用戶只能添加或修改用戶。 系統(tǒng)維護的工 作內(nèi)容 系統(tǒng)維護是面向系統(tǒng)中各種構(gòu)成要素的，根據(jù)維護對象的不同，系統(tǒng)維護的內(nèi)容可分為以下幾類： 1)系統(tǒng)應(yīng)用程序維護。其功能基本符合需求， 實現(xiàn)對車輛買費信息和買票信息的管理、查詢等操作及對司機和車輛檔案的操作，其次還實現(xiàn)了對公司財產(chǎn)信息以及收支信息等幾個方面的管理功能。 出租車信息管理系統(tǒng)畢業(yè)論文 23 附 錄 Moudel1模塊程序代碼： 主程序 main() Set pubCnn = New = adUseClient Provider=。 39。 amp。 If 0 Then On Error Resume Next = (0) = (1) = (2) = (3) = (4) = (5) = (6) = (7) = (8) = (9) End If = False: = False = True: = True = False i = 2 “刪除”代碼： If = Then MsgBox 沒有要刪除的記錄 !, vbExclamation 出租車信息管理系統(tǒng)畢業(yè)論文 25 ElseIf MsgBox(您確實要刪除記錄嗎？ , vbOKCancel, 系統(tǒng)提示 ) = vbOK Then MsgBox 記錄已刪除！ , , 系統(tǒng)提示 End If “保存”代碼： On Error Resume Next Dim rs As New Select Case i Case 1 If Text1 = Then MsgBox 車牌號不能為空 , , 系統(tǒng)提示 Exit Sub Else Set rs = (select * from 車輛信息表 where 車牌號 =39。,39。,39。,39。,39。,39。,車輛型號 =39。,顏色 =39。,底盤號 =39。,計價器號 =39。,備注 =39。Persist Security Info=False = adUseClient = adCmdText = select distinct 車牌號 from 車輛信息表 On Error Resume Next Set rs = (select distinct 車牌號 from 車輛信息表 ) Do (0) Loop Until Set rs = (select distinct 車輛型號 from 車輛信息表 ) Do (0) Loop Until = = “查詢”代碼： Dim sql As String Dim scp As String If Then scp = 車牌號 like 39。 amp。%39。 \ amp。 。) MsgBox 記錄已刪除！ , , 系統(tǒng)提示 = = = = 系統(tǒng)初始化代碼： If MsgBox(執(zhí)行該命令將清空數(shù)據(jù)庫里所有記錄 ,確實要執(zhí)行嗎 ?, vbOKCancel) = vbOK Then (delete from 車輛信息表 ) (delete from 員工信息表 ) (delete from 買票信息 ) (delete from 買費信息 ) (delete from 公司收支表 ) (delete from 公司財產(chǎn)表 ) 出租車信息管理系統(tǒng)畢業(yè)論文 29 參考文獻 [1]亓萊濱 .Visual Basic 程序設(shè)計 [M].北京 :清華大學(xué)出版社 . [2]劉瑞新 . Visual Basic 實用教程 [M] .北京 :電子工業(yè)出版 社 .2020 [3]馬威 .Access2020 實用培訓(xùn)教程 [M].北京 :清華大學(xué)出版社 .2020 [4]孫秀梅 .Visual Basic 數(shù)據(jù)庫系統(tǒng)開發(fā) [M].北京 :人民郵電出版社 .2020 出租車信息管理系統(tǒng)畢業(yè)論文 30 致 謝 值此本科學(xué)位論文完成之際，首先要感謝我的導(dǎo)師 ***老師。 。焦點返回用戶框 出租車信息管理系統(tǒng)畢業(yè)論文 28 Exit Sub End If End With = = = = “刪除用戶”代碼： Dim str As String str = InputBox$(請輸入用戶名： , 系統(tǒng)提示 ) If str = Then Exit Sub If MsgBox(確實要刪除這條記錄嗎？ , vbOKCancel, 系統(tǒng)提示 ) = vbOK Then On Error Resume Next (delete from 用戶表 where 用戶姓名