水泵廠的固定資產(chǎn)設(shè)備管理系統(tǒng)的設(shè)計與實現(xiàn)畢業(yè)論文

1、<p>　　計算機系本科畢業(yè)（設(shè)計）論文</p><p><b>　　二零壹零年六月</b></p><p>　課題名稱xx 水 泵 廠 的 固 定資 產(chǎn) 設(shè) 備 管 理 系 統(tǒng) 的 設(shè) 計 與 實 現(xiàn)</p><p>　專 業(yè)計 算 機 科 學(xué) 與 技 術(shù)</p><p>　姓 名</p&g

2、t;<p>　學(xué) 號</p><p>　指導(dǎo)教師</p><p><b>　　目　錄</b></p><p>　　1 引 言1</p><p>　　1.1 課題來源及意義1</p><p>　　1.2 本人主要工作1</p><p>　　1.

3、3 論文組織與結(jié)構(gòu)2</p><p><b>　　2 需求分析3</b></p><p>　　2.1 用戶功能需求3</p><p>　　2.2 技術(shù)可行性分析3</p><p>　　2.3 數(shù)據(jù)流圖3</p><p><b>　　3 概要設(shè)計5</b></

4、p><p>　　3.1 功能模塊圖5</p><p>　　3.2處理流程設(shè)計6</p><p>　　3.3數(shù)據(jù)庫設(shè)計8</p><p>　　3.4 系統(tǒng)開發(fā)環(huán)境13</p><p><b>　　4 詳細(xì)設(shè)計14</b></p><p>　　4.1 借入歸還管理模塊設(shè)計

5、14</p><p>　　4.2 移動管理模塊設(shè)計14</p><p>　　4.3 維修管理模塊設(shè)計14</p><p>　　4.4 折舊管理模塊設(shè)計15</p><p>　　4.5用戶管理模塊設(shè)計15</p><p><b>　　5 系統(tǒng)實現(xiàn)16</b></p><

6、;p>　　5.1公共模塊16</p><p>　　5.2借出歸還模塊的實現(xiàn)16</p><p>　　5.3移動模塊的實現(xiàn)17</p><p>　　5.4維修模塊的實現(xiàn)18</p><p>　　5.5折舊模塊的實現(xiàn)19</p><p><b>　　6系統(tǒng)測試21</b></p

7、><p>　　6.1 測試方法21</p><p>　　6.2 測試內(nèi)容21</p><p>　　6.3 測試結(jié)果21</p><p><b>　　7 結(jié)束語22</b></p><p><b>　　致 謝23</b></p><p>&l

8、t;b>　　參考文獻(xiàn)24</b></p><p>　　xx水泵廠固定資產(chǎn)及設(shè)備管理系統(tǒng)的設(shè)計與實現(xiàn)</p><p>　　摘 要：本課題開發(fā)的設(shè)備管理系統(tǒng)運用Visual Basic 6.0平臺，結(jié)合SQL Server 2000數(shù)據(jù)庫。通過整合設(shè)備管理知識，用以實現(xiàn)資產(chǎn)設(shè)備的借入借出、移動、折舊、維修等一系列功能。闡述了該系統(tǒng)的設(shè)計思想和系統(tǒng)的功能需求、數(shù)據(jù)庫設(shè)計和系統(tǒng)

9、各功能模塊的設(shè)計等。對各功能模塊中的主要技術(shù)的實現(xiàn)進(jìn)行介紹，如ADO控件技術(shù)、主要模塊功能實現(xiàn)的算法。</p><p>　　關(guān)鍵詞： Visual Basic 6.0 SQL Server 2000 資產(chǎn)設(shè)備</p><p>　　Abstract：Development of equipment management system issues using Visual

10、Basic 6.0 platform, combined with SQL Server 2000 database. Integrated device management expertise to achieve equity borrowing and lending of equipment, mobile, depreciation, maintenance and a series of functions. Elabor

11、ate design of the system and the main functions of the system requirements, database design and system design of each functional module. Of each function module introduces the main technical implementation, s</p>

12、<p>　　Key Words: Visual Basic 6.0 SQL Server 2000 equipment management </p><p><b>　　1 引 言</b></p><p>　　1.1 課題來源及意義</p><p>　　固定資產(chǎn)代表著一個企業(yè)在市場競爭中的實力。早期管理固定資產(chǎn)的方式

13、都是手工記帳的形式，既費時又費力，這種管理模式已不能適應(yīng)競爭日趨激烈的國際化競爭環(huán)境。本系統(tǒng)是管理企事業(yè)單位固定資產(chǎn)和設(shè)備的信息化管理軟件，使用本系統(tǒng)能夠幫助企事業(yè)單位解決單位內(nèi)部的固定資產(chǎn)的各種管理問題，并且更加方便企業(yè)領(lǐng)導(dǎo)集團詳細(xì)了解自己企業(yè)內(nèi)部的固定資產(chǎn)變動情況。</p><p>　　1.2 本人主要工作</p><p>　　學(xué)習(xí)Visual Basic6.0軟件的應(yīng)用，為進(jìn)一步開發(fā)

