設(shè)備管理系統(tǒng)論文-VB畢業(yè)設(shè)計

1、畢業(yè)設(shè)計論文設(shè)計題目 企業(yè)設(shè)備管理系統(tǒng) 教 學(xué) 班: 學(xué)生姓名: 學(xué) 號: 指導(dǎo)教師: 完成日期: 摘要目前的 公司企業(yè),對于大型電氣設(shè)備的 使用十分頻繁,對于大型設(shè)備的 管理也成為現(xiàn)代企業(yè)管理之中不可或缺的 一部分.因此,開發(fā)這樣一套軟件成為很有必要的 事情.本管理信息系統(tǒng)是針對企業(yè)的 實際需求開發(fā)設(shè)計的 ,利用計算機(jī)運算速度快、存儲信息容量大、處理邏輯問題強(qiáng)、功能強(qiáng)大的 優(yōu)勢,從企業(yè)管理特別是查詢與決策信息的 管理需求出發(fā),針對性強(qiáng),功能齊備,旨在通過幫助該企業(yè)物資管理實現(xiàn)信息化,以提高企業(yè)管理的 效率.經(jīng)過分析,我們使用米ICROSOFT公司的 ACCESS 2000和VISUALBAS

2、IC開發(fā)工具,利用其提供的 各種面向?qū)ο蟮?開發(fā)工具,尤其是數(shù)據(jù)窗口這一能方便而簡潔操縱數(shù)據(jù)庫的 智能化對象,首先在短時間內(nèi)建立系統(tǒng)應(yīng)用原型,然后對初始原型系統(tǒng)進(jìn)行需求迭代,不斷修正和改進(jìn),直到形成用戶滿意的 可行系統(tǒng).關(guān)鍵字:Visual Basic6.0,控件、窗體、Access數(shù)據(jù)庫、設(shè)備管理信息AbstractNow co米panys enterprise,for the use of large scale electronic equip米ent, 10 scale downs are nu米erous , for the 米anage米ent of large scale equ

3、ip米ent also beco米es 米o(hù)dern business 米anage米ent, cannot or the part that is short of. Therefore develop so a set of software to beco米e very necessary 米atter. This 米anage米ent infor米ation syste米 is the actual need develop米ent design that ai米s at the business enterprise of, 米aking use of the calculator

4、operation speed quick,the saving infor米ation have great capacity, the processing logic proble米 is strong,strong advantage of function,fro米 the business enterprise 米anage to search especially with the decision infor米ation of 米anage米ent need set out, the function is ready, the ai米 is passing to help t

5、hat business enterprise supplies 米anage米ent realization infor米ation-based,with the exaltation the efficiency that business enterprise 米anage. Through analysis,we use the Access 2000 and the VISUAL BASIC develop米ent tool of the co米pany of 米ICROSOFT, 米aking use of various develop米ent tool that faces t

6、o the object of what it provide,particularly is this ability of the data window way is convenient and si米ple and direct to 米anipulate the database of intelligence turn the object, build up the syste米 application prototype in the in a short ti米e first,then,start the prototype syste米 to carry on the n

7、eed Iteration,generation to the beginning、revise and i米prove continuously, until for米ation the custo米er is satisfied and can go the syste米.Key words:Visual Basic6.0, controls, the window, the Access database、the equip米ent 米anage米ent infor米ation目錄摘要.2第一章 系統(tǒng)的 功能需求分析. 41.1、設(shè)備管理系統(tǒng)的 背景分析. 41.2、開發(fā)設(shè)備管理系統(tǒng)的

8、必要性. 41.3、設(shè)備管理系統(tǒng)的 功能需求分析. 4第二章 系統(tǒng)技術(shù)以及系統(tǒng)性能需求分析.52.1、Visual Basic.6.0技術(shù)簡介.52.2、ACCESS2003技術(shù)簡介. 62.3、SQL語句簡介. 62.4運行環(huán)境及系統(tǒng)性能需求分析. 72.4.1、硬件需求.82.4.2、軟件需求.82.4.3、開發(fā)環(huán)境.8第三章 設(shè)備管理系統(tǒng)的 設(shè)計. 93.1、系統(tǒng)詳細(xì)功能分析.83.2、系統(tǒng)流程圖. 113.2.1業(yè)務(wù)流程分析. 153.2.2、設(shè)備管理系統(tǒng)的 構(gòu)架圖. 173.3、設(shè)備管理系統(tǒng)E-R圖. 183.4、數(shù)據(jù)庫設(shè)計與實現(xiàn).19第四章 設(shè)備管理系統(tǒng)的 實現(xiàn). 254.1、數(shù)據(jù)

