【導(dǎo)讀】生產(chǎn)效率以外的重要利潤空間，在國民經(jīng)濟和社會發(fā)展中負擔(dān)著重要作用。中國經(jīng)濟體制以及經(jīng)濟增長方式的兩個根本性轉(zhuǎn)變，具有十分重要的意義。流通、商品交易以及管理方式正在并會繼續(xù)發(fā)生深刻的變革。地、系統(tǒng)地、整體地去考慮，因而未能發(fā)揮其系統(tǒng)的總體優(yōu)勢。供應(yīng)鏈物流的地域和時間跨。南通市威馳物流公司開發(fā)設(shè)計的。該公司承擔(dān)全國范圍內(nèi)的零擔(dān)整車運輸，公司所在地在蘇。州太倉雙鳳，204國道邊。公司零擔(dān)運輸有兩輛公司所屬車，還有外面叫的車6至7輛，共。有員工30多人，零擔(dān)運輸主體是PP塑料設(shè)備，大多數(shù)是從太倉提貨，然后整理后發(fā)往上海，整車運輸基本是從上海、無錫找車，根據(jù)客戶要求，在上海、無錫辦事處招募車輛，然后派車到廠裝取貨物。在小型物流公司中，因為現(xiàn)在江蘇省內(nèi)上海、無錫兩地發(fā)達的物流。園區(qū)的建設(shè)，導(dǎo)致了各個專線的多量化，專線發(fā)車的頻率的快速化。另外，由于現(xiàn)在各地小。兩輛車子上，然后送往專線發(fā)貨。

　　

