【正文】 owData = strRowData amp。 vbTab strRowData = strRowData amp。 vbTab 臨沂師范學院 2020屆本科畢業(yè)論文 14 strRowData = strRowData amp。 vbTab strRowData = strRowData amp。 vbTab strRowData = strRowData amp。 vbTab strRowData = strRowData amp。 vbTab strRowData = strRowData amp。 vbTab strRowData = strRowData amp。 為了在 MSFlexGrid 控件中顯示設備的信息，我們首先定義了一個 fillDeviceGrid過程，然后再調(diào)用它。 (4)設置各控件的相關屬性，設計完成主體。打開“按鈕”選項卡。 (2)雙擊工具箱中的 Toolbar 控件將添加一個工具欄，默認 Toolbar 控件將出現(xiàn)在窗體的最上方。 添加工具欄 (1)工具欄中按鈕的功能與菜單欄中的功能相對應，添加工具欄的步驟如下。彈出“菜單編輯器”對話框。右擊窗體。選擇“ MDI 窗體”選項，然后單擊“打開”按鈕 ，如圖 14 所示 。 [14] 單擊【新建】按鈕 選擇【新建工程】選項，打開“新建工程”對話框，選擇“標準EXE”選項，然后單擊“確定”按鈕，新建一個工程 ，如圖 13 所示 。這個系統(tǒng)主要的功能是在一個窗體 中實現(xiàn)的。此外 模塊還有一個 loadData 函數(shù)，它的功能是按照 SQL 語句提取設備記錄，從而實現(xiàn)查詢的功能。 的屬性有 Department、 DeptNo、 DeviceModel、 DeviceName、DeviceNo、 DiscardDate、 iid、 isDirty、 ProductCost、 ProductPrice、 PurchaseDate、 RejectDate、 Status、 TypeName 和 TypeNo,各個屬性的數(shù)據(jù)類型和屬性聲明如圖 11 所示。在這里可以對設備進行添加、刪除、查詢、報廢、注銷和借入借出操作。此外 模塊還有一個 loadData 函數(shù)，它的功能是按照 SQL 語句提取用戶信息，從而實現(xiàn)查詢的功能。 [14] 的屬性有 isDirty、 Level、 uid 和 UserName,各個屬性的數(shù)據(jù)類型和屬性聲明 如 圖 9 所示。在這里可以驗證用戶密碼、查詢、添加、和刪除用戶。然后在 Visual Basic 界面中，單擊【外接程序 】 【類生成器實用工具 】 選項打開的類生成器實用工具，如圖 10 所示。 加載類生成器實用工具，單擊 【 外接程序 】 【外接程序管理器 】 選項打開如圖 8 所示的外接程序管理器。這樣的設計提高了系統(tǒng)的安全性、可繼承性和可拓展性 。 。 _ amp。 過程“ Main”的代碼如下： Public Sub Main() Dim Conn As String Set gConn = New On Error GoTo err_handle Conn = Provider=。 [1113] 圖 6 添加 Activce控件 模 公共 塊 這個模塊包括一個函數(shù)和一個過程。 表 5 “設備類型信息 tblTypeInfo）的字段設置 字段名 類型 大小 空值 描述 TID int 4 編號 TypeNO nvarchar 10 類型代碼 TypeName nvarchar 50 Y 類型名稱 臨沂師范學院 2020屆本科畢業(yè)論文 7 3 程序開發(fā) 系統(tǒng)主要功能模塊程序設計 添加 Activce 控件 打開“ 【 工程 】 ” 選項 ，單擊【 部件 】按鈕，打開“ 部件 ” 選項 ， 選擇如 圖 6 所示選擇 如圖所示選項 添加如圖的所示的選項 。 表 3 “設備信息”表（ tblDevice）的數(shù)據(jù)結(jié)構(gòu) 字段名 類型 大小 空值 描述 IID int 4 編號 DeviceNO nvarchar 20 設備代碼 DeviceName nvarchar 50 Y 設備名稱 DeviceModel nvarchar 10 Y 設備型號 TypeNO nvarchar 10 Y 類型代碼 DeptNO nvarchar 10 Y 部門代碼 ProductPrice money 8 Y 價格 ProductCost money 8 Y 折舊 ProductDate smalldatetime 4 Y 購買日期 Status int 4 Y 狀態(tài) RejectDate smalldatetime 4 Y 報廢日期 DiscardDate smalldatetime 4 Y 注銷日期 RecordDate smalldatetime 4 Y 操作日期 “ 計入借出 信息 （ tblLend）的 數(shù)據(jù)結(jié)構(gòu) 如表 4 所示。 表 1 “用戶信息”表（ tblUser）的數(shù)據(jù)結(jié)構(gòu) 字段名 類型 大小 空值 描述 UID int 4 編號 Login nvarchar 20 用戶名 Pwd nvarcha 10 密碼 UserLevel smallint 2 Y 權(quán)限水平， 1為數(shù)據(jù)操作員， 1為系統(tǒng)管理員， 2為普通用戶 CreateDate smalldatetime 4 Y 創(chuàng)建日期 設備類型 編號 類型代碼 類型名稱 借入借出 設備編號 借入機構(gòu) 借入日期 借入人 操作 編號 臨沂師范學院 2020屆本科畢業(yè)論文 5 “部門信息”表（ tblDepartment）的 數(shù)據(jù)結(jié)構(gòu) 如表 2 所示。 圖 4 “借入借出信息”實體的 ER圖 “ 設備類型 ”實體的 ER 圖如圖 5 所示。 圖 2 “ 部門信息”實體的 ER圖 “設備 信息”實體的 ER 圖如圖 3 所示。 [910] 數(shù)據(jù)庫設計 數(shù)據(jù)庫概念結(jié)構(gòu)設計 “用戶信息”實體的 ER 圖如圖 1 所示。 報表管理模塊 ：包含 設備登記卡、部門統(tǒng)計表、注銷統(tǒng)計表、報廢統(tǒng)計表。 查詢設備模塊 ： 包含 查詢設備和查看全被設備。 [8] 系統(tǒng)功能分析 經(jīng) 過上述系統(tǒng)功能分析和需求總結(jié)，設計如下 系統(tǒng)功能結(jié)構(gòu) 。本功能實現(xiàn)對 設備 信息的管理、統(tǒng)計、查看及維護。 企業(yè) 管理者的需求管理 設備的 信息，可以新增、修改、刪除 設備 的信息，并且可以對系統(tǒng)更新維護。 2 系統(tǒng)設計 系統(tǒng)分析 應用需求分析 企業(yè) 設備 管理信息系統(tǒng)需要滿 足 來自兩方面的需求，這兩個方面分別是企業(yè)的員工和系統(tǒng)管理者。實際上，這種認識是錯誤的，企業(yè)資源計劃系統(tǒng)和設備資源管理系統(tǒng)是兩個建設目標、建設內(nèi)容、實施方法和管理績效不同。 企業(yè)管理的各個方面都面臨著信息化建設的要求。使管理人員對所有設備的使用和折舊信息基本概況能夠一目了然，便于管理，并能夠極大地提高工作人員的工作效率，節(jié)約人力資源。在實際應用中，企業(yè)設 備管理系統(tǒng)代替了原來的人工操作，從而快速、準確地對設備的各種信息進行管理和維護。企業(yè)根據(jù)市場需求和市場預測，決定進行產(chǎn)品的生產(chǎn)經(jīng)營活動；在產(chǎn)品的設計、試制、加工、銷售和售后服務等全過程的生產(chǎn)經(jīng)營活動中，無不體現(xiàn)出設備管理的重要要性。因為默認的屬性和方法已經(jīng)有一部分定義在了組件內(nèi)，所以程序員不用寫多少代碼就可以完成一個簡單的程序。VB 使用了可以簡單建立應用程序的 GUI 系統(tǒng)，但是又可以開發(fā)相當復雜的程序。在 Visual Basic 環(huán)境下，利用事件驅(qū)動的編程機制、新穎易用的可視化設計工具，使用 Windows 內(nèi)部的廣泛應用程序接口（ API）函數(shù)，以 用動態(tài)鏈接庫（ DLL）、對象的鏈接與世隔嵌入（ OLE）、開放式數(shù)據(jù)連接（ ODBC）等技術，可以高效、快速地開發(fā) Windows 環(huán)境下功能強大、圖形界面豐富的應用軟件系統(tǒng)。 Visual Basic 是一種可視化的、面向?qū)ο蠛筒捎檬录?qū)動方式的結(jié)構(gòu)化高級程序設計語言，可用于開發(fā) Windows 環(huán)境下的各類應用程序。 VB 擁有圖形用戶界面（ GUI）和快速應用程序開發(fā)（ RAD）系統(tǒng)，可以 輕易的使用 DAO、 RDO、 ADO 連接數(shù)據(jù)庫，或者輕松的創(chuàng)建 ActiveX 控件。Equipments management system 臨沂師范學院 2020屆本科畢業(yè)論文 III 目 錄 1 緒論 ................................................................... 1 VB 系統(tǒng)簡介 ........................................................ 1 課題研究的目的與意義 ............................................... 1 設計目的 ....................................................... 1 設計意義 ....................................................... 2 2 系統(tǒng)設計 ............................................................... 2 系統(tǒng)分析 ........................................................... 2 應用需求分析 ................................................... 2 系統(tǒng)功能分析 ................................................... 2 數(shù)據(jù)庫設計 ......................................................... 3 數(shù)據(jù)庫概念結(jié)構(gòu)設計 ............................................. 3 數(shù)據(jù)庫邏輯結(jié)構(gòu)設計 ............................................. 4 3 程序開發(fā) ............................................................... 7 系統(tǒng)主要功能模塊程序設計 ........................................... 7 添加 Activce 控件 ............................................... 7 模公共塊 ........................................................ 7 類模塊 ......................................................... 8 窗體設計 .......................................................... 11 創(chuàng)建主窗體 .................................................... 11 創(chuàng)建系統(tǒng)主菜單 ................................................ 12 添加工具欄 .................................................... 12 創(chuàng)建設備管理模塊 .................................................. 12 創(chuàng)建“添加設備”選項