畢業設計論文---企業生產管理系統(編輯修改稿)

　

【文章內容簡介】 系統的前期設計 應用程序設計結構 （ 1） 建立數據庫 ， 基本資料就存放在其中，通過 SQL Server建立數 據庫 ； （ 2） 用 VB開發出界面，使用 ADO控件 連接數據庫，通過 DATAGRID 和 TEXT顯示出來； （ 3） 在應用程序中用查詢和統計等手段對數據庫的資料進行處理，得到有效的數據，分析管理情況，得出結論和措施，然后就可以通過措施，達到管理提高效率的目的。 多用戶登陸問題 （ 1） 建立模塊， Module1； （ 2） 在模塊中申明變量 Public jibie； （ 3） 在數據庫建立用戶表，存放用戶名和密碼，然后輸入多個用戶 ； （ 4） 通過 ADO代碼連接到數據庫。 ； （ 5） 通過 SQL語句 判斷是否用戶數據庫 有； （ 6） 如果沒有則退出； （ 7） 如果有通過 SQL語句判斷是否密碼正確； （ 8） 如果正確則發送數據庫的該用戶名到公共變量 jibie = myrs(jibie)； （ 9） 通過變量決定各個用戶的權限。 多文檔界面 多文檔界面 （ MDI） 不同于單文檔界面 ,下面介紹其設計方法 : （ 1） 新建一個工程企業生產 ； （ 2） 將其中的 Form1的 MDIChild屬性設為 True。 ； （ 3） 從菜單中選擇 “ 工程 添加 MDI窗體 ” ； （ 4） 給 Form1的 Load事件添加如下代碼： Private Sub Form_Load() End Sub 數據庫設計 徐州建筑職業技術學院畢業設計說明書 11 （ 1）企業生產表（見表 51） 表名稱標識： tb_SCGL_qysc 表 51 企業生產表 （ 2）車間部門 設置表（見表 52） 表名稱標識： tb_SCGL_cjsz 表 52 車間部門 設置表 （ 3）產品入庫信息表（見表 53） 表名稱標識： tb_SCGL_cprk 表 53 產品入庫信息表 （ 4）產品信息設置表（見表 54） 表名稱標識： tb_SCGL_cpxx 字 段 名 數 據 類 型 數 據 長 度 id 文本型（ char） 50 企業生產名 文本型（ char） 50 內容 文本型（ char） 50 摘要 文本型（ char） 50 部門 文本型（ char） 50 狀態 文本型（ char） 50 時間 時間型（ data） / 徐州建筑職業技術學院畢業設計說明書 12 表 54 產品信息設置表 （ 5）設備報廢信息表（見表 55） 表名稱標識： tb_SCGL_sbbf 表 55 設備報廢信息表 （ 6）設備類型設置表（見表 56） 表名稱標識： tb_SCGL_sblx 表 56 設備類型設置表 （ 7）設備 攤銷時間設置表（見表 57） 表名稱標識： tb_SCGL_sbtx 表 57 設備攤銷時間設置表 （ 8）設備維修信息表（見表 58） 表名稱標識： tb_SCGL_sbwx 徐州建筑職業技術學院畢業設計說明書 13 表 58 設備維修信息表 （ 9）設備狀態設置表（見表 59） 表名稱標識： tb_SCGL_sbzt 表 59 設備狀態設置表 （ 10）生產計劃單表（見表 510） 表名稱標識： tb_SCGL_scjhd 表 510 生產計劃單表 （ 11）生產領料表（見表 511） 表名稱標識： tb_SCGL_scll 表 511 生產領料表 徐州建筑職業技術學院畢業設計說明書 14 （ 12）生產設備查詢表（見表 512） 表名稱標識： tb_SCGL_scsb 表 512 生產設備查詢表 （ 13）物料庫存表（見表 513） 表名稱標識： tb_SCGL_wlkc 表 513 物料庫存表 系統主要實現的功能 生產管理系統是根據企業生產過程中的實際需求開發的一套數據庫管理軟件，對于生產過程中的產品、物料及設備進行系統化的管理，將產品的生產及物料的需求生成計劃單的同時，配備了全方位的查詢功能。對于物料及完工的產品進行入庫集中管理，在確保企業正常生產的同時 ，降低了庫存成本，提高了生產效率。 用戶在使用本系統時，請注意以下兩點： （ 1） 系統自動生成單據編號，不可以更改； （ 2） 系統支持按〈 Enter〉鍵跳到下一文本框的功能，用戶無需通過鼠標定位光標位。 系統的主要功能模塊 有 ： （ 1） 基本信息管理包括： 產品基礎信息、物料基本信息、設備狀態設置、設備類型設置、設備攤銷時間設置和車間部門設置。通過基本信息的設置可以對企業的產品、物料及徐州建筑職業技術學院畢業設計說明書 15 設備進行集中的規范化管理。 （ 2） 計劃信息管理菜單主要包括：生產計劃單管理、生產計劃單查詢、物料需求計劃、物料需求查詢。通過這四個模塊 的設置可以將企業的生產及物料的需求作成計劃單，并配以查功能，提高企業的生產效率。 （ 3） 生產設備管理主要包括：生產設備檔案、生產設備查詢、生產設備報廢、生產設備報廢查詢、生產設備維修和生產設備維修查詢。通過這幾個模塊的設置可以將生產設備存檔，進行系統管理，以確保企業生產的正常運行。 （ 4） 產品庫存管理菜單主要包括：產品完工入庫、產品入庫查詢、物料入庫、物料入庫查詢、生產領料、生產領料查詢和物料庫存信息查詢。通過產品庫存管理各模塊的設置可以將產品、物料和生產領料的數據系統管理，配以查詢功能，同時生成查詢報表。 （ 5） 系統維護包括： 操作員設置、密碼修改、操作權限設置、數據清理、調用主窗口圖片 。系統維護中各模塊的設置可以確保系統數據的安全性。 系統 模塊 結構 圖 如圖 51所示： 圖 51 系統模塊 結構 圖 各 子 模塊功能圖如下： （ 1）基礎信息管理模塊功能圖如圖 52 所示： 企業 生 產 管理 系統 基礎信息管理模塊 計劃信息管理 模塊 生產設備管理 模塊 產品庫存 管理模塊 系統維護 模塊 徐州建筑職業技術學院畢業設計說明書 16 圖 52 基礎信息管理模塊功能圖 （ 2） 產品庫存 管理模塊功能圖 如圖 53 所示： 圖 53 產品庫存管理模塊功能圖 產品庫存管理 產品完工入庫 產品入庫查詢 物料入庫 物料入庫查詢 生產領料 生產領料查詢 物料庫存 基礎信息管理 產品基礎信息 物料基本信息 設備狀態設置 設備類型設置 設備攤銷時間設置 車間部門設置 徐州建筑職業技術學院畢業設計說明書 17 6 系統詳細設計 用戶 界面的實現 根據已有的需求分析和系統的概要設計，在 此基礎上進行系統的詳細設計和實現。為此，建立了一個工程，系統的設計和實現如下。 （ 1） 登錄界面 登錄界面的設計實現如圖 61所示： 圖 61 用戶登錄界面 在工程引用 。 在命令按鈕單擊寫下連接數據庫 USER表的判斷語句 ： Private Sub Command1_Click() denlu_name = 定義登陸名變 量 denlu_pass = 定義登陸密碼變量 Dim my As New 定義 ADO 連接 Dim myrs As New 定義 ADO 記錄集 Set myrs = New Provider=。Data Source=。 SELECT * FROM [user] where ()=39。 + mname + 39。and jibie=39。 + jibie + 39。, my, adOpenKeyset, adLockOptimistic 設置 ADO 記錄集的路徑并打開數據庫，用 SQL 打開表 If = True And = True Then 如果沒找到 MsgBox 查無此人 , , 登陸企業生產 彈出企業生產 查無此人 Else 徐州建筑職業技術學院畢業設計說明書 18 If myrs(pass) = denlu_pass Then 如果找到 39。39。39。39。39。39。39。39。39。39。39。39。39。39。39。39。39。39。39。39。39。39。39。39。39。39。39。39。39。39。39。39。39。39。39。39。39。39。39。39。39。39。 MsgBox ok, , 登陸企業生產 彈出企業生產 OK jibie = myrs(jibie) Unload Me 關閉 目的是 USER 表沒有該用戶，將無法使用本程序 jibie = myrs(jibie) 將公共變量 jibie 設為用戶的身份 （ 2）主界面 主模塊負責應用程序的主界面，由它調用其他模塊。因此，主模塊應該具有操作性好、界面清晰、使用戶能夠方便地找到所需功能的物點。 根據功能需求的結果，其系統主界面如圖 62 所示。用戶可以單擊相應的菜單進入相應的功能模塊。 其中 有各個子系統的菜單項，在 主界面上有工具欄按鈕，集成了用戶常用的功能，為了方便用戶操作。 圖 62 系統主界面 其他功能的實現 （ 1） 基本信息管理 基本信息管理包括：產品基礎信息、物料基本信息、設備狀態設置、設備類型設置、設備攤銷時間設置和車間部門設置。通過基本信息的設置可以對企業的產品、物料及設備徐州建筑職業技術學院畢業設計說明書 19 進行集中的規范化管理。 （ 2） 產品基礎信息 單擊菜單中“基本信息管理” /“產品基礎信息”選項，進入如圖 63所示的界面。 圖 63 產品信息設置 添加：單擊【添加】按鈕，系統自動生成產品編號，單擊“產品名稱”、“產品規格” 、“計量單位”及“備注信息”文本框，輸入相關內容，最后單擊【保存】按鈕即完成產品的添加操作。 修改：單擊列表中要修改的產品信息，然后單擊【修改】按鈕即可在各文本框內進行修改，最后單擊【保存】按鈕即完成修改操作。 刪除：單擊要刪除的產品信息，單擊【刪除】按鈕，系統彈出的提示框進行確認后即完成刪除操作。 查找：單擊【查找】按鈕，系統彈出圖 64 所示的模塊，單擊文本框，輸入要查詢的產品編號，然后單擊【確定】按鈕，圖 63的列表中會自動顯示相應的查詢結果。 圖 64 產品信息查詢 功能實現代碼如下： Private Sub Toolbar1_ButtonClick(ByVal Button As ) 徐州建筑職業技術學院畢業設計說明書 20 Select Case Case add 39。添加 blnAdd = True tlbState Toolbar1, True select * from tb_SCGL_cpxx order by cpxx_id, n, adOpenStatic If 0 Then Text1(0) = CP + Format(Val(Right(Trim((cpxx_id)), 3)) + 1, 000) 39。編號自動加 1 Else Text1(0) = CP001 End If For i = 1