14、系統(tǒng)打好基礎(chǔ)。通過分析研究任務(wù)書要求，以及實地調(diào)研，對系統(tǒng)進(jìn)行進(jìn)一步需求分析，設(shè)計資產(chǎn)設(shè)備管理系統(tǒng)的主要功能，把其分為了七大模塊：借入歸還管理模塊、移動管理模塊、維修管理模塊、折舊管理模塊、用戶管理模塊、系統(tǒng)管理模塊和信息管理模塊。其中借入歸還管理模塊包括借入歸還設(shè)備的信息查詢和登記等；移動管理模塊和維修管理模塊分別對資產(chǎn)設(shè)備的移動和維修情況的信息查詢、登記及打印等；折舊管理模塊包括對資產(chǎn)設(shè)備折舊信息的查詢、登記、打印等。用戶管理模塊包

15、括用戶的增加、刪除及用戶本身密碼修改；系統(tǒng)管理模塊包括系統(tǒng)的初始化、數(shù)據(jù)清理、自定義項設(shè)置等。在以上工作的基礎(chǔ)上，對系統(tǒng)進(jìn)行詳細(xì)設(shè)計和實現(xiàn)系統(tǒng)的所有功能，最后進(jìn)入論文撰寫階段，完成系統(tǒng)設(shè)計和論文撰寫的工作。</p><p>　　1.3 論文組織與結(jié)構(gòu)</p><p>　　第一章：引言。介紹資產(chǎn)設(shè)備管理系統(tǒng)的開發(fā)背景和現(xiàn)狀，以及本人的研究工作；</p><p>　　第

16、二章：需求分析。分別對需求和可行性進(jìn)行了分析；</p><p>　　第三章：概要設(shè)計。介紹資產(chǎn)設(shè)備管理系統(tǒng)需要實現(xiàn)的功能模塊以及開發(fā)環(huán)境和數(shù)據(jù)庫設(shè)計；</p><p>　　第四章：詳細(xì)設(shè)計。對系統(tǒng)的功能進(jìn)行了詳細(xì)介紹；</p><p>　　第五章：系統(tǒng)實現(xiàn)。對系統(tǒng)的各個功能的實現(xiàn)進(jìn)行說明介紹；</p><p>　　第六章：系統(tǒng)測試。對系統(tǒng)的各

17、個功能部分進(jìn)行了測試。</p><p><b>　　2 需求分析</b></p><p>　　需求分析是介于系統(tǒng)分析和軟件設(shè)計階段之間的重要橋梁。一方面，需求分析以系統(tǒng)規(guī)格說明和項目規(guī)劃作為分析活動的基本出發(fā)點，并從軟件角度對它們進(jìn)行檢查與調(diào)整；另一方面，需求規(guī)格說明又是軟件設(shè)計、實現(xiàn)測試直至維護(hù)的主要基礎(chǔ)。良好的分析活動有助于避免或盡早發(fā)現(xiàn)早期的錯誤，從而提高軟件生

18、產(chǎn)率，降低開發(fā)成本，改進(jìn)軟件質(zhì)量。</p><p>　　2.1 用戶功能需求</p><p>　　1、固定資產(chǎn)及設(shè)備的借出歸還管理：管理固定資產(chǎn)及設(shè)備的借出、歸還情況的詳細(xì)信息；</p><p>　　2、固定資產(chǎn)及設(shè)備的移動管理：企業(yè)內(nèi)部的固定資產(chǎn)及設(shè)備可能發(fā)生移動的情況，例如，財務(wù)科的電腦移到人事科。這種資產(chǎn)設(shè)備的變動情況就需要在企業(yè)單位的內(nèi)部管理中做一筆資產(chǎn)變動

19、情況的詳細(xì)記錄，這可以通過固定資產(chǎn)及設(shè)備的移動管理模塊來實現(xiàn)；</p><p>　　3、固定資產(chǎn)及設(shè)備的維修管理：對固定資產(chǎn)設(shè)備的維修情況做詳細(xì)的記錄；</p><p>　　4、固定資產(chǎn)設(shè)備的折舊管理：根據(jù)各種折舊算法，管理企業(yè)內(nèi)部的固定資產(chǎn)及設(shè)備的折舊狀況；</p><p>　　5、固定資產(chǎn)設(shè)備的信息管理：對企業(yè)擁有的固定資產(chǎn)設(shè)備的詳細(xì)記錄。</p>

20、<p>　　2.2 技術(shù)可行性分析</p><p>　　開發(fā)一個中小型固定資產(chǎn)及設(shè)備管理系統(tǒng)，涉及到的技術(shù)問題不會太多，主要用到的技術(shù)就是數(shù)據(jù)庫和一門可視化開發(fā)的編程語言。在這方面，數(shù)據(jù)庫主要是用來存放數(shù)據(jù)，就目前主流的數(shù)據(jù)庫來看，可以考慮采用Microsoft SQL Server或Oracle。Oracle是一個安全、可靠的并且支持面向?qū)ο笤O(shè)計的數(shù)據(jù)庫系統(tǒng)，同時Oracle又有海量存儲的特點。然而