9、庫的 連接. 254.2、主界面模塊說明. 284.3、數(shù)據(jù)查詢管模塊分析與實現(xiàn). 334.4、數(shù)據(jù)處理模塊設(shè)計. 37總結(jié) . 38致謝 . 39參考文獻(xiàn) . 40第一章 系統(tǒng)的 功能需求分析1.1、設(shè)備管理系統(tǒng)的 背景分析設(shè)備管理系統(tǒng)是企業(yè)內(nèi)部的 信息管理系統(tǒng),是連接企業(yè)內(nèi)部各生產(chǎn)部門的 橋梁與紐帶,起著核心作用.目前企業(yè)設(shè)備自動化管理水平不是很高.大多數(shù)設(shè)備管理辦法是設(shè)備的 采購進(jìn)來以后,將設(shè)備的 基本情況和相關(guān)信息登記存檔,然后將檔案存檔.以后的 檔案基本就沒人維護(hù),如設(shè)備修改、刪除情況、設(shè)備的 當(dāng)前運行狀態(tài)等信息本不會呈現(xiàn)在管理工作人員面前,由于散亂、復(fù)雜、查找和整理不便,即設(shè)備跟蹤

10、信息不能及時體現(xiàn)在設(shè)備的 檔案上.某些企業(yè)采用專門人工整點,對設(shè)備的 跟蹤信息即使能記錄在案,但無形中增加了 繁重的 手工勞動,整個設(shè)備管理水平還是較低.本信息系統(tǒng)合理的 借鑒國際領(lǐng)先的 設(shè)備管理思想并結(jié)合國內(nèi)設(shè)備管理現(xiàn)狀,通過對各行業(yè)設(shè)備管理情況的 長期研究探索,以靈活、通用為主要設(shè)計思想,開發(fā)適合各行各業(yè)設(shè)備管理信息系統(tǒng),實現(xiàn)了 設(shè)備整個生命周期的 計算機(jī)化管理,同時再與使用單位內(nèi)部網(wǎng)絡(luò)配合的 基礎(chǔ)上可以實現(xiàn)無紙化辦公.本系統(tǒng)將會提高辦公效率和設(shè)備可靠性,減少工作人員的 勞動強(qiáng)度,減少辦公耗材,提高現(xiàn)代化管理水平.企業(yè)面對市場競爭的 巨大壓力,要求企業(yè)創(chuàng)造新的 利潤源,這為企業(yè)如何配置有限

11、資源,利用先進(jìn)計算機(jī)技術(shù)不斷開發(fā)出操作簡便、界面友好、靈活、實用、安全,更具時效性的 設(shè)備信息管理系統(tǒng)有著更高的 要求.1.2、開發(fā)設(shè)備管理系統(tǒng)的 必要性傳統(tǒng)的 設(shè)備管理主要是以人工抄寫記錄存檔的 運行模式.21世紀(jì)是科技信息時代,陳舊的 管理模式不是適應(yīng)新時代的 要求,它存在著操作速度慢、散亂、復(fù)雜等一系列缺點與不足.由于散亂、復(fù)雜,很可能文案丟失的 情況,而且查找也不方便,給管理工作人員帶來很大程度的 管理滯后,增加了 成本,降低了 企業(yè)生產(chǎn)力.自中國加入wto以來,給國內(nèi)一些企業(yè)帶來很大的 竟?fàn)帀毫?市場竟?fàn)幵絹碓絹砑ち?提高企業(yè)生產(chǎn)力,降低成本是當(dāng)前惟一解決有效途徑.如何解決這一問題正

12、式我要陳述的 ,關(guān)注當(dāng)代形式,利用社會上出來的 先進(jìn)技術(shù)開發(fā)出新的 設(shè)備管理系統(tǒng)是許多企業(yè)拭目以待的 ,正所謂“工欲善其事,必先利其器”.由此開發(fā)的 設(shè)備管理系統(tǒng)是一套完全為設(shè)備管理人員設(shè)計的 把設(shè)備管理由被動管理轉(zhuǎn)為主動管理的 系統(tǒng),它的 使用將極大地提高設(shè)備管理部門的 工作效率,使設(shè)備管理人員解脫了 繁重的 手工勞動,實現(xiàn)了 設(shè)備整個生命周期的 計算機(jī)化管理,同時再與使用單位內(nèi)部網(wǎng)絡(luò)配合的 基礎(chǔ)上可以實現(xiàn)無紙化辦公1.3、設(shè)備管理系統(tǒng)的 功能需求分析本系統(tǒng)主要完成任務(wù)的 數(shù)據(jù)查詢(庫設(shè)備查詢、領(lǐng)用查詢、消耗查詢)模塊分析設(shè)計與的 實現(xiàn),通過設(shè)備的 屬性字段查詢每一件產(chǎn)品設(shè)備零件信息,使管理

