【文章內(nèi)容簡介】 出庫單中的客戶必須是Customer數(shù)據(jù)表中有相應(yīng)的記錄。如果在銷售中發(fā)展了新的裝配車間，必須先在Customer數(shù)據(jù)表中增加這家裝配車間的信息。這些關(guān)系可以在SQL Serve中用關(guān)系圖工具設(shè)計和查看，： 各數(shù)據(jù)表之間的關(guān)系 系統(tǒng)的功能設(shè)計庫存管理系統(tǒng)充分發(fā)揮信息技術(shù)的有事，通過集中式的信息數(shù)據(jù)庫，將企業(yè)的進(jìn)、出、存等經(jīng)營業(yè)務(wù)有機(jī)的結(jié)合起來，達(dá)到數(shù)據(jù)共享、降低成本、提高效率、改進(jìn)服務(wù)的目的，進(jìn)而提高企業(yè)的生產(chǎn)效率和管理水平。根據(jù)需求分析，：庫存管理系統(tǒng)退出系統(tǒng)系統(tǒng)設(shè)置基礎(chǔ)信息統(tǒng)計查詢庫存管理日常業(yè)務(wù)裝配車間管理供應(yīng)商管理出庫查詢庫存查詢采購查詢庫存盤點(diǎn)關(guān)于系統(tǒng)密碼設(shè)置出庫單采購單 庫存管理系統(tǒng)模塊結(jié)構(gòu)組織圖各功能模塊的設(shè)計功能進(jìn)行說明：l 出庫單：日常業(yè)務(wù)中需要頻繁使用的功能，主要是對每筆出庫業(yè)務(wù)進(jìn)行記錄，自動生成對應(yīng)的出庫憑證。銷售單中的商品名稱、客戶和經(jīng)手人字段分別對應(yīng)Product數(shù)據(jù)表、Customer數(shù)據(jù)表和Users數(shù)據(jù)表中的相關(guān)字段，所以這里需要檢驗(yàn)用戶輸入的合法性。為了管理的方便和規(guī)范，每筆出庫單對應(yīng)一個唯一的出庫單票號。l 采購單：日常業(yè)務(wù)中需要頻繁的使用的功能，主要是對每筆采購入庫業(yè)務(wù)進(jìn)行記錄，自動生成對應(yīng)的采購憑證。采購單中的零件名稱，供應(yīng)商和經(jīng)手人分別對應(yīng)Product數(shù)據(jù)表、Supplier數(shù)據(jù)表和Users數(shù)據(jù)表中的相關(guān)字段，所以這里需要驗(yàn)證用戶輸入的合法性。為了管理的方便和規(guī)范，每筆采購單對應(yīng)一個唯一的采購單票號。： 采購單運(yùn)行效果圖l 庫存盤點(diǎn):庫存管理中的重要業(yè)務(wù)活動，主要是根據(jù)采購記錄和出庫記錄對庫存商品盤點(diǎn)，更新每種商品的庫存量，為制定采購計劃提供依據(jù)。計算庫存時需要檢索每一種商品的采購記錄，匯總得到此種商品總的采購數(shù)量，然后檢索這種商品的出庫記錄，匯總得到此種商品總的出庫數(shù)量，最后用總的采購數(shù)量和總的出庫數(shù)量相減即可。l 采購查詢：統(tǒng)計查詢功能中的一個模塊，提供了對采購記錄的多種字段的復(fù)合式查詢功能。l 出庫查詢：統(tǒng)計查詢功能中的一個模塊，提供了對出庫記錄的多種字段的復(fù)合式查詢功能。l 庫存查詢：統(tǒng)計查詢功能中的一個模塊，提供了對庫存商品按照多種字段進(jìn)行模糊查詢的功能。： 庫存查詢界面l 供應(yīng)商管理：基礎(chǔ)信息維護(hù)中的一個模塊，主要用于對供應(yīng)商信息進(jìn)行查詢和維護(hù)。為了方便對多個供應(yīng)商的管理和比較，本案例中將此功能用Tab頁的形式實(shí)現(xiàn)，既方便對單個供應(yīng)商信息的查看和編輯，又利于對供應(yīng)商總體的評價和比較。： 供應(yīng)商管理界面l 裝配車間管理：基礎(chǔ)信息維護(hù)中的一個模塊，主要用于對裝配車間信息進(jìn)行查詢和維護(hù)。為了方便對多個裝配車間的管理和比較，本案例中將此功能用Tab頁的形式實(shí)現(xiàn)，既方便對單個裝配車間信息的查看和編輯，又利于對裝配車間總體的評價和比較。l 密碼設(shè)置：系統(tǒng)設(shè)置中的一個模塊，主要用于為系統(tǒng)中現(xiàn)有的用戶提供密碼更改功能。l 關(guān)于系統(tǒng)：系統(tǒng)設(shè)置中的一個模塊，主要用于說明本系統(tǒng)的版權(quán)信息。為了用戶使用本系統(tǒng)的方便，該模塊中還提供了計算機(jī)系統(tǒng)信息的顯示功能。l 退出系統(tǒng)：用于退出本系統(tǒng)。為了防止用戶的誤錯左，退出系統(tǒng)前需要用戶確認(rèn)退出的操作。：工作人員庫存管理工作人員工作人員數(shù)據(jù)庫出庫單采購單企業(yè)查詢查詢結(jié)果裝配車間供應(yīng)商工作人員 系統(tǒng)流程圖 系統(tǒng)實(shí)現(xiàn)本系統(tǒng)采用系統(tǒng)開發(fā)中常見的多文檔結(jié)構(gòu)，搭配菜單欄、工具欄、狀態(tài)欄等界面工具實(shí)現(xiàn)系統(tǒng)分析和系統(tǒng)設(shè)計中提出的功能。，在這個窗口中，單擊不同的菜單或者工具欄中的按鈕，可以打開不同的窗口以完成各種對應(yīng)的功能。 系統(tǒng)界面 創(chuàng)建登錄窗口（frmLogin）在進(jìn)入應(yīng)用程序主界面之前，一般都需要登錄操作，以便確認(rèn)用戶的身份，從而保證企業(yè)數(shù)據(jù)的安全性。在本系統(tǒng)的登錄中，要求用戶從系統(tǒng)已經(jīng)創(chuàng)建的用戶中選擇一個用戶名，然后輸入相應(yīng)的密碼。程序在數(shù)據(jù)庫的Users數(shù)據(jù)表中進(jìn)行查詢，如果用戶的密碼正確，就可以使用該系統(tǒng)；如果用戶的密碼錯誤，將提示用戶重新輸入密碼。（1） 因?yàn)橐诖翱诘拇a中使用ADO中的一些對象進(jìn)行數(shù)據(jù)庫的操作，所以必須先引用相對應(yīng)的庫。在菜單欄中一次選擇“工程 ” “引用”菜單，在“可用的引用”列表中選擇“Microsoft ActiveX Data Objects Library”項(xiàng)。這樣就可以在程序中使用ADO中的對象了。（2） 當(dāng)系統(tǒng)運(yùn)行打開frmLogin窗口的時候，需要從數(shù)據(jù)庫Users數(shù)據(jù)表中查找當(dāng)前系統(tǒng)中所有的用戶，然后將他們添加到組合框中，主要代碼如下：Dim conn As New Dim rs As New Dim connstring As StringDim num As Integerconnstring = Provider=。Password=ecc。Persist Security Info=True。User ID=sa。amp。 Initial Catalog=PurchaseandSale。Server=(local) 39。 定義連接字符串 If 1 Then 39。如果數(shù)據(jù)庫未打開，則打開數(shù)據(jù)庫 (connstring) End If Set rs = (select * from users) 39。執(zhí)行查詢操作，結(jié)果保存在rs記錄集中 With rs .MoveFirst Do While Not .EOF 39。 逐條讀取用戶名稱，添加到cmbUserName組合框中 DoEvents (!用戶) .MoveNext Loop End With = 0 39。將cmbUserName組合框的默認(rèn)選項(xiàng)設(shè)置為第一條 這樣，當(dāng)程序開始運(yùn)行，加載frmLogin窗口的時候，就會從PurchaseandSale數(shù)據(jù)庫的Users數(shù)據(jù)表中檢索所有記錄的用戶字段，然后將他們添加到組合框中。最后將組合框的第一個子項(xiàng)設(shè)置為默認(rèn)選項(xiàng)。運(yùn)行程序，系統(tǒng)開始就進(jìn)入到登錄窗口中。 登錄窗口界面如果用戶輸入了正確的用戶名和密碼，登錄窗口消失后系統(tǒng)主窗口打開，否則，系統(tǒng)都將有消息對話框提示。 創(chuàng)建菜單欄（frmMain）在主窗口設(shè)計好的基礎(chǔ)上，需要設(shè)計一個菜單欄，為用戶執(zhí)行各種命令和操作提供方便。 菜單的結(jié)構(gòu)如系統(tǒng)功能設(shè)計中的系統(tǒng)模塊結(jié)構(gòu)結(jié)構(gòu)圖所示。在Visual Basic ，即可對菜單欄進(jìn)行添加。按照如下表設(shè)計菜單欄中的菜單： frmMain窗口的菜單列表對象屬性屬性值說明一級菜單“日常業(yè)務(wù)”標(biāo)題日常業(yè)務(wù)（amp。N）訪問鍵為Alt+N名稱RCYW菜單訪問名稱二級菜單“采購單”標(biāo)題采購單標(biāo)題為“采購單”名稱CGD菜單訪問名稱快捷鍵Ctrl+P通過快捷鍵Ctrl+P訪問菜單二級菜單“出庫單”標(biāo)題出庫單標(biāo)題為“出庫單”名稱CKD菜單訪問名稱快捷鍵Ctrl+S通過快捷鍵Ctrl+S訪問菜單 frmMain窗口的菜單列表對象屬性屬性值說明一級菜單“庫存管理”標(biāo)題庫存管理（amp。S）訪問鍵為Alt+S名稱KCGL菜單訪問名稱二級菜單“庫存盤點(diǎn)”標(biāo)題庫存盤點(diǎn)標(biāo)題為“庫存盤點(diǎn)”名稱KCPD菜單訪問名稱快捷鍵Ctrl+K通過快捷鍵Ctrl+K訪問菜單一級菜單“統(tǒng)計查詢”標(biāo)題統(tǒng)計查詢（amp。F）訪問鍵為Alt+F名稱TJCX菜單訪問名稱二級菜單“庫存查詢”標(biāo)題庫存查詢標(biāo)題為“庫存查詢”名稱KCCX菜單訪問名稱快捷鍵Ctrl+F通過快捷鍵Ctrl+F訪問菜單二級菜單“采購查詢”標(biāo)題采購查詢標(biāo)題為“采購查詢”名稱CGCX菜單訪問名稱快捷鍵Ctrl+G通過快捷鍵Ctrl+G訪問菜單二級菜單“出庫查詢“標(biāo)題出庫查詢標(biāo)題為“出庫查詢”名稱CKCX菜單訪問名稱快捷鍵Ctrl+X通過快捷鍵Ctrl+V訪問菜單一級菜單“基礎(chǔ)信息”標(biāo)題基礎(chǔ)信息（amp。B）訪問鍵為Alt+B名稱JCXX菜單訪問名稱二級菜單“供應(yīng)商管理”標(biāo)題供應(yīng)商管理標(biāo)題為“供應(yīng)商管理”名稱GYSGL菜單訪問名稱快捷鍵Ctrl+Y通過快捷鍵Ctrl+Y訪問菜單二級菜單“裝配車間”標(biāo)題裝配車間管理標(biāo)題為“裝配車間管理”名稱ZPCJGL菜單訪問名稱快捷鍵Ctrl+H通過快捷鍵Ctrl+H訪問菜單一級菜單“系統(tǒng)設(shè)置”標(biāo)題系統(tǒng)設(shè)置（amp。O）訪問鍵為Alt+O名稱XTSZ菜單訪問名稱二級菜單“密碼設(shè)置標(biāo)題密碼設(shè)置標(biāo)題為“密碼設(shè)置”名稱MMSZ菜單訪問名稱快捷鍵Ctrl+M通過快捷鍵Ctrl+M訪問菜單 frmMain窗口的菜單列表對象屬性屬性值說明二級菜單“關(guān)于系統(tǒng)”標(biāo)題關(guān)于系統(tǒng)標(biāo)題為“關(guān)于系統(tǒng)”名稱GYXT菜單訪問名稱快捷鍵Ctrl+A通過快捷鍵Ctrl+A訪問菜單一級菜單“退出系統(tǒng)”標(biāo)題退出系統(tǒng)（amp。X）訪問鍵為Alt+X名稱TCXT菜單訪問名稱這樣，窗口frmMain的菜單欄就已經(jīng)設(shè)計完成了。 創(chuàng)建工具欄（1）從工具箱中拖動一個ImageList控件放置到frmMain窗口上。設(shè)置其名稱為imlToolBar；（2），然后單擊確定；（3）切換到“按鈕”選項(xiàng)卡，將按鈕標(biāo)題設(shè)置為“庫存查詢”，關(guān)鍵字設(shè)置為“KCCX”。這樣就在工具欄上添加了一個名為“庫存查詢”的圖標(biāo)按鈕。（4）其余工具欄圖標(biāo)按鈕可依據(jù)上邊的方法設(shè)置。 創(chuàng)建狀態(tài)欄應(yīng)用程序中的狀態(tài)欄用于顯示當(dāng)前狀態(tài)下應(yīng)用程序或操作系統(tǒng)的執(zhí)行狀態(tài)。一般狀態(tài)欄顯示在窗口的最下方。在這個應(yīng)用程序中，在窗口的底部放置一個狀態(tài)欄，用于顯示系統(tǒng)名稱、作者信息、當(dāng)前日期和當(dāng)前時間信息。 創(chuàng)建采購單經(jīng)過前面的操作，登錄窗口和主窗口就全部設(shè)計完成了。但是主窗口中的各種功能，包括菜單欄中和工具欄中的，都是沒有事件處理代碼的空架子。當(dāng)調(diào)用這些功能的時候，不會有任何效果。從下面開始，就按照菜單欄中的順序逐步實(shí)現(xiàn)系統(tǒng)中的各種功能。菜單欄中的第一項(xiàng)就是采購單，這是使用頻繁的一項(xiàng)功能。每當(dāng)有商品入庫的時候，都要生成一張采購單。采購單中主要包括的字段有如下幾項(xiàng)：l 零件名稱：這個字段是在PurchaseandSale的Product數(shù)據(jù)表中定義的。只有在Product表中有了一種零件的信息后，才能在入庫單中使用這種商品。如果出現(xiàn)一種零件，必須先在Product表中增加。l 數(shù)量：入庫零件的數(shù)量，這個數(shù)量必須是正整數(shù)l 進(jìn)價：每種商品的入庫都有一個進(jìn)價，這個進(jìn)價會參與庫存的結(jié)算。l 金額：入庫零件的金額是由入庫產(chǎn)品的數(shù)量和價格相乘得到的，這一項(xiàng)不需要用戶輸入。l 供應(yīng)商：這個字段是在PurchaseandSale的Supplier數(shù)據(jù)表中定義的。只有在Supplier表中有了供應(yīng)商的信息后，才能再入庫單中使用這個供應(yīng)商。如果新出現(xiàn)供應(yīng)商，必須在Supplier表中增加。l 經(jīng)手人：這個字段是在PurchaseandSale的Users數(shù)據(jù)表中定義的。只有在Users表中有了一個用戶的信息后，才能在入庫單中使用這個用戶作為經(jīng)手人。如果有新的員工加入，必須先在Users表中增加。l 日期：這個字段表示此筆交易的產(chǎn)生日期。默認(rèn)為當(dāng)前日期。l 票號：這個字段不允許用戶輸入，由系統(tǒng)根據(jù)票號的產(chǎn)生規(guī)則自動生成。設(shè)計入庫單的操作步驟如下：1) 按照前述方法在應(yīng)用程序中新增一個Windows窗口frmCGD。2) 在窗口中添加控件，并設(shè)置相關(guān)屬性；3) 使用Adodc控件連接數(shù)據(jù)庫；至此，采購單的界面部分設(shè)計完成，“采購單”窗口效果圖；當(dāng)frmCGD窗口加載的時候，需要完成以下操作：l 從PURCHASEANDSALE數(shù)據(jù)庫的Product數(shù)據(jù)表中檢索所有的零件名稱字段信息，并加入到窗口的“零件名稱”組合框的子項(xiàng)中；l 從PURCHASEANDSALE數(shù)據(jù)庫的Users數(shù)據(jù)表中檢索所有記錄的用戶字段信息，并加入到窗口的“經(jīng)手人”組合框子項(xiàng)中；l 從PURCHASEANDSALE數(shù)據(jù)庫的Supplier數(shù)據(jù)表中檢索所有記錄的供應(yīng)商編號字段信息，并加入到窗口“供應(yīng)商”組合框的子項(xiàng)中；l 按照日期加字母“P”加三位序號的方式生成票號字段；l 取得系統(tǒng)當(dāng)前日期，填充到mebDate控件中，作為默認(rèn)的采購日期 “采購單”窗口效果在界面設(shè)計窗口中，雙擊frmCGD窗口，進(jìn)入窗口加載事件，輸入以下代碼：Private Sub Form_Load() On Error GoTo myerr 39。有異常跳轉(zhuǎn) = adCmdText = select 零件名稱 from Product 39。設(shè)置adoCGD的數(shù)據(jù)源為Product數(shù)據(jù)表 With .MoveFirst