21、，相對于Microsoft SQL Server而言，Oracle的易用性和可維護(hù)性相對差一點，而且Oracle的成本相對較高，不適合于中小企業(yè)使用。因此，我們選擇了目前比較流行的Microsoft SQL Server2000數(shù)據(jù)庫系統(tǒng)；在前臺開發(fā)編程方面，本系統(tǒng)采用Microsoft公司的Visual Basic 6.0作為主要的開發(fā)工具。</p><p><b>　　2.3 數(shù)據(jù)流圖</

22、b></p><p>　　在設(shè)計系統(tǒng)的過程中，用數(shù)據(jù)流圖來刻畫數(shù)據(jù)流和轉(zhuǎn)換信息。它用簡單的圖形記號分別表示數(shù)據(jù)流、轉(zhuǎn)換、數(shù)據(jù)源以及外部實體，數(shù)據(jù)流圖是軟件系統(tǒng)中各個處理子功能以及它們之間的數(shù)據(jù)流動的圖形表示。經(jīng)過對系統(tǒng)的分析初步得到系統(tǒng)的頂級DFD，如圖2.1所示。</p><p>　　圖2.1 頂級數(shù)據(jù)流圖</p><p>　　圖2.2 第一層數(shù)據(jù)流圖<

23、;/p><p>　　圖2.3 第二層數(shù)據(jù)流圖</p><p><b>　　3 概要設(shè)計</b></p><p><b>　　3.1 功能模塊圖</b></p><p>　　系統(tǒng)功能模塊如圖3.1所示。</p><p>　　圖3.1 固定資產(chǎn)及設(shè)備管理系統(tǒng)功能模塊圖</p&g

24、t;<p>　　通過對水泵廠的需求分析，針對水泵廠目前設(shè)備管理的現(xiàn)狀和對系統(tǒng)總體的分析，可以粗略地抽象出管理系統(tǒng)的功能模塊，如圖3.1所示。模塊主要功能設(shè)計如下：</p><p>　　1、借出歸還管理模塊： 用于錄入企業(yè)的借入及歸還情況，查詢固定資產(chǎn)設(shè)備設(shè)備借入和歸還的歷史。</p><p>　　2、移動管理模塊：在移動管理模塊中，用于錄入企業(yè)的固定資產(chǎn)設(shè)備的移動情況，查詢資

25、產(chǎn)設(shè)備移動的歷史及部門維護(hù)。</p><p>　　3、維修管理模塊：在維修管理模塊中，用于企業(yè)的固定資產(chǎn)設(shè)備維修情況的登記、瀏覽、打印及企業(yè)資產(chǎn)設(shè)備維修情況的歷史查詢。</p><p>　　4、折舊管理模塊：對企業(yè)的固定資產(chǎn)設(shè)備的折舊信息的歷史查詢及根據(jù)不同的折舊算法進(jìn)行登記、打印折舊信息。</p><p>　　5、報表管理模塊：對借出歸還、移動、折舊、維修狀況進(jìn)行

26、報表打印。</p><p>　　6、用戶信息管理模塊：主要是對操作該系統(tǒng)的使用者進(jìn)行管理，即用戶管理。包括用戶的增加和刪除、用戶本身密碼的修改。</p><p>　　7、系統(tǒng)管理模塊：包括系統(tǒng)的初始化、數(shù)據(jù)清理、自定義項設(shè)置。</p><p>　　8、輔助管理模塊：針對模塊中的需要進(jìn)行資產(chǎn)折舊、凈值等的計算設(shè)計了計算器。</p><p>　　

27、9、固定資產(chǎn)設(shè)備的信息管理模塊：包括錄入、刪除、修改、打印、查詢企業(yè)的固定資產(chǎn)設(shè)備的信息。</p><p><b>　　3.2處理流程設(shè)計</b></p><p>　　3.2.1 系統(tǒng)操作流程</p><p>　　系統(tǒng)操作流程如圖3.2所示。</p><p>　　圖3.2系統(tǒng)操作流程</p><p&g

28、t;　　3.2.2數(shù)據(jù)增加流程</p><p>　　添加信息時，編號字段由系統(tǒng)自動生成，且不能修改，其他信息由用戶輸入，之后對數(shù)據(jù)進(jìn)行合法判斷，合法則寫入保存至數(shù)據(jù)庫，不合法則重新輸入數(shù)據(jù)。數(shù)據(jù)增加流程圖如圖3.3所示。</p><p>　　圖3.3 數(shù)據(jù)增加流程圖</p><p>　　3.2.3 數(shù)據(jù)修改流程</p><p>　　在修改信息