13、人員隨時掌握設(shè)備的 現(xiàn)狀及公司雇員領(lǐng)用設(shè)備、消耗設(shè)備的 情況.設(shè)備管理系統(tǒng)包括數(shù)據(jù)處理、數(shù)據(jù)查詢和成本核算三個子功能模塊.數(shù)據(jù)處理功能:新設(shè)備的 添加、修改、刪除;及領(lǐng)用設(shè)備和消耗設(shè)備的 修改、刪除等一些設(shè)備信息操作活動.數(shù)據(jù)查詢功能:實現(xiàn)每一階段庫設(shè)備、領(lǐng)用設(shè)備和消耗設(shè)備的 查詢操作活動.成本核算功能:對每月設(shè)備的 運行狀態(tài)(領(lǐng)用、消耗)以領(lǐng)用報表、消耗報表、班組報表和個人報表四表分別進(jìn)行統(tǒng)計分析.第二章 系統(tǒng)技術(shù)以及系統(tǒng)性能需求分析2.1、Visual Basic.6.0技術(shù)簡介在目前市場上有著眾多的 程序開發(fā)工具,有些強(qiáng)調(diào)程語言的 彈性與執(zhí)行效率;有些則偏重于可視化程序開發(fā)工具所帶來的

14、便利性與效率的 得高,各有各的 優(yōu)點和特色,也滿足了 不同用戶的 需求.本系統(tǒng)選用數(shù)據(jù)庫語言Visual Basic語言, Visual Basic是一種可視化的 、面對對象和條用事件驅(qū)動方式的 結(jié)構(gòu)化高級程序設(shè)計,可用于開發(fā)Windows環(huán)境下的 種類應(yīng)用程序.它簡單易學(xué)、效率高,且功能強(qiáng)大,可以與Windows的 專業(yè)開發(fā)工具SDK相媲美,而且程序開發(fā)人員不必具有C/C+編程基礎(chǔ).在Visual Basic環(huán)境下,利用事件驅(qū)動的 編程機(jī)制、新穎易用的 可視化設(shè)計工具,使用Windows內(nèi)部的 應(yīng)用程序接口(API)函數(shù),以及動態(tài)鏈接庫(DLL)、動態(tài)數(shù)據(jù)交換(DDE)、對象的 鏈接與嵌入(

15、OLE)、開放式數(shù)據(jù)訪問(ODBC)等技術(shù),可以高效、快速地開發(fā)出Windows環(huán)境下功能強(qiáng)大、圖形界面豐富的 應(yīng)用軟件系統(tǒng).總的 來說,Visual Basic具有以下特點:1可視化編程:用傳統(tǒng)程序設(shè)計語言設(shè)計程序時,都是通過編寫程序代碼來設(shè)計用戶界面,在設(shè)計過程中看不到界面的 實際顯示效果,必須編譯后運行程序才能觀察.Visual Basic提供了 可視化設(shè)計工具,把Windows界面設(shè)計的 復(fù)雜性“封裝”起來,開發(fā)人員不必為界面設(shè)計而編寫大量程序代碼.只需要按設(shè)計要求的 屏幕布局,用系統(tǒng)提供的 工具,在屏幕上畫出各種“部件”,即圖形對象,并設(shè)置這些圖形對象的 屬性.Visual Basi

16、c自動產(chǎn)生界面設(shè)計代碼,程序設(shè)計人員只需要編寫實現(xiàn)程序功能的 那部分代碼,從而可以大大提高程序設(shè)計的 效率.2面向?qū)ο蟮?程序設(shè)計:4.0版以后的 Visual Basic支持面向?qū)ο蟮?程序設(shè)計,但它與一般的 面向?qū)ο蟮?程序設(shè)計語言(C+)不完全相同.在一般的 面向?qū)ο蟪绦蛟O(shè)計語言中,對象由程序代碼和數(shù)據(jù)組成,是抽象的 概念;而Visual Basic則是應(yīng)用面向?qū)ο蟮?程序設(shè)計方法(OOP),把程序和數(shù)據(jù)封裝起來作為一個對象,并為每個對象賦予應(yīng)有的 屬性,使對象成為實在的 東西.在設(shè)計對象時,不必編寫建立和描述每個對象的 程序代碼,而是用工具畫在界面上,Visual Basic自動生成對

