【文章內(nèi)容簡(jiǎn)介】 DoDrag Me End Sub Private Sub imgTitleClose_Click() Unload Me End Sub Private Sub Toolbar1_ButtonClick(ByVal Button As ) Select Case Case 1 39。39。前進(jìn) If = True Then End If Case 2 39。39。后退 If = True Then End If Case 4 39。39。增加 On Error GoTo add_error add_error: If = 3426 Then MsgBox 已經(jīng)使用過添加記錄！ 錯(cuò)誤： amp。 Err amp。 ， amp。 , 0, 提示 Unload Me End If (1).Visible = False (2).Visible = False (4).Visible = False (5).Visible = True (6).Visible = True (7).Visible = False Case 5 39。39。確定 On Error GoTo update_error If = Then MsgBox 必須填寫售電員！ , 0, 提示 Exit Sub End If update_error: If = 3020 Then MsgBox 請(qǐng)先添加記錄！ 錯(cuò)誤： amp。 Err amp。 ， amp。 , 0, 提示 Unload Me End If (1).Visible = True (2).Visible = True (4).Visible = True (5).Visible = True (6).Visible = True (7).Visible = True Case 6 39。39。取消 On Error GoTo CanceErr (1).Visible = True (2).Visible = True 畢業(yè)論文 14 (4).Visible = True (5).Visible = True (6).Visible = True (7).Visible = True CanceErr: If = 3021 Then MsgBox 沒有記錄！ 錯(cuò)誤： amp。 Err amp。 ， amp。 , 0, 提示 End If Case 7 39。39。刪除 On Error GoTo del_error Dim a a = MsgBox( 真 的 刪 除 嗎 ？ , vbExclamation + vbOKCancel + vbApplicationModal, 刪除記錄 ) If a = 1 Then End If If a = 2 Then Exit Sub del_error: If = 3426 Then MsgBox 已經(jīng)全部刪除！ 錯(cuò)誤： amp。 Err amp。 ， amp。 , 0, 提示 Unload Me End If End Select End Sub畢業(yè)論文 15 本系統(tǒng)雖然數(shù)據(jù)字典復(fù)雜，頁(yè)面窗口眾多， 但是各窗口都基本包括添加、刪除、保存、取消等主要功能結(jié)構(gòu)。在以上的篇幅中，已經(jīng)對(duì)員工管理的功能結(jié)構(gòu)和數(shù)據(jù)窗口用法進(jìn)行了詳細(xì)的敘述，為了避免重復(fù)和篇幅的限制，在以下的篇幅中，就不再一一細(xì)述其他的頁(yè)面具體功能的實(shí)現(xiàn)。其供應(yīng)管理、客戶管 理、產(chǎn)品分類管理、產(chǎn)品管理等四個(gè)主要功能模塊的布局與實(shí)現(xiàn)過程與員工管理模塊相似，所以就不再詳細(xì)敘述。 、實(shí)現(xiàn)入庫(kù)操作 入庫(kù)管理窗口主要實(shí)現(xiàn)產(chǎn)品的入庫(kù)管理及入庫(kù)單據(jù)的打印等操作。具體實(shí)現(xiàn)過程及源代碼略。 、實(shí)現(xiàn)出庫(kù)操作 出庫(kù)管理窗口主要實(shí)現(xiàn)產(chǎn)品的出庫(kù)管理及出庫(kù)單據(jù)的打印等操作。具體實(shí)現(xiàn)過程及源代碼略。 、實(shí)現(xiàn)報(bào)表打印輸出 本窗口主要實(shí)現(xiàn)數(shù)據(jù)報(bào)表檢索的打印與執(zhí)行功能，其具體實(shí)現(xiàn)過程及源代碼略。 、程序調(diào)試、編譯與發(fā)行 、程序調(diào)試 應(yīng)用程序的調(diào)試對(duì)于編程來說是一項(xiàng)非常重要的工作 。 Visual Basic 為程序的調(diào)試提供了三個(gè)窗：“立即”窗口、“本地”窗口和“監(jiān)視”窗口?？梢栽谠O(shè)計(jì)時(shí)、運(yùn)行時(shí)或中斷狀態(tài)時(shí)使用“視圖”萊單中的“立即窗口”、“本地窗口”和“監(jiān)視窗口”三個(gè)萊單打開這三個(gè)窗口。它們的默認(rèn)位置在 Visual Basic 集成環(huán)境的底部，與集成環(huán)境中的其它窗口（如屬性窗口）一樣，它們可以是“連接的”或是“浮動(dòng)的”，它們的位置可以變動(dòng)。單擊窗口右上角的關(guān)閉按鈕，可以關(guān)閉這個(gè)窗口。 、創(chuàng)建可執(zhí)行文件 Visual Basic 一般生成的是單個(gè)的可執(zhí)行文件，可以使用 任何一種在 Windows 下執(zhí)行常規(guī)可執(zhí)行文件的方法來執(zhí)行它。可執(zhí)行文件的運(yùn)行不再需要工程文件與各個(gè)模塊文件，但是需要有 Visual Basic 運(yùn)行時(shí)動(dòng)態(tài)鏈接庫(kù)文件（ .dll）的支持。一臺(tái)安裝了 Visual Basic 的計(jì)算機(jī)中會(huì)有所需要的動(dòng)態(tài)鏈接庫(kù)文件。如果要在沒有安裝過 Visual basic 的計(jì)算機(jī)上運(yùn)行，最好使用 Visual Basic 的安裝盤生成程序來制作安裝盤。對(duì)于比較復(fù)雜的應(yīng)用程序，除了單個(gè)的可執(zhí)行文件外，可能還需要其它類型的文件支持，具體情況各不相同。編譯生成可執(zhí)行文件之后，工程中所 有的文件（源程序）都要妥善保存，以便于程序的升級(jí)與功能的擴(kuò)充。 、安裝程序的制作 本系統(tǒng)作用“ Microsoft Visual Basic 中文版工具”中自帶的“ Package amp。 Deployment 畢業(yè)論文 16 向?qū)А眮碇谱靼惭b程序 . 、系統(tǒng)的發(fā)展方向 當(dāng)前 , 隨著經(jīng)濟(jì)的全球化以及中國(guó)經(jīng)濟(jì)改革的逐漸深化，制造業(yè)面臨著越來越激烈的競(jìng)爭(zhēng)，改善企業(yè)內(nèi)部以及整個(gè)供應(yīng)鏈各個(gè)環(huán)節(jié)的管理、調(diào)度及資源配置，迅速適應(yīng)客戶的新需求和市場(chǎng)新機(jī)遇的能力，是中國(guó)企業(yè)贏得競(jìng)爭(zhēng)勝利的決定性因素 。設(shè)計(jì)本系統(tǒng)正是為了適應(yīng)這種 形勢(shì)。在有限的時(shí)間內(nèi)憑個(gè)人之力是很難實(shí)現(xiàn)所有的功能。因此系統(tǒng)有基本目標(biāo)和長(zhǎng)遠(yuǎn)目標(biāo)。系統(tǒng)設(shè)計(jì)基本的目標(biāo)是盡可能實(shí)現(xiàn)物流控制自動(dòng)化，長(zhǎng)遠(yuǎn)目標(biāo)是實(shí)現(xiàn) ERP 管理。 、系統(tǒng)運(yùn)行環(huán)境 操作系統(tǒng)要求 Microsoft Windows 95 或以上版本、 CPU 為 Inter Pentium（奔騰） 90Hz 或更高的處理器、一個(gè) CDROM 光盤驅(qū)動(dòng)器、 Microsoft Windows 支持的 VGA 或分辨率更高的監(jiān)視器、鼠標(biāo)或其它定點(diǎn)設(shè)備 ,硬盤空間要求 20MB 以上空間 結(jié) 論 通過系統(tǒng)的開發(fā)，我對(duì)軟件開發(fā)過程 有了更清晰的了解，首先是問題定義、需求分析，然后是功能設(shè)計(jì)、詳細(xì)設(shè)計(jì)等，并對(duì)軟件測(cè)試的方法、手段有了較深的理解，同時(shí)對(duì)制造業(yè)的流程有了一個(gè)系統(tǒng)的認(rèn)識(shí)。在開發(fā)過程還認(rèn)真學(xué)習(xí)了與系統(tǒng)相關(guān)的知識(shí)，極大地拓寬了我畢業(yè)論文 17 的知識(shí)面 ,我感到收獲不小。 在系統(tǒng)的開發(fā)初期，必須要熟悉企業(yè)的管理流程，初步了解 ERP的相關(guān)知識(shí)，這樣才能進(jìn)入到設(shè)計(jì)的過程中去。從開始熟悉這些知識(shí)到對(duì)整體設(shè)計(jì)有了解，再?gòu)母乓O(shè)計(jì)、詳細(xì)設(shè)計(jì)到開始編碼，以及最后的測(cè)試，整個(gè)過程感覺很充實(shí)，雖然遇到了不少困難，但當(dāng)我通過自己查資料、或是向指導(dǎo)老師請(qǐng)教以及向同事請(qǐng) 教，而設(shè)計(jì)出解決方案并成功實(shí)現(xiàn)時(shí)，那種成就感和滿足感足以鼓勵(lì)自己加班加點(diǎn)的辛苦。 因?yàn)橐郧坝羞^使用 Visual Basic設(shè)計(jì)管理軟件的經(jīng)驗(yàn)，在這次設(shè)計(jì)的過程中，我遇到專業(yè)知識(shí)方面的困難不是非常多，主要困難集中在管理知識(shí)、財(cái)務(wù)知識(shí)等方面的不足上。尤其是財(cái)務(wù)方面的知識(shí)，比如按月加權(quán)平均算法的實(shí)現(xiàn)，怎樣處理材料收發(fā)存金額計(jì)算的誤差等，在實(shí)際的開發(fā)中我深刻的體會(huì)到了自己做畢業(yè)設(shè)計(jì)和實(shí)際客戶的要求之間的距離，比如金額問題，一般存儲(chǔ)單價(jià)保存小數(shù)點(diǎn)后 4位即可，精確一點(diǎn)的保存到 6位，但是不管是四位還是六位，當(dāng)數(shù)據(jù)達(dá)到萬或 十萬時(shí)，總帳和明細(xì)帳之間必然會(huì)產(chǎn)生誤差，而財(cái)務(wù)上要求的是一份錢都不能差，這是我當(dāng)時(shí)遇到的最束手無策問題，整整查了兩天的有關(guān)于財(cái)務(wù)做帳的規(guī)定及特殊情況的處理知識(shí)，又和項(xiàng)目主管進(jìn)行了詳細(xì)的討論之后才使這個(gè)問題得以解決。 還有就是操作界面的方面問題，盡管在設(shè)計(jì)的過程中，我們時(shí)刻考慮到了操作界面的友好性，但實(shí)際情況是遠(yuǎn)遠(yuǎn)不能滿足客戶的要求，考慮到軟件使用群體將是一群幾乎沒有任何電腦操作經(jīng)驗(yàn)的人，我們正在考慮設(shè)計(jì)出一種傻瓜式的界面。 經(jīng)過這 3個(gè)月的畢業(yè)設(shè)計(jì)實(shí)習(xí)，確實(shí)學(xué)到了不少的東西，同時(shí)也深感自己知識(shí)的欠缺。雖然即將 畢業(yè)，但在以后的學(xué)習(xí)工作中，一定要繼續(xù)堅(jiān)持不段地學(xué)習(xí)新興的專業(yè)知識(shí)及相關(guān)的非專業(yè)知識(shí)，只有這樣才能緊跟時(shí)代的潮流。 參考文獻(xiàn) ? 《 Visual Basic 數(shù)據(jù)庫(kù)系統(tǒng)開發(fā)實(shí)例導(dǎo)航》―邵洋 谷宇 何旭洪 編著 人民郵電出版社 ? 《 Visual Basic 實(shí)用程序 100 例》 人民郵電出版社 ? 《 Visual Basic 應(yīng)用基礎(chǔ)于面向?qū)ο蟪绦蛟O(shè)計(jì)教程》 李雁翎 編 高等教育出版社 ? 《數(shù)據(jù)庫(kù)技術(shù)》 羅曉沛 主編 清華大學(xué)出版社 ? 《從零開始 SQL Server 中文版基礎(chǔ)培訓(xùn)教程》 人民郵電 出版社 ? Roger S. Pressman 《軟件工程 —— 實(shí)踐者的研究方法》機(jī)械工業(yè)出版社， 1997 ? Karl E. Wingers 《軟件需求》機(jī)械工業(yè)出版社， 1999 ? 張海藩《軟件工程導(dǎo)論》清華大學(xué)出版社 附 錄 畢業(yè)論文 18 數(shù)據(jù)字典 附錄： 圖 1 員工數(shù)據(jù)結(jié)構(gòu) 圖 6 入庫(kù)數(shù)據(jù)結(jié)構(gòu) 圖 2 客戶數(shù)據(jù)表結(jié)構(gòu) 圖 7 出庫(kù)數(shù)據(jù)表結(jié)構(gòu) 圖 5 產(chǎn)品數(shù)據(jù)表結(jié)構(gòu) 圖 3 供應(yīng)管理數(shù)據(jù)表結(jié)構(gòu) 圖 4 產(chǎn)品管理數(shù)據(jù)表結(jié)構(gòu) 畢業(yè)論文 19 開發(fā)環(huán)境簡(jiǎn)介 1 系統(tǒng)的開發(fā) 編程環(huán)境的選擇 微軟公司的 Visual Basic 是 Windows 應(yīng)用程序開發(fā)工具，使目前最為廣泛的、易學(xué)易用的面 向?qū)ο蟮拈_發(fā)工具。 Visual Basic 提供了大量的控件，這些控件可用于設(shè)計(jì)界面和實(shí)現(xiàn)各種功能，減少了編程人員的工作量，也簡(jiǎn)化了界面設(shè)計(jì)過程，從而有效的提高了應(yīng)用程序的運(yùn)行效率和可靠性。故而，實(shí)現(xiàn)本系統(tǒng) VB 是一個(gè)相對(duì)較好的選擇。 關(guān)系型數(shù)據(jù)庫(kù)的實(shí)現(xiàn) Access2021 就是關(guān)系數(shù)據(jù)庫(kù)開發(fā)工具，數(shù)據(jù)庫(kù)能匯集各種信息以供查詢、存儲(chǔ)和檢索。 Access 的優(yōu)點(diǎn)在于它能使用數(shù)據(jù)表示圖或自定義窗體收集信息。數(shù)據(jù)表示圖提供了一種類似于 Excel 的電子表格，可以使數(shù)據(jù)庫(kù)一目了然。另外，Access 允許創(chuàng)建自定義報(bào)表用于打印或輸出數(shù)據(jù)庫(kù)中的信息。 Access 也提供了數(shù)據(jù)存儲(chǔ)庫(kù)，可以使用桌面數(shù)據(jù)庫(kù)文件把數(shù)據(jù)庫(kù)文件置于網(wǎng)絡(luò)文件服務(wù)器，與其他網(wǎng)絡(luò)用戶共享數(shù)據(jù)庫(kù)。 Access 是一種關(guān)系數(shù)據(jù)庫(kù)工具，關(guān)系數(shù)據(jù)庫(kù)是已開發(fā)的最通用的數(shù)據(jù)庫(kù)之一。如上所述， Access 作為關(guān)系數(shù)據(jù)庫(kù)開發(fā)具備了許多優(yōu)點(diǎn)，可以在一個(gè)數(shù)據(jù)包中同時(shí)擁有桌面數(shù)據(jù)庫(kù)的便利和關(guān)系數(shù)據(jù)庫(kù)的強(qiáng)大功能。 二者的結(jié)合（ ADO） 微軟的 JET 數(shù)據(jù)庫(kù)引擎提供了與數(shù)據(jù)庫(kù)打交道的途徑，們是通過它以及Visual Basic 來訪問數(shù)據(jù)庫(kù)并對(duì)其進(jìn)行各種操作 。 Visual Basic、 Access 以及其他微軟的軟件產(chǎn)品都是通過共用 JET 數(shù)據(jù)庫(kù)引擎，從而給用戶提供了豐富的數(shù)據(jù)類型。 ADO 控件在數(shù)據(jù)庫(kù)中的信息與將信息顯示給用戶看的 Visual Basic 程序之間架起了一座橋梁。們可以設(shè)置 ADO 控件的各個(gè)屬性，告訴它要調(diào)用那個(gè)數(shù)據(jù)庫(kù)的哪個(gè)部分。缺省情況下， ADO 控件根據(jù)數(shù)據(jù)庫(kù)中的一個(gè)或多個(gè)數(shù)據(jù)表建立一個(gè)dynasettype（動(dòng)態(tài)集合）類型的記錄集合。一個(gè)記錄集合是動(dòng)態(tài)的也就意味著，當(dāng)原來的數(shù)據(jù)表中的容改變了以后，該記錄集合中的記錄也會(huì)隨之改變。 ADO 控件還提供了用來瀏覽不同記錄的各種跳轉(zhuǎn)按鈕。將 ADO 控件放置在窗體中之后，們還必須在該控件與要處理的數(shù)據(jù)庫(kù)之間建立聯(lián)系。 畢業(yè)論文 20 ADO（ ActiveX Data Objects）是基于組件的數(shù)據(jù)庫(kù)編程接口，它是一個(gè)和編程語(yǔ)言無關(guān)的 COM 組件系統(tǒng)。本文主要介紹用 ADO 編程所需要注意的技巧和在VC 下進(jìn)行 ADO 編程的模式，并對(duì) C＋＋ Extensions 進(jìn)行了簡(jiǎn)單的討論，希望對(duì)ADO 開發(fā)人員有一定的幫助作用。因?yàn)?ADO 是一個(gè)和編程語(yǔ)言無關(guān)的 COM 組件系統(tǒng)，所以這里討論的要點(diǎn)適用于所有的編程語(yǔ)言和編程環(huán)境，比如： VB、 VBScript、VC、 Ja