29、時，先選中一條待修改的記錄，然后直接輸入數(shù)據(jù)，判斷合法性，合法則保存至數(shù)據(jù)庫，不合法重新輸入。數(shù)據(jù)修改流程圖如圖3.4所示。</p><p>　　圖3.4 數(shù)據(jù)修改流程圖</p><p>　　3.2.4 數(shù)據(jù)刪除流程</p><p>　　當(dāng)用戶選定一條記錄時，單擊刪除按鈕，會提示用戶是否確定刪除，如果確定刪除，然后刪除數(shù)據(jù)庫相關(guān)內(nèi)容。數(shù)據(jù)刪除流程圖如圖3.5所示。&

30、lt;/p><p>　　圖3.5 數(shù)據(jù)刪除流程圖</p><p><b>　　3.3數(shù)據(jù)庫設(shè)計</b></p><p>　　3.3.1數(shù)據(jù)庫SQL Server2000的介紹</p><p>　　系統(tǒng)采用SQL Server 2000數(shù)據(jù)庫，SQL Server是由Microsoft開發(fā)和推廣的關(guān)系數(shù)據(jù)庫管理系統(tǒng)（DBMS）

31、,它最初是由Microsoft、Sybase和Ashton-Tate三家公司共同開發(fā)的，并于1988年推出了第一個OS/2版本。 SQL Server近年來不斷更新版本,SQL Server 2000是Microsoft公司于2000年推出的最新版本。 SQL Server 特點：</p><p>　　1．客戶機/服務(wù)器體系結(jié)構(gòu)。 </p><p>　　2．圖形化用戶界面，使系統(tǒng)管理和數(shù)據(jù)

32、庫管理更加直觀、簡單。 </p><p>　　3．豐富的編程接口工具，為用戶進(jìn)行程序設(shè)計提供了更大的選擇余地。 </p><p>　　4．SQL Server與Windows NT完全集成，利用了NT的許多功能。SQL Server也可以很好地與Microsoft BackOffice產(chǎn)品集成。 </p><p>　　5．具有很好的伸縮性，可跨越多種平臺使用。 &l

33、t;/p><p>　　6．對Web技術(shù)的支持，使用戶能夠很容易地將數(shù)據(jù)庫中的數(shù)據(jù)發(fā)布到Web頁面上。 </p><p>　　7．SQL Server提供數(shù)據(jù)倉庫功能，這個功能只在Oracle和其他更昂貴的DBMS中才有。</p><p>　　3.3.2 ADO技術(shù)概述</p><p>　　ADO Data 數(shù)據(jù)控件是ActiveX外部控件，它的

34、用途以及外形都和Data控件相似，也具有【向前】和【向后】按鈕以及一個易于使用的界面， ADO Data數(shù)據(jù)控件是通過Microsoft Activiex數(shù)據(jù)對象（ADO）來快速建立數(shù)據(jù)源連接的數(shù)據(jù)綁定控件，應(yīng)用程序通過 ADO Data控件與數(shù)據(jù)提供者連接，數(shù)據(jù)提供者可以是任何符合OLEDB規(guī)范的數(shù)據(jù)源。</p><p>　　ADO Data數(shù)據(jù)控件通過屬性實現(xiàn)了對數(shù)據(jù)源的連接，創(chuàng)建連接表時，可以采用以下連接方

35、式之一：一個字符串，一個OLEDB文件或一個ODBC數(shù)據(jù)源名稱（DSN）。當(dāng)使用DSN時無需更改控件的任何其他屬性。</p><p>　　ADO Data控件的功能：</p><p>　　連接一個本地數(shù)據(jù)庫或遠(yuǎn)程數(shù)據(jù)庫；打開一個指定的數(shù)據(jù)庫表或定義一個基于結(jié)構(gòu)化查詢語言（SQL）的查詢、存儲過程或該數(shù)據(jù)庫中表視圖的記錄集合；將數(shù)據(jù)字段的數(shù)值傳遞給數(shù)據(jù)綁定控件，并在這些控件中顯示或更改這些數(shù)

36、據(jù)字段的數(shù)值；添加新的記錄，或者根據(jù)顯示在數(shù)據(jù)綁定控件中的數(shù)據(jù)的更改來更新一個數(shù)據(jù)庫。</p><p>　　3.3.3數(shù)據(jù)庫的概念設(shè)計</p><p>　　固定資產(chǎn)及設(shè)備管理系統(tǒng)E-R圖如圖3.6所示。</p><p>　　圖3.6 固定資產(chǎn)及設(shè)備管理系統(tǒng)的E-R圖</p><p>　　3.3.4數(shù)據(jù)庫的邏輯設(shè)計</p><

37、;p>　　本系統(tǒng)的數(shù)據(jù)庫主要有4張數(shù)據(jù)表組成，分別是固定資產(chǎn)借出歸還數(shù)據(jù)表Table_INOUT、 固定資產(chǎn)移動數(shù)據(jù)表Table_ZCYD、固定資產(chǎn)維修數(shù)據(jù)表Table_ZCWX和固定資產(chǎn)折舊信息表Table_ZCZJ。下面分別介紹一下這幾張數(shù)據(jù)表的邏輯結(jié)構(gòu)設(shè)計。如表3.1、3.2、3.3、3.4所示。</p><p>　　表3.1借出歸還數(shù)據(jù)表（Table_INOUT）</p><p&

