【導(dǎo)讀】高企業(yè)管理效率而設(shè)計(jì)的。它完全取代了原來(lái)一直用人工管理的工作方式，避免了由于管。管理提供了強(qiáng)有力的工具和管理手段。倉(cāng)庫(kù)管理系統(tǒng)是一個(gè)中小型數(shù)據(jù)庫(kù)管理系統(tǒng)，它界。面美觀、操作簡(jiǎn)單、安全性高，基本滿足了倉(cāng)庫(kù)管理的要求。整個(gè)系統(tǒng)由基本管理、查詢。統(tǒng)計(jì)、報(bào)表打印、維護(hù)設(shè)置、幫助等模塊組成。本系統(tǒng)是在以ACCESS2020作為后臺(tái)數(shù)據(jù)庫(kù)，以VisualBasic為編程語(yǔ)言來(lái)開發(fā)的。

　　

【正文】 。 4) 單擊“按鈕”選項(xiàng)卡，“屬性頁(yè)”對(duì)話框?qū)⒊霈F(xiàn)按鈕的一些屬性，單擊“插入”按鈕后，“索引”文本框中出現(xiàn)數(shù)字 1，其它輸入框也變?yōu)榭捎?。這樣就可以設(shè)置其上的屬性。若“圖像”輸入框設(shè)為 1，即 ImageList 控件的第一個(gè)圖形作為按鈕 1 的圖形。重復(fù)上述步驟，添加其它按鈕到工具欄上，并設(shè)置相應(yīng)屬性。 22 第五章 系統(tǒng) 實(shí)現(xiàn) 數(shù)據(jù)庫(kù)實(shí)現(xiàn) 連接數(shù)據(jù)庫(kù) 在進(jìn)行系統(tǒng)開發(fā) 前 ，一個(gè)很重要的步驟就是建立數(shù)據(jù)庫(kù)的連接，即訪問(wèn)數(shù)據(jù)庫(kù)。 VB6提供了多種方式訪問(wèn)數(shù)據(jù)庫(kù)，其中以 ODBC 與 ADO 應(yīng)用最多。具體 ODBC 及 ADO 詳見相關(guān)理論部分。本系統(tǒng)采用 ADO 方式訪問(wèn)數(shù)據(jù)庫(kù)。 ADO 數(shù)據(jù)庫(kù)連接主要分兩步進(jìn)行：一是引用 ADO，二是使用 ADO 連接數(shù)據(jù)庫(kù)。 1. 引用 ADO 在 VB6 菜單“工程” “引用”從中選擇 Microsoft ActiveX Data objects library 和 Microsoft ActiveX Data objects recordset 兩個(gè)組件，這是在連接數(shù)據(jù)庫(kù)前所必做的工作。 2. 使用 ADO 連接數(shù)據(jù)庫(kù) 本系統(tǒng) 采用的是無(wú)源的數(shù)據(jù)庫(kù)連接方法 ，因?yàn)檎麄€(gè)系統(tǒng)都會(huì)使用到這個(gè)數(shù)據(jù)庫(kù)，所以將數(shù)據(jù)庫(kù)的連接定義為全局變量。 Public Cn As New ‘定義數(shù)據(jù)源 Dim db_path As String ‘用于存放數(shù)據(jù)庫(kù)的路徑 Dim db_ As String ‘連接數(shù)據(jù)源字符串 db_path = amp。 \Data\ ‘指定數(shù)據(jù)庫(kù)文件 db_ = Provider=。Data Source= amp。 db_path amp。 。Jet OLEDB:database password=123321。 ‘?dāng)?shù)據(jù)庫(kù)連接字符串 db_ ‘打開數(shù)據(jù)源 建立數(shù)據(jù)表 本系統(tǒng)采用了 Access 作為數(shù)據(jù)庫(kù)管理系統(tǒng)。先啟動(dòng) Access2020 程序，然后創(chuàng)建名為“ WMS”的數(shù)據(jù) 庫(kù)。并為此數(shù)據(jù)庫(kù)設(shè)置密碼。在數(shù)據(jù)庫(kù)中建立各表。 系統(tǒng)模塊 基本管理模塊 基本管理模塊主要包括： ? 入庫(kù)管理 ? 出庫(kù)管理 ? 交接班 23 ? 修改個(gè)人密碼 ? 退出 1. 創(chuàng)建入庫(kù)信息窗體 入庫(kù)信息是采購(gòu)人員購(gòu)買貨物時(shí)所填寫的，是為了完成貨物的正確入庫(kù)才用到的。在新增入庫(kù)單窗體中 貨物編號(hào) 、導(dǎo)電情況、硬度 均可通過(guò)單擊相關(guān)的數(shù)據(jù)框來(lái)選擇 ， 數(shù)據(jù)選擇框會(huì)進(jìn)行動(dòng)態(tài)智能化統(tǒng)計(jì)信息 ， 使選擇更方便 ， 如圖 51 所示。 圖 51 入庫(kù)操作 界面 出庫(kù)信息是倉(cāng)管出貨是所要填寫的，是為了完成貨物的正確出庫(kù)情況和倉(cāng)庫(kù)中的現(xiàn)存狀況所用到的。在出庫(kù)窗體中正確填寫出庫(kù)所需要的一些信息，以便管理，然后保存 ，如圖 52所示。 24 圖 52 出庫(kù)操作按工單 界面 進(jìn)入系統(tǒng)后，可選擇 “ 交接班” 在不現(xiàn)用戶之間進(jìn)行切換。 界面如圖 53 所示。 圖 53 系統(tǒng)重登錄界面 設(shè)計(jì)思路和要點(diǎn)： 用戶如需修改自己的登錄密碼， 需輸入舊密碼與新密碼，程序在數(shù)據(jù)庫(kù)中修改用戶的密碼。 界面 如圖 54所示。 25 圖 54 修改密碼界面 退出即退出本系統(tǒng)。 倉(cāng)庫(kù)管理主界面中 退出即可。 查詢統(tǒng)計(jì)模塊 查詢統(tǒng)計(jì)模塊主要完成的功能有： ? 庫(kù)存查詢（按日期查詢、按人員查詢、按物品查詢） ? 貨物出入統(tǒng)計(jì)（按月統(tǒng)計(jì)） 1. 庫(kù)存的查詢 設(shè)計(jì)思路和要點(diǎn)：分為按日期查詢、按人員查詢、按物品查詢?nèi)矫娌樵儯?從而對(duì)庫(kù)存狀況 進(jìn)行統(tǒng)計(jì) ， 便于管理員查詢。 按日期查詢 設(shè)計(jì)思路與要點(diǎn)：對(duì)系統(tǒng)的每一次操作能應(yīng)及時(shí)地記錄下來(lái)，以便日后查詢。因此在數(shù)據(jù)庫(kù)中單獨(dú)創(chuàng)建一張表，用于記錄系統(tǒng)的日常操作，即倉(cāng)庫(kù)的各種日常操作。通過(guò)此功能，可能追溯系統(tǒng)數(shù)據(jù)的整個(gè)變化過(guò)程。使整個(gè)系統(tǒng)的運(yùn)行都在控制之內(nèi)。 按人員 查詢 ，支 持模糊查詢 ， 對(duì)倉(cāng)庫(kù)貨物狀況也能進(jìn)行統(tǒng)計(jì) ， 界面如圖 55 所示。 圖 55 按日期查詢界面 26 按人員查詢界面 如圖 56所 示。 圖 56 按人員查詢界 面 按物品查詢 ，可以限定倉(cāng)庫(kù) ， 出入時(shí)間 ， 它的界面設(shè)計(jì)如圖 57 所示。 圖 57 按物品查詢 貨物的出入統(tǒng)計(jì)，可以限定出入時(shí)間 ， 一般按月份進(jìn)行統(tǒng)計(jì)。 27 圖 58 按月統(tǒng)計(jì)窗體 報(bào)表打印模塊 報(bào)表打印完成的功能主要有： ? 單據(jù)報(bào)表打?。ò?需采購(gòu)物品打印 、 按月 打?。? 可根據(jù)需采購(gòu)的物品打印 ，可按庫(kù)存數(shù)量進(jìn)行查詢，如圖 59所示。 圖 59 需采購(gòu)物品打印 可根據(jù)月份查詢出需要打印的物品，按月打印可根據(jù)需要打印入庫(kù)、出庫(kù)單，如圖 510所示。 28 圖 510 按月打印窗體 打印代碼： Private Sub Command3_Click() 39。打印 If = 1 Then With DataEnvironment1 If . = adStateOpen Then . End If If Trim() = Then aa = Trim(Str(Month(Date))) Else aa = Left(Trim(), 1) End If .printinstorehouse aa 39。對(duì)問(wèn)號(hào)賦值 If . 0 Then Else MsgBox (沒(méi)有找到記錄！ ) Exit Sub End If End With End If If = 1 Then With DataEnvironment1 If . = adStateOpen Then . End If If Trim() = Then bb = Trim(Str(Month(Date))) 29 Else bb = Left(Trim(), 1) End If .printoutstorehouse bb 39。對(duì)問(wèn)號(hào)賦值 If . 0 Then Else MsgBox (沒(méi)有找到記錄！ ) Exit Sub End If End With End If End Sub 維護(hù)設(shè)置模塊 維護(hù)設(shè)置模塊是為了倉(cāng)庫(kù)管理系統(tǒng)的穩(wěn)定性和安全性而設(shè)計(jì)的，它完成的主要功能有： ? 職員信息 ? 數(shù)據(jù)整理 ? 用戶 管理 數(shù)據(jù)整理是對(duì)調(diào)查、觀察、實(shí)驗(yàn)等研究活動(dòng)中所搜集到的資料進(jìn)行檢驗(yàn)、歸類編碼和數(shù)字編碼的過(guò)程。它是數(shù)據(jù)統(tǒng)計(jì)分析的基礎(chǔ) 。 本系統(tǒng)的數(shù)據(jù)整理主要是對(duì)入庫(kù)、出庫(kù)以及庫(kù)存信息的數(shù)據(jù)整理， 其界面如圖 511 所示。 圖 511 數(shù)據(jù)整理界面 30 對(duì)登陸用戶的管理，可以修改用戶名 ， 操作權(quán)限 ， 新增 ， 刪除用戶等 。也可以 修改當(dāng)前登陸用戶的密碼 ， 同時(shí)也可以 更 換用戶登錄 。 其界面如圖 512 所示。 圖 512 用戶管理 輸入輸出 本系統(tǒng)界面標(biāo)準(zhǔn) Windows 形式，鍵盤輸入 ， 人機(jī) 交互，容易使用。輸入輸出的設(shè)計(jì)考慮美觀實(shí)用和通 俗易懂，圖文并茂。 系統(tǒng)安全設(shè)計(jì) 系統(tǒng)數(shù)據(jù)庫(kù)中包含多個(gè)二維表，所以在系統(tǒng)與數(shù)據(jù)庫(kù)的連接上，并沒(méi)有把數(shù)據(jù)庫(kù)和系統(tǒng)的連接直接寫入代碼，而是通過(guò)對(duì)服務(wù)器端進(jìn)行系統(tǒng)設(shè)置，使數(shù)據(jù)庫(kù)名及路徑不可見，并通過(guò) ACCESS 的數(shù)據(jù)庫(kù)安全設(shè)置，保證了數(shù)據(jù)庫(kù)的安全性。系統(tǒng)根據(jù)用戶身份不同賦予不同權(quán)限，用戶用密碼登陸，同樣也保證了系統(tǒng)數(shù)據(jù)的安全性。 31 第 六 章 系統(tǒng)測(cè)試 ，我們千辛萬(wàn)苦開發(fā)出的程序總會(huì)存在一些問(wèn)題，這就需要進(jìn)行測(cè)試。對(duì)于此系統(tǒng)的測(cè)試從以下幾方面進(jìn)行入手。 ? 菜單測(cè)試 檢查每個(gè)菜單是否有效。 ? 各功能模塊測(cè) 試 設(shè)計(jì)一些數(shù)據(jù)，利用各個(gè)模塊提供功能進(jìn)行測(cè)試。并檢查程序的防呆性，即程序是否能夠有效地防止一些明顯有錯(cuò)誤數(shù)據(jù)進(jìn)入系統(tǒng)。 ? 數(shù)據(jù)跟蹤測(cè)試 打開后臺(tái)數(shù)據(jù)庫(kù)，檢查各項(xiàng)數(shù)據(jù)是否與輸入的一致。及各個(gè)表及表中數(shù)據(jù)是否一致。 及解決方法 ? 運(yùn)行錯(cuò)誤 在運(yùn)行過(guò)程中，因?yàn)閼?yīng)用軟件的不同， Access 無(wú)法連接，使程序不能運(yùn)行。 解決方法： 尋找相同軟件的電腦進(jìn)行操作， 檢測(cè)它的可運(yùn)行性，此問(wèn)題已得到解決。 ? 編譯錯(cuò)誤 編譯錯(cuò)誤的產(chǎn)生原因是在程序代碼中出現(xiàn)了不正確的代碼，使系統(tǒng)不能正常運(yùn)行，影響設(shè)計(jì)進(jìn)度。 解決方法： 在調(diào) 試過(guò)程中，程序中的語(yǔ)法錯(cuò)誤在代碼編輯階段就會(huì)被自動(dòng)檢測(cè)和識(shí)別通過(guò)此功能，我們對(duì)錯(cuò)誤代碼進(jìn)行研究和改正 ，最終得以解決。 32 總結(jié) 隨著計(jì)算機(jī)技術(shù)的普及和網(wǎng)絡(luò)的發(fā)展，越來(lái)越多的教育單位開始重視信息化建設(shè)，利用先進(jìn)的計(jì)算機(jī)和網(wǎng)絡(luò)技術(shù)對(duì)倉(cāng)庫(kù)基本信息進(jìn)行管理，提高工作效率，減少人力資源的浪費(fèi)。本人結(jié)合倉(cāng)庫(kù)管理員對(duì)貨物信息的具體管理需求，開發(fā)一套倉(cāng)庫(kù)管理系統(tǒng)。本系統(tǒng)經(jīng)多次測(cè)試，能在 Visual 的調(diào)試環(huán)境上正常運(yùn)行，基本上實(shí)現(xiàn)了數(shù)據(jù)管理功能。 綜上詳細(xì)闡述了本系統(tǒng)的整個(gè)開發(fā)過(guò)程和實(shí)現(xiàn)功能，能夠進(jìn)行貨物信息 的錄入、修改、查詢、瀏覽、刪除、統(tǒng)計(jì)等操作，整體界面美觀大方，完成了倉(cāng)庫(kù)管理員對(duì)倉(cāng)庫(kù)管理工作的要求，適用于一系列的工作單位。本系統(tǒng)的應(yīng)用，將會(huì)使員工和庫(kù)管人員在第一時(shí)間內(nèi)獲得理想信息。 經(jīng)過(guò)兩個(gè)多月的畢業(yè)設(shè)計(jì)，一個(gè)完整的倉(cāng)庫(kù)管理系統(tǒng)終于設(shè)計(jì)完成了，在設(shè)計(jì)過(guò)程中，我意識(shí)到自己所學(xué)知識(shí)的不足，可以說(shuō)關(guān)于這方面的接觸才剛剛開始，深有感觸，無(wú)以言表。關(guān)于本系統(tǒng)，雖然 對(duì)倉(cāng)庫(kù)管理進(jìn)行了系統(tǒng)的創(chuàng)建，但由于時(shí)間的不足，這個(gè)系統(tǒng)并不完美，在很多方面都有缺陷，比如： ? 在進(jìn)行入庫(kù)操作時(shí)，所輸入的數(shù)據(jù)不能與原來(lái)的數(shù)據(jù)進(jìn)行結(jié)合 ； ? 進(jìn) 行數(shù)據(jù)輸入時(shí)，沒(méi)有詳細(xì)的 文字 說(shuō)明和限制； ? 系統(tǒng)中沒(méi)有內(nèi)容分類，用戶必須自己輸入，在此，系統(tǒng)顯出不方便處； ? 按月打印程序中，打印入庫(kù)單和打印出庫(kù)單還有不足； ? 臨時(shí)離開后，所設(shè)的密碼沒(méi)有達(dá)到保密效果等 ； ? 本系統(tǒng)在余料設(shè)置中還有一定缺陷，由于時(shí)間問(wèn)題，便不再做修改。 我們要在以后的實(shí)踐中去檢驗(yàn)它的可用性，特別要考慮它的實(shí)時(shí)性和安全性， 在以后的工作和學(xué)習(xí)中， 我們 會(huì) 多查詢相關(guān)資料，反復(fù)地熟練應(yīng)用， 完善本系統(tǒng)，彌補(bǔ)本系統(tǒng)的不足， 才能把系統(tǒng)設(shè)計(jì)的更巧、更好。在設(shè)計(jì)中，同學(xué)間的協(xié)作交流是非常重要的，協(xié)作交流是一種進(jìn)步，帶給 我們新的思路。 經(jīng)過(guò)這次畢業(yè)設(shè)計(jì)，引發(fā)了我很多的興趣，讓我體會(huì)到了思考的樂(lè)趣，首先是做程序要勤：手、眼、心齊到；其次要有韌性，不怕麻煩，不怕失敗，反復(fù)調(diào)試，反復(fù)練習(xí)，這樣才能做出最佳的程序設(shè)計(jì)。 33 參考文獻(xiàn) [1]學(xué)用 Visual Basic （美） Greg Perry 編著 戴紅，陳喆，姚娜譯。清華大學(xué)出版社， 2020 [2]Visual Basic 程序設(shè)計(jì)教程 /龔沛曾，陸慰民，楊志強(qiáng)編。高等教育出版社， [3]Visual Basic 入門與提高 /張樹兵，戴紅，陳哲著。 清 華大學(xué)出版社， [4]Access 數(shù)據(jù)庫(kù)程序設(shè)計(jì)教程 /陳義平 清華大學(xué)出版社 [5]Visual Basic 與可視化編程 /汪遠(yuǎn)征，劉瑞新著。上?？茖W(xué)技術(shù)出版社 , [6]Access 數(shù)據(jù)庫(kù)教程與實(shí)訓(xùn) /劉輝、張軍、李云松等 中國(guó)林業(yè)出版社 [7]Visual Basic 程序設(shè)計(jì)工程師 /網(wǎng)冠科技編著。 機(jī)械工業(yè)出版社