【正文】 體解決問題的方法：。（2） 制定規(guī)范的倉庫管理制度，特別是倉庫進(jìn)入權(quán)限，除了倉庫工作人員，其他任何人員不得進(jìn)入倉庫，更不能隨意取存物品，這樣是防止產(chǎn)品的丟失和倉庫管理的混亂。倉庫作業(yè)當(dāng)中也要注意作業(yè)規(guī)范，定期檢查產(chǎn)品，發(fā)現(xiàn)有破損及時(shí)處理。（5） 建立一個(gè)與倉庫相符的倉庫管理系統(tǒng)，對倉庫的所有產(chǎn)品的進(jìn)出庫等業(yè)務(wù)做到及時(shí)處理。 從上面的問題分析和解決問題可以看出，沒有一個(gè)和倉庫相符合的倉庫管理系統(tǒng)，所有的業(yè)務(wù)處理都變的繁瑣，所以我認(rèn)為有一個(gè)好的倉庫管理系統(tǒng)支持，對新生活集團(tuán)（中國）有限公司徐州分公司是很有必要的。 倉庫管理系統(tǒng)需滿足倉庫管理員及工作人員的需求，他們具有登陸應(yīng)用系統(tǒng)的權(quán)限，所以需要對工作人員的登錄本模塊進(jìn)行更多的考慮，設(shè)計(jì)不同用戶的操作權(quán)限和登錄方法。倉庫中貨品的入庫管理操作就是對于貨品入庫情況的管理，當(dāng)有貨品到貨需要入庫保管，用戶可以方便的輸入貨品的名稱、數(shù)量等信息。倉庫貨品的信息量大，數(shù)據(jù)安全性和保密性要求高。倉庫管理人員可以瀏覽、查詢、添加、刪除等貨品的基本信息等。本系統(tǒng)基本包含了倉庫管理的主要需求，具有完善細(xì)致的功能、友好的用戶界面、較強(qiáng)的數(shù)據(jù)處理功能和完備的安全機(jī)制；隨心所欲的查詢和所見即所得的打印功能，并全面支持分析和決策的功能。所需的軟件，操作系統(tǒng)采用Windows系列操作系統(tǒng)，數(shù)據(jù)庫管理系統(tǒng)采用Visual Basic與Access相結(jié)合，這些軟件都是很常見，在系統(tǒng)開發(fā)中被大量應(yīng)用的，技術(shù)也都達(dá)到了比較成熟的階段。 本系統(tǒng)需要的硬件，軟件支持都比較容易得到，公司也急需改變原來的倉庫作業(yè)方式。 庫存有很多的管理體制，每件入庫物品都有相應(yīng)的記錄，出庫也要對相應(yīng)的物品進(jìn)行刪減，同時(shí)入庫和出庫必須對每個(gè)物品的相應(yīng)數(shù)量和單價(jià)進(jìn)行錄入。 另外，要將開發(fā)系統(tǒng)運(yùn)用到倉庫作業(yè)中，倉庫作業(yè)方式區(qū)別與過去，所以，需要對倉庫管理員進(jìn)行一個(gè)系統(tǒng)運(yùn)用前的培訓(xùn)，倉庫的工作人員也都很樂意接受培訓(xùn)。 （2）貨品查詢（入庫查詢，出庫查詢，庫存查詢）；該模塊用于貨品入庫，出庫，庫存的查詢。 （4）系統(tǒng)維護(hù)（操作員管理，密碼修改）；該模塊可以注冊新用戶，刪除現(xiàn)有的用戶，現(xiàn)有用戶密碼的修改。運(yùn)用API函數(shù)SetWindowPos，來實(shí)現(xiàn)取消窗體置前的功能On Error Resume NextDim MPassword As StringIf = mr And = mingrisoft Then 39。 amp。 39。判斷數(shù)據(jù)的密碼是否正確 (2).Text = 當(dāng)前操作員： + (M_Name) Name1 = 39。 \) For Input As 1 Do While Not EOF(1) Line Input 1, Intext TStr = TStr + Intext + Chr(13) + Chr(10) Loop Close 1 TStr = TStr + + Name1 + + Format(Now, yyyymmdd hh:mm:ss) + + 系統(tǒng)登錄 + Chr(13) + Chr(10) Open ( amp。以貨品入庫做為說明，實(shí)現(xiàn)代碼： Private Sub Cmd_Add_Click() For i = 0 To 5 39。將數(shù)據(jù)庫記錄移向最后一條 StrNum = Val((ID)) + 1 39。位數(shù)不足則補(bǔ)0 Case 1 StrTemp = 00000 Case 2 StrTemp = 0000 Case 3 StrTemp = 000 Case 4 StrTemp = 00 Case 5 StrTemp = 0 Case 6 StrTemp = End Select Text1(0).Text = J amp。 Trim(Str(StrNum)) Else Text1(0).Text = J000001 39。圖 進(jìn)入貨品入庫 貨品入庫界面 在貨品入庫的信息錄入中，如果信息輸入不完整，則無法完成入庫，會(huì)出現(xiàn)Msgbox提醒“貨品數(shù)量、單價(jià)或名稱不能為空值！”（）圖 貨品入庫輸入信息不完整 在貨品查詢模塊中，包括入庫查詢，出庫查詢和庫存查詢?nèi)齻€(gè)模塊。運(yùn)用API函數(shù)SetWindowPos，來實(shí)現(xiàn)使窗體置前的功能39。Data Source= amp。 \。連接出庫信息數(shù)據(jù)表 = ( ) / 2 39。圖 進(jìn)入出庫查詢圖 出庫信息查詢界面 數(shù)據(jù)報(bào)表模塊 數(shù)據(jù)報(bào)表中包括出庫報(bào)表，庫存報(bào)表。方便對倉庫的情況進(jìn)行了解。使窗體置前End SubPrivate Sub DataReport_QueryClose(Cancel As Integer, CloseMode As Integer) = True導(dǎo)出End Sub打印 庫存信息明細(xì)表 在庫存信息明細(xì)表預(yù)覽里有個(gè)打印按鈕和導(dǎo)出按鈕（），點(diǎn)擊這兩個(gè)按鈕，分別能實(shí)現(xiàn)打印和導(dǎo)出功能。圖 “導(dǎo)出”對話框 操作員管理包括注冊新用戶和刪除現(xiàn)有用戶。圖 注冊新用戶界面實(shí)現(xiàn)代碼： Private Sub Command1_Click() rtn = SetWindowPos(, 2, 0, 0, 0, 0, 3) 39。 + Text1 + 39。判斷注冊的用戶名是否存在 If 0 Then MsgBox 該用戶名已經(jīng)存在,請您更換其他用戶名!, 48, 提示信息 = 39。判斷兩次輸入的密碼是否一致 = select * from tb_enter order by M_ID If 0 Then = Val((M_ID)) + 1 Else = 1 End If Call main 39。 Text5 amp。 amp。 39。 amp。 39。 amp。 39。039。039。039。039。039。039。039。039。039。039。039。039。039。039。039。039。039。039。039。039。039。圖 刪除現(xiàn)有的用戶的界面實(shí)現(xiàn)代碼： Private Sub Command2_Click() rtn = SetWindowPos(, 2, 0, 0, 0, 0, 3) 39。如果是當(dāng)前登錄的用戶名，則不允許刪除 MsgBox 不能刪除當(dāng)前用戶名!!, 48, 提示信息 Else a = MsgBox(您確認(rèn)要?jiǎng)h除該用戶嗎?, 17, 刪除用戶信息提示) If a = vbOK Then = select * from tb_enter where M_Name=39。 If 0 Then 39。用戶進(jìn)入密碼修改界面（）,輸入用戶名，舊密碼，新密碼以及確認(rèn)新密碼，點(diǎn)擊確認(rèn)按鈕，Msgbox提醒“密碼修改成功！”。運(yùn)用API函數(shù)SetWindowPos，來實(shí)現(xiàn)取消窗體置前的功能Call main If = Or = Or = Or = Then MsgBox 輸入不能為空!!, 48, 提示信息 Else 39。 amp。 39。 + + 39。判斷數(shù)據(jù)的密碼是否正確 MsgBox 兩次輸入的密碼不一致,請您確認(rèn)后重新輸入, 48, 提示信息 = = Else 39。 + + 39。 + + 39。圖 退出系統(tǒng)主界面6 結(jié)論倉庫管理在公司管理中占有極為重要的地位，大力改進(jìn)倉庫管理，可以節(jié)省大量的人力物力。我的畢業(yè)設(shè)計(jì)是為新生活集團(tuán)（中國）有限公司徐州分公司的倉庫建立一個(gè)倉庫管理系統(tǒng)，解決公司倉庫管理問題。數(shù)據(jù)報(bào)表和查詢統(tǒng)計(jì)兩個(gè)模塊的設(shè)計(jì)，可以使公司事務(wù)局的管理人員對公司倉庫的庫存情況一目了然。一個(gè)設(shè)計(jì)，不僅僅是設(shè)計(jì)系統(tǒng)，不像我想象的那么簡單。因?yàn)橹皩isual Basic只是簡單的了解，只會(huì)做一些簡單的如添加基本的控件和編寫簡單的代碼，當(dāng)在做這個(gè)畢業(yè)設(shè)計(jì)的時(shí)候才發(fā)現(xiàn)所了解的這些功能遠(yuǎn)遠(yuǎn)不夠，只能隨學(xué)隨用。經(jīng)過了這么久好不容易才完成這個(gè)系統(tǒng)。附錄英文資料原文：From the perspective of modern logistics systems, storage is an important part of logistics is the logistics system, distribution center, hoping for effective logistics warehouse here, scientific management and control, so that the logistics system more smoothly, more reasonable to run. In this paper, the importance of starting from the warehouse, bining theory and practice, through an enterprise storage and logistics activities in the space and cargo space to analyze how the activities in the warehouse through the space and cargo space management to improve storage efficiency, reduce storage costs. Case Background: Photoelectric Technology Co., Ltd. of a storage management. A Photoelectric Technology Co., Ltd. located in Guangdong Huizhou Jinyuan Industrial Zone, which was established in 1998, is a professional lighting devices and electrical equipment manufacturers, it is the industry39。s extensive approval and praise. In order to adapt to the new form of strategic development needs, the Company39。s supply chain, logistics, warehousing and distribution systems and customer service system. The