38、gt;　　表3.2 固定資產(chǎn)移動數(shù)據(jù)表（Table_ZCYD）</p><p>　　表3.3 固定資產(chǎn)維修數(shù)據(jù)表（Table_ZCWX）</p><p>　　表3.4固定資產(chǎn)折舊信息表（Table_ZCZJ）</p><p>　　3.4 系統(tǒng)開發(fā)環(huán)境</p><p>　　硬件環(huán)境：處理器 Intel Core Duo T5800，主頻2.0G

39、；內(nèi)存2G；顯存256M；硬盤250G；網(wǎng)卡10M/100M自適應(yīng)以太網(wǎng)卡。</p><p>　　軟件環(huán)境： Windows Vista Home Basic操作系統(tǒng)；SQL Server2000數(shù)據(jù)庫軟件；Visual Basic6.0程序設(shè)計語言。</p><p><b>　　4 詳細(xì)設(shè)計</b></p><p>　　4.1 借入歸還管理模

40、塊設(shè)計</p><p>　　借入歸還管理用于管理企業(yè)的借入歸還情況，主要由三個功能模塊構(gòu)成，其各個模塊實現(xiàn)的功能如下：</p><p>　　1、借出登記：實現(xiàn)資產(chǎn)設(shè)備的借出登記情況。輸入相應(yīng)的資產(chǎn)設(shè)備編號即可進(jìn)行登記。</p><p>　　2、歸還登記：實現(xiàn)資產(chǎn)設(shè)備的歸還情況。輸入相應(yīng)的資產(chǎn)設(shè)備編號即可進(jìn)行登記。</p><p>　　3、歷

41、史查詢： 可以讓用戶按照任何條件查詢，如資產(chǎn)設(shè)備名稱、資產(chǎn)設(shè)備編號、型號、歸還的數(shù)量等。圖4.1所示的是資產(chǎn)設(shè)備借出歸還管理的開發(fā)流程圖。</p><p>　　圖4.1 資產(chǎn)設(shè)備借入歸還管理的開發(fā)流程圖</p><p>　　4.2 移動管理模塊設(shè)計</p><p>　　由于移動管理模塊與借入歸還管理模塊類似，所以這里只重點說一下部門維護(hù)窗體，具有增加部門和刪除部門的

42、功能。圖4.2所示的是資產(chǎn)設(shè)備借出歸還管理的開發(fā)流程圖。</p><p>　　圖4.2 資產(chǎn)設(shè)備移動管理的開發(fā)流程圖</p><p>　　4.3 維修管理模塊設(shè)計</p><p>　　維修管理模塊用于管理固定資產(chǎn)設(shè)備的維修情況，用戶可以對固定資產(chǎn)設(shè)備的維修情況進(jìn)行登記、查詢，同時也可以打印維修情況報表。使用戶能夠及時、直觀的了解到維修狀況。圖4.3所示的是資產(chǎn)設(shè)備

43、維修管理的開發(fā)流程圖。</p><p>　　圖4.3 資產(chǎn)設(shè)備維修管理的開發(fā)流程圖</p><p>　　4.4 折舊管理模塊設(shè)計</p><p>　　折舊管理模塊用于對水泵廠的固定資產(chǎn)設(shè)備進(jìn)行管理，它包含的功能有查詢、登記、打印。用戶可以依照3種不同的折舊方法，計算固定資產(chǎn)設(shè)備的折舊額。</p><p>　　圖4.4所示的是資產(chǎn)設(shè)備維修管理

44、的開發(fā)流程圖。</p><p>　　圖4.4 資產(chǎn)設(shè)備折舊管理的開發(fā)流程圖</p><p>　　4.5用戶管理模塊設(shè)計</p><p>　　用戶管理模塊是每個系統(tǒng)都應(yīng)該具備的，主要是對操作該系統(tǒng)的使用者進(jìn)行管理，即用戶管理。包括用戶的增加和刪除、用戶本身密碼的修改。圖4.8為用戶管理模塊的功能圖。</p><p>　　圖4.8 用戶管理模塊功

45、能圖</p><p><b>　　5 系統(tǒng)實現(xiàn)</b></p><p><b>　　5.1公共模塊</b></p><p>　　在開發(fā)軟件時，為了提高程序代碼的重用，可以將多個程序窗體共用的代碼放在數(shù)據(jù)模塊中。這樣不僅可以提高代碼的執(zhí)行效率，也使代碼更加簡練，更容易維護(hù)。在本系統(tǒng)中，將數(shù)據(jù)連接代碼放在數(shù)據(jù)模塊中，所有窗體都

46、可以使用數(shù)據(jù)模塊中的數(shù)據(jù)連接。該數(shù)據(jù)模塊的代碼如下：</p><p>　　Public adoCon As New ADODB.Connection</p><p>　　Public adoRs As New ADODB.Recordset</p><p>　　Public Sub main()</p><p>　　Set adoCon =

