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