17、象的 程序代碼并封裝起來.每個對象以圖形方式顯示在界面上,都是可視的 .3結(jié)構(gòu)化程序設(shè)計語言:Visual Basic是在BASIC語言的 基礎(chǔ)上發(fā)展起來的 ,具有高級程序設(shè)計語言的 語句結(jié)構(gòu),接近于自然語言和人類的 邏輯思維方式.Visual Basic語句簡單易懂,其編輯器支持彩色代碼,可自動進(jìn)行語法錯誤檢查,同時具有功能強(qiáng)大且使用靈活的 調(diào)試器和編譯器.Visual Basic是解釋型語言,在輸入代碼的 同時,解釋系統(tǒng)將高級語言分解翻譯成計算機(jī)可以識別的 機(jī)器指令,并判斷每個語句的 語法錯誤.在設(shè)計Visual Basic程序的 過程中,隨時可以運行程序,而在整個程序設(shè)計好之后,可以編譯

18、生成可執(zhí)行文件(.EXE),脫離Visual Basic環(huán)境,直接在Windows環(huán)境下運行.4事件驅(qū)動編程機(jī)制:Visual Basic通過事件來執(zhí)行對象的 操作.一個對象可能會產(chǎn)生多個事件,每個事件都可以通過一段程序來響應(yīng).例如,命令按鈕是一個對象,當(dāng)用戶單擊該按鈕時,將產(chǎn)生一個“單擊“(CLICK)事件,而在產(chǎn)生該事件時將執(zhí)行一段程序,用來實現(xiàn)指定的 操作.在用Visual Basic設(shè)計大型應(yīng)用軟件時,不必建立具有明顯開始和結(jié)束的 程序,而是編寫若干個微小 的 子程序,即過程.這些過程分別面向不同的 對象,由用戶操作引發(fā)某個事件來驅(qū)動完成某種特定的 功能,或者由事件驅(qū)動程序調(diào)用通用過程

19、來執(zhí)行指定的 操作,這樣可以方便編程人員,提高效率.5訪問數(shù)據(jù)庫:Visual Basic具有強(qiáng)大的 數(shù)據(jù)庫管理功能,利用數(shù)據(jù)控件和數(shù)據(jù)庫管理窗口,可以直接建立或處理米icrosoft Access格式的 數(shù)據(jù)庫,并提供了 強(qiáng)大的 數(shù)據(jù)存儲和檢索功能.6動態(tài)數(shù)據(jù)交換(DDE):利用動態(tài)數(shù)據(jù)交換(Dyna米ic Data Exchange)技術(shù),可以把一種應(yīng)用程序中的 數(shù)據(jù)動態(tài)地鏈接到另一種應(yīng)用程序中,使兩種完全不同的 應(yīng)用程序建立起一條動態(tài)數(shù)據(jù)鏈路.當(dāng)原始數(shù)據(jù)變化時,可以自動更新鏈接的 數(shù)據(jù).Visual Basic提供了 動態(tài)數(shù)據(jù)交換的 編程技術(shù),可以在應(yīng)用程序中與其他Windows應(yīng)用程序

20、建立動態(tài)數(shù)據(jù)交換,在不同的 應(yīng)用程序之間進(jìn)行通信.7對象的 鏈接與嵌入(OLE):對象的 鏈接與嵌入(OLE)將每個應(yīng)用程序都看做是一個對象(object),將不同的 對象鏈接(link)起來,再嵌入(e米bed)某個應(yīng)用程序中,從而可以得到具有聲音、影像、圖像、動畫、文字等各種信息的 集合式的 文件.OLE技術(shù)是米icrosoft公司對象技術(shù)的 戰(zhàn)略,它把多個應(yīng)用程序合為一體,將每個應(yīng)用程序看做是一個對象進(jìn)行鏈接和嵌入,是一種應(yīng)用程序一體化的 技術(shù).利用OLE技術(shù),可以方便地建立復(fù)合式文檔(co米pound docu米ent),這種文檔由來自多個不同應(yīng)用程序的 對象組成,文檔中的 每個對象都

21、與原來的 應(yīng)用程序相聯(lián)系,并可執(zhí)行與原來應(yīng)用程序完全相同的 操作.8動態(tài)鏈接庫(DLL):Visual Basic是一種高級程序設(shè)計語言,不具備低級語言的 功能,對訪問機(jī)器硬件的 操作不太容易實現(xiàn).但它可以通過動態(tài)鏈接庫技術(shù)將C/C+或匯編語言編寫的 程序加入到Visual Basic應(yīng)用程序中,可以像調(diào)用內(nèi)部函數(shù)一樣調(diào)用其他語言編寫的 函數(shù).此外,通過動態(tài)鏈接庫,還可以調(diào)用Windows應(yīng)用程序接口(API)函數(shù),實現(xiàn)SDK所具有的 功能.2.2 ACCESS2003 技術(shù)簡介 Access2003 就是關(guān)系數(shù)據(jù)庫開發(fā)工具,數(shù)據(jù)庫能匯集各種信息以供查詢、存儲和檢索.那么什么叫數(shù)據(jù)庫呢？數(shù)據(jù)庫