47、New ADODB.Connection</p><p>　　adoCon.Open "Provider=MSDASQL.1;</p><p>　　Persist Security Info=False;User ID=sa;</p><p>　　Data Source=MRSOFT"</p><p><b>　

48、　End Sub</b></p><p>　　5.2借出歸還模塊的實現(xiàn)</p><p>　　借出歸還模塊可以登記資產(chǎn)設(shè)備借出信息和歸還信息，并且能夠查詢和打印已存在的資產(chǎn)設(shè)備的借出和歸還信息。借入歸還的窗體如圖5.1所示：</p><p>　　圖5.1 借入歸還窗體</p><p>　　數(shù)據(jù)保存的代碼如下：</p>

49、<p>　　Private Sub Cmd_save_Click(Index As Integer)</p><p><b>　　Call main</b></p><p>　　Catalog=Data_MRSOFT;Data Source=MRVB"</p><p>　　Dim aa As Integer</p>

50、;<p>　　If Frame1.Visible = True Then</p><p>　　If Text5.Text = "" Then</p><p>　　MsgBox "請輸入借出部門的名稱", , "提示"</p><p>　　ElseIf Text6.Text = "&q

51、uot; Then</p><p>　　MsgBox "請輸入借用人的姓名", , "提示"</p><p>　　ElseIf Text27.Text = "" Then</p><p>　　MsgBox "請輸入借出數(shù)量", , "提示"</p>&l

52、t;p>　　Else Set adoRs = adoCon.Execute("insert into Table_INOUT values(" & Text1 & ",'" & Text2 & "','" & Text3 & "','" & Text4 &

53、amp; "','" & Text27 & "','" & Text5 & "','" & Text6 & "','" & DTPicker1 & "','" & Text24 &

54、 "','" & Text29 & "','" & Text30 & "')") </p><p>　　MsgBox "數(shù)據(jù)保存成功!!", , "提示"aa = Val(Adodc2.Recordset.Fields("數(shù)量&quo

55、t;)) - Val(Text27.Text)</p><p>　　Set adoRs = adoCon.Execute("UPDATE Table_ZCXX SET 借出數(shù)量='" + Text27.Text + "',數(shù)量= '" + Str(aa) + "' where 資產(chǎn)設(shè)備編號='" + Text1.T

56、ext + "'")</p><p>　　Adodc1.Refresh</p><p><b>　　End If</b></p><p><b>　　End If</b></p><p>　　adoCon.Close</p><p><b&g

57、t;　　End Sub</b></p><p>　　5.3移動模塊的實現(xiàn)</p><p>　　固定資產(chǎn)設(shè)備移動是企事業(yè)單位的日常處理業(yè)務(wù)。例如，在某一企業(yè)內(nèi)部中，財務(wù)部需要10套桌椅，然而人事部恰好有多余的桌椅，這就需要對資產(chǎn)的移動進(jìn)行管理。資產(chǎn)移動的操作步驟比較簡單，沒有什么復(fù)雜的算法，這里就不做更多的介紹了。移動窗體如圖5.2所示：</p><p>

58、;<b>　　圖5.2 移動窗體</b></p><p>　　5.4維修模塊的實現(xiàn)</p><p>　　為使企業(yè)正常使用資產(chǎn)設(shè)備，需要經(jīng)常對資產(chǎn)設(shè)備進(jìn)行維修和維護(hù)。本模塊可以對資產(chǎn)設(shè)備進(jìn)行維修管理，并可打印出“資產(chǎn)設(shè)備維修單”。關(guān)鍵代碼如下：</p><p>　　Private Sub Command9_Click() '

59、維修信息保存</p><p>　　Catalog=Data_MRSOFT;Data Source=MRVB"</p><p><b>　　Call main</b></p><p>　　If Text7.Text = "" Then </p><p>　　MsgBox "

60、請輸入維修狀況", , "提示"</p><p>　　ElseIf Text8.Text = "" Then </p><p>　　MsgBox "請輸入配件名稱", , "提示"</p><p>　　ElseIf Text9.Text = "" The

61、n </p><p>　　MsgBox "請輸入維修費用", , "提示"</p><p>　　ElseIf Text6.Text = "" Then </p><p>　　MsgBox "請輸入故障原因", , "提示"</p><p&

