【正文】 上海科學(xué)技術(shù)出版社 , [6]Access 數(shù)據(jù)庫教程與實訓(xùn) /劉輝、張軍、李云松等 中國林業(yè)出版社 [7]Visual Basic 程序設(shè)計工程師 /網(wǎng)冠科技編著。高等教育出版社， [3]Visual Basic 入門與提高 /張樹兵，戴紅，陳哲著。 33 參考文獻 [1]學(xué)用 Visual Basic （美） Greg Perry 編著 戴紅，陳喆，姚娜譯。在設(shè)計中，同學(xué)間的協(xié)作交流是非常重要的，協(xié)作交流是一種進步，帶給 我們新的思路。關(guān)于本系統(tǒng)，雖然 對倉庫管理進行了系統(tǒng)的創(chuàng)建，但由于時間的不足，這個系統(tǒng)并不完美，在很多方面都有缺陷，比如： ? 在進行入庫操作時，所輸入的數(shù)據(jù)不能與原來的數(shù)據(jù)進行結(jié)合 ； ? 進 行數(shù)據(jù)輸入時，沒有詳細(xì)的 文字 說明和限制； ? 系統(tǒng)中沒有內(nèi)容分類，用戶必須自己輸入，在此，系統(tǒng)顯出不方便處； ? 按月打印程序中，打印入庫單和打印出庫單還有不足； ? 臨時離開后，所設(shè)的密碼沒有達(dá)到保密效果等 ； ? 本系統(tǒng)在余料設(shè)置中還有一定缺陷，由于時間問題，便不再做修改。本系統(tǒng)的應(yīng)用，將會使員工和庫管人員在第一時間內(nèi)獲得理想信息。本系統(tǒng)經(jīng)多次測試，能在 Visual 的調(diào)試環(huán)境上正常運行，基本上實現(xiàn)了數(shù)據(jù)管理功能。 32 總結(jié) 隨著計算機技術(shù)的普及和網(wǎng)絡(luò)的發(fā)展，越來越多的教育單位開始重視信息化建設(shè)，利用先進的計算機和網(wǎng)絡(luò)技術(shù)對倉庫基本信息進行管理，提高工作效率，減少人力資源的浪費。 ? 編譯錯誤 編譯錯誤的產(chǎn)生原因是在程序代碼中出現(xiàn)了不正確的代碼，使系統(tǒng)不能正常運行，影響設(shè)計進度。 及解決方法 ? 運行錯誤 在運行過程中，因為應(yīng)用軟件的不同， Access 無法連接，使程序不能運行。 ? 數(shù)據(jù)跟蹤測試 打開后臺數(shù)據(jù)庫，檢查各項數(shù)據(jù)是否與輸入的一致。 ? 各功能模塊測 試 設(shè)計一些數(shù)據(jù)，利用各個模塊提供功能進行測試。對于此系統(tǒng)的測試從以下幾方面進行入手。系統(tǒng)根據(jù)用戶身份不同賦予不同權(quán)限，用戶用密碼登陸，同樣也保證了系統(tǒng)數(shù)據(jù)的安全性。輸入輸出的設(shè)計考慮美觀實用和通 俗易懂，圖文并茂。 其界面如圖 512 所示。 圖 511 數(shù)據(jù)整理界面 30 對登陸用戶的管理，可以修改用戶名 ， 操作權(quán)限 ， 新增 ， 刪除用戶等 。它是數(shù)據(jù)統(tǒng)計分析的基礎(chǔ) 。對問號賦值 If . 0 Then Else MsgBox (沒有找到記錄！ ) 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。 28 圖 510 按月打印窗體 打印代碼： Private Sub Command3_Click() 39。 27 圖 58 按月統(tǒng)計窗體 報表打印模塊 報表打印完成的功能主要有： ? 單據(jù)報表打?。ò?需采購物品打印 、 按月 打?。? 可根據(jù)需采購的物品打印 ，可按庫存數(shù)量進行查詢，如圖 59所示。 圖 56 按人員查詢界 面 按物品查詢 ，可以限定倉庫 ， 出入時間 ， 它的界面設(shè)計如圖 57 所示。 按人員 查詢 ，支 持模糊查詢 ， 對倉庫貨物狀況也能進行統(tǒng)計 ， 界面如圖 55 所示。通過此功能，可能追溯系統(tǒng)數(shù)據(jù)的整個變化過程。 按日期查詢 設(shè)計思路與要點：對系統(tǒng)的每一次操作能應(yīng)及時地記錄下來，以便日后查詢。 倉庫管理主界面中 退出即可。 界面 如圖 54所示。 界面如圖 53 所示。在出庫窗體中正確填寫出庫所需要的一些信息，以便管理，然后保存 ，如圖 52所示。在新增入庫單窗體中 貨物編號 、導(dǎo)電情況、硬度 均可通過單擊相關(guān)的數(shù)據(jù)框來選擇 ， 數(shù)據(jù)選擇框會進行動態(tài)智能化統(tǒng)計信息 ， 使選擇更方便 ， 如圖 51 所示。在數(shù)據(jù)庫中建立各表。先啟動 Access2020 程序，然后創(chuàng)建名為“ WMS”的數(shù)據(jù) 庫。Jet OLEDB:database password=123321。 db_path amp。 \Data\ ‘指定數(shù)據(jù)庫文件 db_ = Provider=。 2. 使用 ADO 連接數(shù)據(jù)庫 本系統(tǒng) 采用的是無源的數(shù)據(jù)庫連接方法 ，因為整個系統(tǒng)都會使用到這個數(shù)據(jù)庫，所以將數(shù)據(jù)庫的連接定義為全局變量。 ADO 數(shù)據(jù)庫連接主要分兩步進行：一是引用 ADO，二是使用 ADO 連接數(shù)據(jù)庫。具體 ODBC 及 ADO 詳見相關(guān)理論部分。 22 第五章 系統(tǒng) 實現(xiàn) 數(shù)據(jù)庫實現(xiàn) 連接數(shù)據(jù)庫 在進行系統(tǒng)開發(fā) 前 ，一個很重要的步驟就是建立數(shù)據(jù)庫的連接，即訪問數(shù)據(jù)庫。若“圖像”輸入框設(shè)為 1，即 ImageList 控件的第一個圖形作為按鈕 1 的圖形。 4) 單擊“按鈕”選項卡，“屬性頁”對話框?qū)⒊霈F(xiàn)按鈕的一些屬性，單擊“插入”按鈕后，“索引”文本框中出現(xiàn)數(shù)字 1，其它輸入框也變?yōu)榭捎谩? 3) 單擊“屬性頁”中的“圖象列表”列表框右邊的下拉箭頭，從下拉的列表中選擇ImageList。 2) 用鼠標(biāo)右鍵單擊工具欄對 象，從彈出的菜單中選擇“屬性”菜單項。對于 ButtonClick 事件，當(dāng)單擊本控件之上的一個按鈕時，該事件過程被執(zhí)行；對于 Click，當(dāng)單擊本控件時進行檢測。 如圖 47所示。 創(chuàng)建主窗體工具欄 同樣， 熟悉 Windows 下應(yīng)用程序的用戶對 工具欄也 一定有比較深的印象。 要打開菜單編輯器，在“ Tools”菜單中選擇“ Menu Editor”選項。菜單控 件只包含一個事件，即 Click事件，當(dāng)用鼠標(biāo)或鍵盤選中該菜單控件時，將調(diào)用該事件。菜單控件使一個對象，與其他對象一樣，它具有定義它的外觀與行為的屬性。用戶看到的每個 菜單項和在“ Menu Editor”中定義的一個菜單控件相對應(yīng) ， 如圖 46 所示。當(dāng)單擊一個菜單 標(biāo)題，包含菜單項目的列表就被拉下來。單擊工具欄中的 ADD MDI Form 按鈕，生成一個窗體。而 MDI 的程序中，有一個窗體是主窗體，可以包含其他窗體，他的類型是 MDI Form 。 創(chuàng)建系統(tǒng)主窗體 Visual Basic 創(chuàng)建的應(yīng)用程序可以是 SDI（單文檔界面）和 MDI（ 多文檔界面）。 表 41 庫存狀況信息表 字段名稱 數(shù)據(jù)類型 字段大小 可否為空 品名 文本 64 不可 規(guī)格 數(shù)字 長整型 不可 導(dǎo)電 文本 50 可 單位 文本 50 可 硬度 數(shù)字 長整型 可 數(shù)量 數(shù)字 長整型 不可 表 42 入庫單信息表 字段 名稱 數(shù)據(jù)類型 字段大小 可否為空 品名 文本 64 不可 規(guī)格 數(shù)字 長整型 不可 導(dǎo)電 數(shù)字 長整型 不可 入庫日期 日期 /時間 不可 入料人編號 數(shù)字 長整型 可 入料人 文本 64 不可 經(jīng)手人 文本 64 不可 自動編號 數(shù)字 長整型 不可 說明 文本 50 可 入庫標(biāo)識 文本 64 可 18 表 43 出庫單信息表 字段名稱 數(shù)據(jù)類型 字段大小 可否為空 品名 文本 64 不可 規(guī)格 數(shù)字 長整型 不可 導(dǎo)電 文本 50 不可 硬度 數(shù)字 長整型 可 單位 文本 64 不可 數(shù)量 數(shù)字 長整型 不可 毛坯尺寸 數(shù)字 長整型 可 毛坯數(shù)量 數(shù)字 長整型 不可 成品尺寸 數(shù)字 長整型 不可 成品數(shù)量 數(shù)字 長整型 可 余料 數(shù)字 長整型 不可 報廢 數(shù)字 長整型 不可 出庫日期 日期 /時間 不可 領(lǐng)料人編號 數(shù)字 長整型 可 領(lǐng)料人 文本 64 不可 經(jīng)手人 文本 64 不可 說明 文本 64 可 表 44 用戶管理信息表 字段名稱 數(shù)據(jù)類型 字段大小 可否為空 用戶名 文本 64 不可 19 用戶密碼 文本 50 不可 用戶權(quán)限 數(shù)字 長整型 不可 系統(tǒng)主窗體設(shè)計 創(chuàng)建工程項目 —— 倉庫管理系統(tǒng) 打開 Visual Basic 后，單擊 File → New Project 菜單，在工程模板中選擇 Standard ExE,Visual Basic 將自動產(chǎn)生一個 Form 窗體，屬性都是缺省設(shè)置。 倉庫 管理信息系統(tǒng)數(shù)據(jù)庫中各個表格的設(shè)計結(jié)果如下面表格所示。 各個實體具體的描述 ER圖如下： 現(xiàn)有庫存 信息實體 ER圖如圖 42所示 16 圖 42 現(xiàn)有庫存信息實體 ER 圖 入庫單 信息實體 ER圖如圖 43 所示 圖 43 入庫單 信息實體 ER圖 出庫單 信息實體 ER圖如圖 44 所示。 數(shù)據(jù)庫概念結(jié)構(gòu)設(shè)計 得到上面的數(shù)據(jù)項和數(shù)據(jù)結(jié)構(gòu)以后，就可以設(shè)計出能夠滿足用戶需求的各種實體結(jié)構(gòu)，以及他們之間的關(guān)系，為以后的邏輯結(jié)構(gòu)設(shè)計打下基礎(chǔ)。 （ 4） 數(shù)據(jù)使用權(quán)限設(shè)置：針對用戶的不同使用要求，確定數(shù)據(jù)的用戶使用權(quán)限，確保數(shù)據(jù)安全。數(shù)據(jù)表設(shè)計不僅要滿足數(shù)據(jù)存儲的要求，還要增加一些如反映有關(guān)信息、操作責(zé)任、中間數(shù)據(jù)的字段或臨時 數(shù)據(jù)表。 （ 2） 數(shù)據(jù)表定義：數(shù)據(jù)表定義指定義數(shù)據(jù)庫中數(shù)據(jù)表的結(jié)構(gòu)，數(shù)據(jù)表的邏輯結(jié)構(gòu)包括：屬性名稱、類型、表示形式、缺省值、校驗規(guī)則、是否關(guān)鍵字、可否為空等。 數(shù)據(jù)庫設(shè)計 數(shù)據(jù)庫設(shè)計的步驟主要是： （ 1） 數(shù)據(jù)庫結(jié)構(gòu)定義：目前的數(shù)據(jù)庫管理系統(tǒng)（ DBMS）有的是支持聯(lián)機事務(wù)處理CLTP（負(fù)責(zé)對事務(wù)數(shù)據(jù)進行采集、處理、存儲）的操作型 DBMS，有的可支持?jǐn)?shù)據(jù)倉庫、有聯(lián)機 分析處理 CLAP（指為支持決策的制定對數(shù)據(jù)的一種加工操作）功能的大型 DBMS，有的數(shù)據(jù)庫是關(guān)系型的、有的可支持面向?qū)ο髷?shù)據(jù)庫。 （ 4） 報表打印 15 a） 對需要采購的物品進行打印，然后購買。 c) 按物品查詢，直接輸入物品名進行查詢。 （ 2） 查詢模塊 a) 按入庫的日期進 行查詢，既可以查到這一時段的入庫信息，也能查到相應(yīng)時段的出庫信息。 b) 管理員可以通過管理界面添加或刪除用戶，添加新管理員或刪除原有管理員 ,驗證用戶的合法性，阻止非法用戶登錄。 系統(tǒng)功能設(shè)計 在仔細(xì)分析了公司的物料數(shù)據(jù)圖后，決定將整個系統(tǒng)分為四大模塊，每個模塊又有若干個子模塊。 ? 程序代碼標(biāo)準(zhǔn)化，軟件統(tǒng)一化，確保軟件的可維護性和實 用性。 14 倉庫管理系統(tǒng)系統(tǒng)管理模塊 倉庫管理模塊 物料管理模塊 報表查詢模塊重登錄修改密碼用戶管理退出入庫操作出庫操作退料操作增料操作倉位管理盤點損益物料管理產(chǎn)品管理供應(yīng)商管理生產(chǎn)計劃訂單管理查詢出庫操作盤點報表? 統(tǒng)一各種原始單據(jù)的格式，統(tǒng)一報表的格式。在管理的過程中經(jīng)常會出現(xiàn)信息的重復(fù)傳遞；報表種類繁多，各個部門管理規(guī)格不統(tǒng)