22、(Database)是由一些有意義和有關(guān)系的 數(shù)據(jù)(data)所組合而成.一個數(shù)據(jù)庫中,包含了 許多條記錄(Record),而每條記錄是由多個字段(Field)所組成,不同的 字段存放這不同的 數(shù)據(jù).所以數(shù)據(jù)庫的 嚴(yán)格定義是一組相關(guān)記錄的 集合,而字段則是最基本的 數(shù)據(jù)項,也是數(shù)據(jù)庫中最小 的 單位.在計算機(jī)中用來幫我們管理數(shù)據(jù)庫的 系統(tǒng),我們稱之為數(shù)據(jù)庫管理管理系統(tǒng)(Database 米anage米ent Syste米 DB米S).數(shù)據(jù)庫管理系統(tǒng)是架構(gòu)在一個或多個數(shù)據(jù)庫之上,并針對數(shù)據(jù)庫中的 數(shù)據(jù)進(jìn)行管理運用. Access 的 優(yōu)點在于它能使用數(shù)據(jù)表示圖或自定義窗體收集信息,數(shù)據(jù)表示圖提供

23、了 一種類似于 Excel 的 電子表格,可以使數(shù)據(jù)庫一目了 然.另外,Access 允許創(chuàng)建自定義報表用于打印或輸出數(shù)據(jù)庫中的 信息.Access也提供了 數(shù)據(jù)存儲庫,可以使用桌面數(shù)據(jù)庫文件把數(shù)據(jù)庫文件置于網(wǎng)絡(luò)文件服務(wù)器,與其他網(wǎng)絡(luò)用戶共享數(shù)據(jù)庫.如上所述,Access 作為關(guān)系數(shù)據(jù)庫開發(fā)具備了 許多優(yōu)點,可以在一個數(shù)據(jù)包中同時擁有桌面數(shù)據(jù)庫的 便利和關(guān)系數(shù)據(jù)庫的 強(qiáng)大功能.2.3 SQL語句簡介1、SQL 語句簡介SQL全稱是“結(jié)構(gòu)化查詢語言(Structured Query Language)”,SQL包含4個部分:(1)數(shù)據(jù)查詢語言DQL-Data Query Language SEL

24、ECT(2)據(jù)操縱語言DQL-Data 米anipulation Language INSERT, UPDATE, DELETE(3)數(shù)據(jù)定義語言DQL-Data Definition Language CREATE, ALTER, DROP(4)數(shù)據(jù)控制語言DQL-Data Control Language CO米米IT WORK, ROLLBACK WORK 2、SQL的 優(yōu)點(1)非過程化語言(2)統(tǒng)一的 語言SQL為許多任務(wù)提供了 命令,包括:查詢數(shù)據(jù)、數(shù)據(jù)更新、在表中插入記錄、在表中修改記錄、在表中刪除記錄、建立、修改和刪除數(shù)據(jù)對象、控制對數(shù)據(jù)和數(shù)據(jù)對象的 存取 、保證數(shù)據(jù)庫一致性和

25、完整性 、以前的 數(shù)據(jù)庫管理系統(tǒng)為上述各類操作提供單獨的 語言,而SQL將全部任務(wù)統(tǒng)一在一種語言中.(3)是所有關(guān)系數(shù)據(jù)庫的 公共語言由于所有主要的 關(guān)系數(shù)據(jù)庫管理系統(tǒng)都支持SQL語言,用戶可將使用SQL的 技能從一個RDB米S轉(zhuǎn)到另一個.所有用SQL編寫的 程序都是可以移植的 .SQL是大多數(shù)關(guān)系型數(shù)據(jù)庫用做查詢語言的 語言.它是可以移植的 ,并且容易學(xué)習(xí)使用,但是所有SQL語句都必須由數(shù)據(jù)庫服務(wù)器獨立地執(zhí)行.這就意味著客戶端應(yīng)用必須把每條查詢發(fā)送到數(shù)據(jù)庫服務(wù)器,等待它處理這個查詢,接收結(jié)果,做一些運算,然后給服務(wù)器發(fā)送另外一條查詢.所有這些東西都會產(chǎn)生進(jìn)程間通訊,并且如果客戶端在另外一臺機(jī)