62、gt;　　ElseIf Text20.Text = "" Then </p><p>　　MsgBox "請輸入維修數(shù)量", , "提示"</p><p><b>　　Else</b></p><p>　　Set adoRs = adoCon.Execute("inser

63、t into Table_ZCWX values(" & Text2 & ",'" & Text3 & "','" & Text4 & "','" &Text5 & "','" & Text20 & "&

64、#39;,'" & DTPicker1 & "','" & Text6 & "','" & DTPicker2 & "','" & Text7 & "','" & Text8 & "

65、9;,'" & Text9 & "')")</p><p>　　MsgBox "數(shù)據(jù)保存成功!!", , "提示"</p><p>　　Adodc1.Refresh </p><p>　　Text7.Text = ""</p>

66、<p>　　Text8.Text = "" </p><p>　　End If </p><p>　　adoCon.Close </p><p><b>　　End Sub</b></p><p>　　維修窗體如圖5.3所示：</p>

67、<p><b>　　圖5.3 維修窗體</b></p><p>　　5.5折舊模塊的實現(xiàn)</p><p>　　設(shè)計資產(chǎn)折舊管理窗體的最主要問題是折舊方法的選擇。本程序中主要介紹了3種資產(chǎn)折舊的方法，即產(chǎn)量比例法、重置成本法和特別折舊率法。這三種折舊方法的計算公式分別如下: </p><p><b>　　產(chǎn)量比例法</

68、b></p><p>　　折舊額=（資產(chǎn)原值－剩余金額）／預(yù)計使用年限</p><p><b>　　重置成本法</b></p><p>　　折舊額=（資產(chǎn)原值－剩余金額）／折舊率+凈殘值</p><p><b>　　特別折舊率法</b></p><p>　　折舊額=資產(chǎn)

69、原值*折舊率</p><p>　　在上面所提到的三種方法中折舊率等于所要折舊固定資產(chǎn)的使用年限的值的倒數(shù)。折舊窗體的主要代碼如下：</p><p>　　If Trim(Combo3.Text) = "產(chǎn)量比例法" Then</p><p>　　Text9.Text = (Val(Text6.Text) - Val(Text7.Text)) / V

70、al(Text15.Text)</p><p>　　Set adoRs = adoCon.Execute("insert into Table_ZCZJ values(" & Text2 & ",'" & Text3 & "','" & Text4 & "',&#

71、39;" & Text5 & "','" & Combo3 & "','" & Text6 & "','" & Text7 & "','" & Text8 & "','"

72、 & Text21 & "','" & Text9 & "','" & Check1 & "')")</p><p>　　Adodc1.Refresh</p><p>　　ElseIf Trim(Combo3.Text) = "重置成

73、本法" Then</p><p>　　Text9.Text = (Val(Text6.Text) - Val(Text7.Text)) / Val(Text21.Text) + Val(Text7.Text)</p><p>　　Set adoRs = adoCon.Execute("insert into Table_ZCZJ values(" &

74、 Text2 & ",'" & Text3 & "','" & Text4 & "','" & Text5 & "','" & Combo3 & "','" & Text6 & &

75、quot;','" & Text7 & "','" & Text8 & "','" & Text21 & "','" & Text9 & "','" & Check1 & "

76、9;)")</p><p>　　Adodc1.Refresh</p><p>　　ElseIf Trim(Combo3.Text) = "特別折舊率法" Then</p><p>　　Text9.Text = Val(Text6.Text) * Val(Text21.Text)</p><p>　　Set ado

77、Rs = adoCon.Execute("insert into Table_ZCZJ values(" & Text2 & ",'" & Text3 & "','" & Text4 & "','" & Text5 & "','

78、" & Combo3 & "','" & Text6 & "','" & Text7 & "','" & Text8 & "','" & Text21 & "','" &

79、amp; Text9 & "','" & Check1 & "')")</p><p><b>　　Else</b></p><p><b>　　End If</b></p><p>　　MsgBox "數(shù)據(jù)增加成功!!&qu

80、ot;, 32, "提示"</p><p>　　Command4.Enabled = False</p><p>　　adoCon.Close</p><p><b>　　'End Sub </b></p><p>　　折舊窗體如圖5.4所示：</p><p><

81、b>　　圖5.4 折舊窗體</b></p><p><b>　　6系統(tǒng)測試</b></p><p><b>　　6.1 測試方法</b></p><p>　　該系統(tǒng)的測試方法主要有兩種：</p><p>　　1、數(shù)據(jù)庫測試，主要針對數(shù)據(jù)庫管理模塊進(jìn)行測試，測試數(shù)據(jù)庫管理是否能按要求

82、正常工作。</p><p>　　2、程序測試，通過測試代碼驗證系統(tǒng)的功能能否正常運行。 </p><p><b>　　6.2 測試內(nèi)容</b></p><p>　　1、前端操作系統(tǒng)的測試，測試內(nèi)容如下：</p><p>　　(1)用戶能否進(jìn)入到系統(tǒng)主界面。</p><p>　　(2)用戶進(jìn)入系統(tǒng)主

83、界面后單擊菜單欄上的按鈕是否能進(jìn)入相應(yīng)的模塊。</p><p>　　(3)用戶在借入歸還、移動、折舊、維修四大模塊中是否能按任何條件查詢。</p><p>　　(4)用戶在四大主要模塊中是否能進(jìn)行準(zhǔn)確的登記和打印。</p><p>　　(5)系統(tǒng)管理模塊中的系統(tǒng)初始化和數(shù)據(jù)清理是否能正常運行。</p><p>　　(6)信息管理模塊中是否能正

84、常進(jìn)行信息的增加、刪除、修改、查詢、打印。</p><p>　　2、數(shù)據(jù)庫的測試，測試內(nèi)容如下：</p><p>　　對前端的模塊進(jìn)行信息增加、刪除、修改時，數(shù)據(jù)庫是否會發(fā)生相應(yīng)的變化。</p><p><b>　　6.3 測試結(jié)果</b></p><p>　　整個系統(tǒng)在測試過程中，基本功能都能實現(xiàn)，但也存在局部問題：&

85、lt;/p><p>　　1、系統(tǒng)在運行折舊、借入歸還管理模塊時出現(xiàn)個別信息計算錯誤。</p><p>　　2、打開常見故障處理頁面，系統(tǒng)會先提示錯誤，再打開。通過修改代碼，已能使該頁面正常顯示。 </p><p><b>　　7 結(jié)束語</b></p><p>　　本系統(tǒng)是基于企業(yè)設(shè)備管理系統(tǒng)及其管理需求、運用Visual

86、Basic6.0開發(fā)的一個典型的應(yīng)用系統(tǒng)。</p><p>　　經(jīng)過幾個月的開發(fā)與設(shè)計，該設(shè)備管理系統(tǒng)已基本完畢，由于本人的能力有限，對所設(shè)計的功能模塊不免會存不足，有待于以后逐漸完善。</p><p><b>　　致 謝</b></p><p>　　在這次畢業(yè)設(shè)計中，我的指導(dǎo)老師xx老師給予我極大的指導(dǎo)和幫助，從選題到答辯的每個環(huán)節(jié)中他

87、都已耐心嚴(yán)謹(jǐn)?shù)膽B(tài)度輔導(dǎo)著我，鞭策著我。使我能夠順利完成畢業(yè)設(shè)計，同時也讓我懂得了許多計算機方面的知識，提高了自己的動手操作能力。在與他接觸的過程中他的積極樂觀的人生態(tài)度潛移默化的影響著我，讓我在畢業(yè)的十字路口找到了自己的前行的方向。</p><p>　　我還要感謝我的母校，以及在大學(xué)二年生活中給予我關(guān)心和幫助的老師和同學(xué)。我能夠順利的完成此次畢業(yè)設(shè)計與他們的功勞是分不開的。我會在今后的道路中不斷完善自己，為自己的