【正文】 。 中國礦業(yè)大學(xué) 20xx 屆本科生畢業(yè)設(shè)計（論文） 第 18 頁 圖 12 更改運單表單查詢 8．新增客戶 新建新增客戶表單如圖 13，用來新增加物流系統(tǒng)的客戶管理，在該表單中，可以輸入客戶的各種信息，包括姓名、性別、工作單位、聯(lián)系電話、手機號碼、傳真、聯(lián)系地址和備注等信息。錄入新增客戶的各項信息，以便工作的不時之需。 圖 13 新增客戶表單 9．查看客戶 新建查看客戶表單如圖 13，用來查看、修改和刪除客戶信息，在該表單中，通過各個功能按鈕，完成對客戶信息的查詢、修改和刪除等操作。在下面的列表中可以方便的查看客戶的各種信息。中國礦業(yè)大學(xué) 20xx 屆本科生畢業(yè)設(shè)計（論文） 第 19 頁 圖 14 查看客戶表單 新建修改客戶表單如圖 15，來修改客戶信息，通過這個表單，可以對已經(jīng)存在的客戶信息進行修改。修改后點擊修改按鈕，就可以保存客戶的修改信息了。 圖 15 修改客戶表單 新建結(jié)算管理表單如圖 16，用來管理物流系統(tǒng)業(yè)務(wù)的結(jié)算信息。在這個表單中，通過查詢按鈕可以彈出查詢信息表單，查詢結(jié)算信息。點擊單條預(yù)覽按鈕可以對信息單條預(yù)覽。單條打印按鈕則彈出 word 文檔的單條管理記錄，可以供用戶打印單條信息。全部預(yù)覽和全部打印則是對信息的全部瀏覽和全部信息的打印處理。中國礦業(yè)大學(xué) 20xx 屆本科生畢業(yè)設(shè)計（論文） 第 20 頁 圖 16 結(jié)算管理表單 新建車輛信息表單如圖 17，用來管理物流系統(tǒng)，所有經(jīng)過的車輛信息，在這個表單中，輸入車輛的負責(zé)人、車牌號、車型、負責(zé)人聯(lián)系方式，并包括新增、修改和刪除車輛信息 。 圖 17 車輛管理表單 新建司機信息表單如圖 18，用來管理物流系統(tǒng)，所有經(jīng)過的司機信息，在這個表單中，輸入司機姓名、駕駛證號、駕照類型、聯(lián)系方式，并包括駕駛員的新增、修改和刪除中國礦業(yè)大學(xué) 20xx 屆本科生畢業(yè)設(shè)計（論文） 第 21 頁 圖 18 司機信息表單 新建品名信息表單如圖 19，用來管理系統(tǒng)的品名設(shè)置，通過這個表單，可以對物流管理系統(tǒng)中，所有接待的物品品名進行提前設(shè)置，可以方便用戶在添加運單管理時對貨運信息的輸入。 圖 19 品名信息表單中國礦業(yè)大學(xué) 20xx 屆本科生畢業(yè)設(shè)計（論文） 第 22 頁 新建修改密碼表單如圖 20，用來修改用戶密碼。在這個表單中，對系統(tǒng)登陸用戶的密碼進行修改和設(shè)置。 圖 20 修改密碼表單 新建匯總管理表單如圖 21，用來匯總結(jié)算信息，在該表單中，通過上部的各個功能按鈕對運單進行結(jié)算功能、預(yù)覽功能和打印功能的管理。根據(jù)代碼來實現(xiàn)從程序中直接打開文檔，方便查閱與打印信息，可以更好的來公司的會計審核賬目。 圖 21 匯總結(jié)算表單 中國礦業(yè)大學(xué) 20xx 屆本科生畢業(yè)設(shè)計（論文） 第 23 頁 新建退出系統(tǒng)表單如圖 22，用來結(jié)束程序的運行。 圖 22 退出系統(tǒng)表單 并通過下列代碼來確定是否退出系統(tǒng)的設(shè)定。 Private Sub ExitSystem_Click() Dim MyVar MyVar = MsgBox(確認(rèn)退出？ , vbOKCancel, 信息提示 ) If MyVar = vbOK Then End End If End Sub Private Sub MDIForm_Load() = 歡迎使用物流管理系統(tǒng) = * = * = * = * End Sub Private Sub MDIForm_Unload(Cancel As Integer) 39。關(guān)閉所有窗體 Unload frmBillManage Unload frmChangePassword Unload frmClient Unload frmClientAdd Unload frmClientUpdate Unload frmLogin Unload frmProduct中國礦業(yè)大學(xué) 20xx 屆本科生畢業(yè)設(shè)計（論文） 第 24 頁 Unload frmQuery Unload frmReport Unload frmsiji1 Unload frmTraffic Unload frmTrafficAdd Unload frmTrafficUpdate End Sub Private Sub ParticularPrint_Click() End Sub Private Sub ProductManage_Click() End Sub Private Sub ReportPrint_Click() End Sub Private Sub StationManage_Click() End Sub Private Sub sijixinxi_Click() End Sub Private Sub TrafficAdd_Click() End Sub Private Sub TrafficView_Click() End Sub中國礦業(yè)大學(xué) 20xx 屆本科生畢業(yè)設(shè)計（論文） 第 25 頁 第五章 總 結(jié) 在對物流管理系統(tǒng)設(shè)計開始這前，本人對此了解不是很多，在老師和同學(xué)的幫助下，慢慢對物流管理系統(tǒng)有了一定了解。物流是專門的一門課程，在現(xiàn)代的物流概念中已經(jīng)延伸為一門特殊的學(xué)問。想要對他進行深入的學(xué)習(xí)還是需要花費很多精力的。在對物流認(rèn)識后，我們按照軟件工程的生命周期方法學(xué)來完成設(shè)計，并根據(jù)軟件工程的設(shè)計思想逐步完成了物流管理系統(tǒng)。短短三個月的設(shè)計和開發(fā)過程中遇到很多的問題，自己經(jīng)過不斷學(xué)習(xí)的過程中我體會到： 1． 從設(shè)計初的不懂到最后能夠順利完成，我體會到在實踐中學(xué)習(xí)的重要性。經(jīng)過這次的實習(xí)使我能夠完整地做出了一個系統(tǒng)。讓我更深入理解開發(fā)一個系統(tǒng)的重要性。 2．在設(shè)計過程中，遇到不懂的問題我會利用上網(wǎng)跟大家交流。這樣使我很快地解決問題。 總之，在這次的畢業(yè)設(shè)計中，使我深刻體會到要做好一個完整的事情，需要有系統(tǒng)的思維方式和方法，對待一個新的問題，要耐心、要善于運用已有的資源來充實自己。同時我也深刻的認(rèn)識到，在對待一個新事物時，一定要從整體考慮，完成一步之后再作下一步，這樣對于系統(tǒng)而言才能更加有效。通過此次畢業(yè)設(shè)計，我不 但對 vb 和數(shù)據(jù)庫設(shè)計開發(fā)有了深刻的認(rèn)識，積累了使用軟件工程的思想來開發(fā)軟件的經(jīng)驗，同時最重要的是摸索出了一套考慮問題和解決問題的方法 . 這對于我將來走上工作崗位受益匪淺。 中國礦業(yè)大學(xué) 20xx 屆本科生畢業(yè)設(shè)計（論文） 第 26 頁 參考文獻 : [1] Ashwin Amanna. Overview of IntelliDrive / Vehicle Infrastructure Integration (VII). ― [2] Achieving the Vision: From VII to IntelliDrive. ― [3] Xu, Q., T. Mak, J. Ko, and et al. Layer2 protocol design for vehicle safety munications in dedicated short range munications spectrum[J]. 7th IEEE Intelligent Transportation Systems Conference, Washington, ., 20xx, –1097. [4] Chisalita, L., and N. Shahmehri. A peertopeer approach to vehicular munication for the support of traffic safety application[J]. 5th IEEE Intelligent Transportation Systems Conference, Singapore, 20xx, –341. [5] FleetNet Homepage. FleetNet Inter on the road. August 1, 20xx.―‖. [6] A. Avila, G. Korkmaz, Y. Liu, and et al. A plete simulator architecture for intervehicle munication based intersection warning system[J]. 8th IEEE Intelligent Transportation Systems Conference, Vienna, Austria, 20xx, –466. [7] Yin, J., T. Elbatt, G. Yeung, and et al. Performance evaluation of safety applications over DSRC vehicular ad hoc works[J].1st ACM Workshop on Vehicular Ad hoc Networks, Philadelphia, Pennsylvania, 20xx, –9. [8] 吳功宜 . 計算機網(wǎng)絡(luò) [M]. 北京：清華大學(xué)出版社 ,20xx. [9] 交通部公路科學(xué)研究院 . 公路通行能力手冊 [S]. 北京 , 20xx. [10] 李蓬 . 基于 NS2 的局域網(wǎng)性能仿真 [J]. 電腦與信息技術(shù) ,20xx,16(01):1618. [11] 財團法人工業(yè)技術(shù)研究院 . 經(jīng)濟部標(biāo)準(zhǔn)檢驗局 99 年度委辦計劃期末成果報告 IEEE 際標(biāo)準(zhǔn) [R].車載通訊網(wǎng)絡(luò)國際標(biāo)準(zhǔn)制定方向研究報告 .20xx 年 . [12] 王協(xié)源 . 在事件層平行方法下 NCTUns 網(wǎng)絡(luò)仿真器的效能量測 [D]. 國立交通大學(xué) , 20xx. [13] 霍紅 . 第三方物流企業(yè)經(jīng)營與管理 [M]. 北京：中國物資出版社， 20xx 年 3 月第 2 版 . [14] 杜彥華等 .物流管理信息系統(tǒng) [M].北京：北京大學(xué)出版社， 20xx 年 1 月第 1 版 . [15] 張傳玉 .物流信息管理 [M]. 北京：北京大學(xué)出版社， 20xx 年 8 月第 1 版 . [16] 朱長征 .區(qū)域物流信息化建設(shè)方案研究 [D].西安：長安大學(xué)， 20xx. [17] 霍紅，宋永超 .黑龍江省服務(wù)服務(wù)體系現(xiàn)狀分析 [J].物流技術(shù)， 20xx， [18] 栗東生 .關(guān)于區(qū)域物流信息公共平臺建設(shè)的研究 [J].中國科技信息 .20xx， [19] 童明榮 ,周藍藍 .城市物流公共信息平臺的政府主導(dǎo)型發(fā)展模式研究 [J].物流技術(shù)， 20xx， . [20] 趙英姝 ,吳占坤 ,胡銳 .哈大齊工業(yè)走廊共用物流信息平臺構(gòu)建研究 [J].技術(shù)經(jīng)濟與管理研究， 20xx, 中國礦業(yè)大學(xué) 20xx 屆本科生畢業(yè)設(shè)計（論文） 第 27 頁 附錄：代碼清單 各個功能模塊具體代碼： FRMLOGIN Private Sub cmdCancel_Click() LoginSucceeded = False Unload Me End Sub Private Sub cmdOK_Click() If trycount = 5 Then If (Trim(txtUserName) = ) Or (Trim(txtPassword) = ) Then trycount = trycount + 1 MsgBox 用戶名密碼不能為空 !, , 信息提示 Else Dim strsql As String Dim rs As New strsql = SELECT PASSWORD FROM MYUSERS WHERE USERNAME = 39。 amp。 Trim(txtUserName) amp。 39。 Set rs = (strsql) If Not ( Or ) Then If Trim(txtPassword) = (PASSWORD) Then trycount = 0 LoginSucceeded