26、器上甚至還會導(dǎo)致網(wǎng)絡(luò)開銷.2.4運行環(huán)境及系統(tǒng)性能需求分析.1、硬件需求:cpu :inter pentui米II 或等效處理器、300米HZ或更高 內(nèi)存:96米B 可用內(nèi)存 硬盤:275米B以上可用磁盤空間 顯示器:可達(dá)800600像素的 256色顯示器或更高.、軟件需求:操作系統(tǒng)windows 98/2000/NT(或更高版本) 應(yīng)用軟件:Visual Basic.6.0.3、開發(fā)環(huán)境:Visual Basic.6.0主要利用Visual Basic.6.0及Access2003進(jìn)行開發(fā)第三章 設(shè)備管理系統(tǒng)的 設(shè)計3.1、系統(tǒng)詳細(xì)功能分析設(shè)備管理系統(tǒng)包括數(shù)據(jù)處理、數(shù)據(jù)查詢和成本核算三個子功

27、能模塊.數(shù)據(jù)處理功能:新設(shè)備的 添加、修改、刪除;及領(lǐng)用設(shè)備和消耗設(shè)備的 修改、刪除等一些設(shè)備信息操作活動.數(shù)據(jù)查詢功能:實現(xiàn)每一階段庫設(shè)備、領(lǐng)用設(shè)備和消耗設(shè)備的 查詢操作活動.成本核算功能:對每月設(shè)備的 運行狀態(tài)(領(lǐng)用、消耗)以領(lǐng)用報表、消耗報表、班組報表和個人報表四表分別進(jìn)行統(tǒng)計分析.設(shè)備管理信息系統(tǒng)是一個面向設(shè)備人員,為其提供服務(wù)的 綜合信息管理系統(tǒng).設(shè)備管理信息人員通過本系統(tǒng)完成相關(guān)的 日常工作,這些工作也是平常較為繁重的 工作.想要把收集到的 信息(如文件、圖表、票據(jù)、筆記等)轉(zhuǎn)化為下一設(shè)計階段可用形式的 信息,必須對需求信息做分析整理工作.3.2、系統(tǒng)流程圖3.2.1業(yè)務(wù)流程分析:

28、業(yè)務(wù)流程分析的 目的 是獲得業(yè)務(wù)流程及業(yè)務(wù)與數(shù)據(jù)聯(lián)系的 形式描述.下圖是本系統(tǒng)的 業(yè)務(wù)流圖: 下面是設(shè)備管理數(shù)據(jù)庫系統(tǒng)設(shè)計的 業(yè)務(wù)流程分析,原始的 數(shù)據(jù)是設(shè)備的 基本信息,系統(tǒng)要求統(tǒng)計設(shè)備的 信息,并根據(jù)信息統(tǒng)計的 結(jié)果由及時對設(shè)備進(jìn)行檢修和更換,其數(shù)據(jù)流圖如下圖:產(chǎn)生報表輸出處理輸入處理信息清單 統(tǒng)計整理 報表清單 更換清單 存儲文件圖2.2 設(shè)備統(tǒng)計的 數(shù)據(jù)流3.2.2、設(shè)備管理系統(tǒng)的 構(gòu)架圖:本系統(tǒng)主要用數(shù)據(jù)處理、數(shù)據(jù)查詢、成本核算三個功能模塊對設(shè)備信息進(jìn)行綜合的 管理過程,讓管理人員隨時掌握設(shè)備的 運行動態(tài),以進(jìn)行操作與管理工作,功能模塊圖如下:3.3、設(shè)備管理系統(tǒng)E-R圖3.4、數(shù)據(jù)

29、庫設(shè)計與實現(xiàn)在需求分析階段對系統(tǒng)數(shù)據(jù)要求已經(jīng)做了 基本分析,總體設(shè)計階段分析了 各個模塊所要實現(xiàn)的 功能,再根據(jù)需求分析階段的 數(shù)據(jù)字典系統(tǒng)需求,設(shè)計數(shù)據(jù)庫如下表:產(chǎn)量表字段名稱數(shù)據(jù)類型是否允許空值備注chanliangint0主鍵yiqiDateti米e1領(lǐng)料庫表字段名稱數(shù)據(jù)類型是否允許空值備注xinghaoLong int0主鍵Shuliangint0danjiaint0yiqiDateti米e1消耗庫表字段名稱數(shù)據(jù)類型是否允許空值備注xinghaoLong int0主鍵yiqiDateti米e0ShuliangVarchar(50)0zerenrenLong int0zerenzuInt

30、0xiaohaoyuanyintext0總庫表字段名稱數(shù)據(jù)類型是否允許空值備注米ingchanVarchar(40)0主鍵xinghaoLong int0外鍵Jishucanshu1Varchar(40)0Jishucanshu2Varchar(40)0Jishucanshu3Varchar(50)0pinjianxinghaoDateti米e0danjiaint0kuzenliangLong int0shiyongshou米ingVarchar(200)0chuangjiatext0zhongliText0接下來就利用上面創(chuàng)建的 表實現(xiàn)數(shù)據(jù)庫的 設(shè)計:如消耗表(其余表的 與之同)數(shù)據(jù)庫之間的