88、母校爭光，為自己翻開新的篇章。</p><p><b>　　謹(jǐn)以此文獻(xiàn)給他們！</b></p><p><b>　　參考文獻(xiàn)</b></p><p>　　[1] 張梅橫，鄭偉，曹禹．中小型超市進(jìn)銷存系統(tǒng)解決方案[J]．信息技術(shù)，2000，(07)：7-9．</p><p>　　[2] 王偉紅,王守城

89、,于玲玲．超市進(jìn)銷存管理系統(tǒng)的分析與設(shè)計[J]．現(xiàn)代商業(yè)，2006，(08)：55． </p><p>　　[3] 鄒建．SQL Server 2000開發(fā)與管理應(yīng)用實例[M]．北京：人民郵電出版社，2005．</p><p>　　[4] Watts S．Humphrey．軟件工程規(guī)范[M]．北京：清華大學(xué)出版社，2004. </p>

90、<p>　　[5] 憶江南．進(jìn)銷存管理，我有妙招[N]．電腦報,2004-09-27(G12)．</p><p>　　[6] 孔祥瑩．安裝盤制作中關(guān)鍵技術(shù)的解決方案[J]．計算機工程,2001，27(06)：174-175．</p><p>　　[7] 孔令德．畢業(yè)設(shè)計實例教程：從系統(tǒng)開發(fā)到論文寫作[M]．北京：國防工業(yè)出版社，2007．</p><p>

91、;　　[8] 張鼎武．小型超市管理信息系統(tǒng)[J]．新西部，2008，(02)：123-124．</p><p>　　[9] 陶宏才．?dāng)?shù)據(jù)庫原理及設(shè)計[M]．北京：清華大學(xué)出版社，2007．</p><p>　　[10] 黃圣官．面向進(jìn)銷存流程的管理信息系統(tǒng)的研究與開發(fā)[D]．南京：南京理工大學(xué)，2006．</p><p>　　[11] 尤鳳英．超市進(jìn)銷存管理系統(tǒng)[J

92、]. 濟南職業(yè)學(xué)院學(xué)報，2007，26(01)：78-80.</p><p>　　[12] 陳仲謀．進(jìn)、銷、存信息系統(tǒng)的研究[J]. 科技信息(科學(xué)教研)，2007，(18)：311-313.</p><p>　　[13] Richard John sonbaugh，Martin Kalin．Object Oriented programming in pb[M]．北京：機</p&g

93、t;<p>　　械工業(yè)出版社,2006.</p><p>　　[14] 薩師煊，王珊．?dāng)?shù)據(jù)庫系統(tǒng)概論[M]．北京：高等教育出版社，2006：4-291．</p><p>　　[15] 孔令德，陳惠明，梁云川．畢業(yè)設(shè)計實例教程[M]．北京：國防工業(yè)出版社，2007：</p><p><b>　　47-71.</b></p>