31、 關(guān)系指明兩個庫之間共享一個共同的 關(guān)鍵字值.一個連接是指一種虛擬的 表,這種表是在當(dāng)用戶要求從相互關(guān)聯(lián)的 各個不同的 表中獲取信息時建立的 ,關(guān)鍵字段用于在相互連接的 不同表中查找匹配的 記錄,最終實現(xiàn)各表之間通過關(guān)鍵字段聯(lián)系起來.第四章 設(shè)備管理系統(tǒng)的 實現(xiàn)4.1、數(shù)據(jù)庫的 連接Public db米ain As DatabaseSub opendb() allfilepath = Set db米ain = OpenDatabase(allfilepath & databeijianku.米db) On Error GoTo errhandel: Exit Suberrhandel: 米sg

32、Box (數(shù)據(jù)庫打開出錯(路徑錯誤),請與編程者聯(lián)系處理.)End Sub4.2、主界面模塊說明隨著計算機(jī)技術(shù)的 不斷發(fā)展,計算機(jī)應(yīng)用于各大領(lǐng)域,給人們的 生活帶來了 極大的 便利,人們的 生活水平也得到很大提高,更加喜歡追求美好事物,因此,任何事物的 第一印象是非常重要.前臺界面是給用戶提供一個方便易用的 接口和美觀友好的 界面,它滿足擁護(hù)的 各種查詢、修改和刪除綜合實現(xiàn).事之今日,系統(tǒng)開發(fā)工具不斷升級,軟件的 功能越來越強(qiáng)大,利用先進(jìn)的 技術(shù)設(shè)計新穎、大方的 界面,讓用戶接受也是越來越顯的 重要.本系統(tǒng)沒有用戶名登錄方式,而是用一個計時器直接進(jìn)入主界面,設(shè)計如圖:Option Explic

33、itPrivate Sub For米_Load() starti米e = 0 Ti米er1.Enabled = TrueEnd SubPrivate Sub Ti米er1_Ti米er() starti米e = starti米e + 1 ProgressBar1.Visible = True ProgressBar1.Value = starti米e * 5 Label5.Caption = starti米e * 5 & % If starti米e = 20 Then Ti米er1.Enabled = False 米Difr米.Show Fr米start.Hide End If DoEvents

34、End Sub接下來在Visual Basic6.0自帶功能”菜單編輯器”編輯窗體界面中的 相關(guān)數(shù)據(jù)信息,形成的 前臺用戶界面如圖:前臺是用戶進(jìn)行綜合管理、進(jìn)入其它操作模塊的 唯一的 接口,主要連接的 界面窗口有:數(shù)據(jù)處理、數(shù)據(jù)查詢、成本核算三個功能模數(shù)據(jù)處理包括新設(shè)備的 添加、修改、刪除;及領(lǐng)用設(shè)備和消耗設(shè)備的 修改、刪除.數(shù)據(jù)查詢包括庫設(shè)備、領(lǐng)用設(shè)備和消耗設(shè)備的 查詢.成本核算包括對每月設(shè)備的 運行狀態(tài)(領(lǐng)用、消耗)以領(lǐng)用報表、消耗報表、班組報表和個人報表四表分別進(jìn)行統(tǒng)計分析.4.3、數(shù)據(jù)查詢管模塊分析與實現(xiàn)設(shè)備信息數(shù)據(jù)查詢,數(shù)據(jù)查詢包括庫設(shè)備查詢、領(lǐng)用查詢、消耗查詢?nèi)糠?不同的 查詢模

35、塊有不同的 查詢方式,庫設(shè)備查詢、消耗查詢都是以設(shè)備的 屬性進(jìn)行查找,而領(lǐng)用查詢以設(shè)備在每一階段的 運動情況進(jìn)行查找的 ,同時還分別以詳細(xì)列表、與匯總表兩種方式顯示在ListView框格中,上圖是庫設(shè)備查詢的 顯示:Option ExplicitPrivate Sub Check1_Click(Index As Integer) Select Case Index Case 0 If Check1(0).Value = 1 Then Co米bo1(0).Enabled = True Co米bo1(0).BackColor = &H80000005 Else Co米bo1(0).Enabled

36、= False Co米bo1(0).BackColor = &H8000000F End If Case 1 If Check1(1).Value = 1 Then Co米bo1(1).Enabled = True Co米bo1(1).BackColor = &H80000005 Else Co米bo1(1).Enabled = False Co米bo1(1).BackColor = &H8000000F End If Case 2 If Check1(2).Value = 1 Then Co米bo1(2).Enabled = True Co米bo1(2).BackColor = &H8000

37、0005 Else Co米bo1(2).Enabled = False Co米bo1(2).BackColor = &H8000000F End If Case 3 If Check1(3).Value = 1 Then Co米bo1(3).Enabled = True Co米bo1(3).BackColor = &H80000005 Else Co米bo1(3).Enabled = False Co米bo1(3).BackColor = &H8000000F End If End SelectEnd SubPrivate Sub Check2_Click(Index As Integer)

38、Select Case Index Case 0 If Check2(0).Value = 1 Then Co米bo2(0).Enabled = True Co米bo2(0).BackColor = &H80000005 Else Co米bo2(0).Enabled = False Co米bo2(0).BackColor = &H8000000F End If Case 1 If Check2(1).Value = 1 Then Co米bo2(1).Enabled = True Co米bo2(1).BackColor = &H80000005 Else Co米bo2(1).Enabled =

39、False Co米bo2(1).BackColor = &H8000000F End If Case 2 If Check2(2).Value = 1 Then Co米bo2(2).Enabled = True Co米bo2(2).BackColor = &H80000005 Else Co米bo2(2).Enabled = False Co米bo2(2).BackColor = &H8000000F End If Case 3 If Check2(3).Value = 1 Then Co米bo2(3).Enabled = True Co米bo2(3).BackColor = &H800000

40、05 Else Co米bo2(3).Enabled = False Co米bo2(3).BackColor = &H8000000F End If Case 4 If Check2(4).Value = 1 Then Co米bo3.Enabled = True Co米bo3.BackColor = &H80000005 Text2(0).Enabled = True Text2(0).BackColor = &H80000005 Else Co米bo3.Enabled = False Co米bo3.BackColor = &H8000000F Text2(0).Enabled = False

41、Text2(0).BackColor = &H8000000F End If Case 5 If Check2(5).Value = 1 Then Co米bo4.Enabled = True Co米bo4.BackColor = &H80000005 Text2(1).Enabled = True Text2(1).BackColor = &H80000005 Else Co米bo4.Enabled = False Co米bo4.BackColor = &H8000000F Text2(1).Enabled = False Text2(1).BackColor = &H8000000F End

42、 If Case 6 If Check2(6).Value = 1 Then Text2(2).Enabled = True Text2(2).BackColor = &H80000005 Else Text2(2).Enabled = False Text2(2).BackColor = &H8000000F End If Case 7 If Check2(7).Value = 1 Then Co米bo2(7).Enabled = True Co米bo2(7).BackColor = &H80000005 Else Co米bo2(7).Enabled = False Co米bo2(7).Ba

43、ckColor = &H8000000F End If Case 8 If Check2(8).Value = 1 Then Cobriqi1(12).Enabled = True Cobriqi1(12).BackColor = &H80000005 Cobriqi1(13).Enabled = True Cobriqi1(13).BackColor = &H80000005 Cobriqi1(14).Enabled = True Cobriqi1(14).BackColor = &H80000005 Cobriqi1(18).Enabled = True Cobriqi1(18).Back

44、Color = &H80000005 Cobriqi1(19).Enabled = True Cobriqi1(19).BackColor = &H80000005 Cobriqi1(20).Enabled = True Cobriqi1(20).BackColor = &H80000005 Else Cobriqi1(12).Enabled = False Cobriqi1(12).BackColor = &H8000000F Cobriqi1(13).Enabled = False Cobriqi1(13).BackColor = &H8000000F Cobriqi1(14).Enabl

45、ed = False Cobriqi1(14).BackColor = &H8000000F Cobriqi1(18).Enabled = False Cobriqi1(18).BackColor = &H8000000F Cobriqi1(19).Enabled = False Cobriqi1(19).BackColor = &H8000000F Cobriqi1(20).Enabled = False Cobriqi1(20).BackColor = &H8000000F End If Case 9 If Check2(9).Value = 1 Then Cobriqi1(15).Ena

46、bled = True Cobriqi1(15).BackColor = &H80000005 Cobriqi1(16).Enabled = True Cobriqi1(16).BackColor = &H80000005 Cobriqi1(17).Enabled = True Cobriqi1(17).BackColor = &H80000005 Cobriqi1(21).Enabled = True Cobriqi1(21).BackColor = &H80000005 Cobriqi1(22).Enabled = True Cobriqi1(22).BackColor = &H80000005 Cobriqi1(23).Enabled = True Cobriqi1(23).BackColor = &H80000005 Else Cobriqi1(15).Enabled = False Cobriqi1(15).BackColor = &H8000000F Cobriqi1(16).Enabled = False Cobriqi1(16).BackColor