【正文】 統(tǒng)是以 ACCESS 數(shù)據(jù)庫為后臺核心應(yīng)用、以服務(wù)為目的信息平臺，對資源進(jìn)行科學(xué)的加工整序和管理維護(hù)，為實驗室設(shè)備信息提供管理。因此，系統(tǒng)應(yīng)提供身份認(rèn)證、重要數(shù)據(jù) (如用戶的密碼 )加密保護(hù)、存取控制等有效的安全機(jī)制。在系統(tǒng)設(shè)計和開發(fā)過程中，要充分考慮系統(tǒng)當(dāng)前和將來可能 承受的工作量，使系統(tǒng)的處理能力和響應(yīng)時間能夠滿足用戶對信息的處理。 （ 4） 信息查詢 ： 集成了本系統(tǒng)的所有數(shù)據(jù)庫文件， 跟據(jù)儀器設(shè)備的編號，名稱等進(jìn)行查詢。面對龐大的信息量，需要有專門的實驗室設(shè)備管理系統(tǒng)來 提高工作的效率。 Visual Basic 提供了大量的控件，這些控件可用于設(shè)計界面和實現(xiàn)各種功能，減少了編程人員的工作量，也簡化了界面設(shè)計過程，從而有效的提高了應(yīng)用程序的運(yùn)行效率和可靠性。 “ Visual” 一詞在計算機(jī)程序設(shè)計領(lǐng)域中意為 :” 可視化的 ” ， Microsoft 其冠以 Visual 的產(chǎn)品都含有這個意思。另外，開發(fā)完備的設(shè)備管理信息系統(tǒng)軟件，可以有效的提高設(shè)備的利用率，對實驗室設(shè)備管理情況進(jìn)行準(zhǔn)確分析。為了使系統(tǒng)在實驗室的管理中發(fā)揮更大的作用，實現(xiàn)工作過程的自動化，提高工作效率和工作質(zhì)量，現(xiàn)提出如下的系統(tǒng)開發(fā)目標(biāo)： （ 1）系統(tǒng)應(yīng)具有易操作性、可靠性和可管理性，同時注意到先進(jìn)性。 （ 3）實驗室信息化管理的經(jīng)費(fèi)投入較少。 實驗室是所有高校、研究機(jī)構(gòu)必不可少的基本構(gòu)成單位。 相關(guān) 技術(shù) ............................................. 錯誤 !未定義書簽。 visualbasic 相關(guān)簡介 ................................................... 2 2 系統(tǒng) 需求 分析 ...................................................................... 4 需求分析 ..................................................................... 4 系統(tǒng) 目的 .............................................................. 4 系統(tǒng)功 能需求 .......................................................... 4 系統(tǒng) 性 能需求 ……………………………………………………………………………… 5 可行性分析 ................................................. 錯誤 !未定義書簽。特別是高校，實驗室的設(shè)備管理需要一套穩(wěn)定、高效的管理辦法。實驗室的投入主要是構(gòu)建實驗室的場所、儀器、設(shè)備，集中對與電工電子實驗相關(guān)的儀器設(shè)備的購置，對實驗室信息化管理投入相當(dāng)少。 （ 2）對數(shù)據(jù)庫進(jìn)行動態(tài)管理，防止混亂。 課題中涉及的相關(guān)技術(shù)及概念 相關(guān)技術(shù) 系統(tǒng)采用了先進(jìn)的 access 數(shù)據(jù)庫技術(shù)，面向?qū)ο蟮木幊谭椒▽W(xué)以及軟件工程方法學(xué) 。 VB 就是可視化程序設(shè)計語言。故而，實現(xiàn)本系統(tǒng) VB 是一個相對較好的選擇 。本系統(tǒng)為實驗室設(shè)備管理信息系統(tǒng)，通過這樣的系統(tǒng)，可以做到信息的規(guī)范管理，快速查詢實驗室設(shè)備的就業(yè)信息。 （ 5）退出系統(tǒng)：退出本系統(tǒng)，恢復(fù)系統(tǒng)的實始狀態(tài)。 （ 2） 系統(tǒng)的可擴(kuò)展性 系統(tǒng)的可擴(kuò)展性指系統(tǒng)對技術(shù)和業(yè)務(wù)需求變化的支持能力，能保證可持續(xù)增長以滿足用戶需求和業(yè)務(wù)復(fù)雜性要求。 （ 4）系統(tǒng)易用性和系統(tǒng)響應(yīng)速度 系統(tǒng)是直接面對使用人員的，而有些使用人員往往對計算機(jī)并不是非常熟悉。 經(jīng)濟(jì)可行性 經(jīng)濟(jì)可行性主要依據(jù)是成本 /效益分析，該系統(tǒng)的目標(biāo)是以最低的成本，在最短的期限內(nèi)開 發(fā)出實驗室設(shè)備管理信息系統(tǒng)。從經(jīng)濟(jì)角度考慮，此實驗室設(shè)備管理信息系統(tǒng)開發(fā)可行。系統(tǒng)整體結(jié)構(gòu)如圖 31所示： (1)用戶管理模塊：實現(xiàn)用戶登錄。數(shù)據(jù)庫設(shè)計是建立一個應(yīng)用程序最重要的步驟之一。 儀器設(shè)備管理信息系統(tǒng)主窗體的實現(xiàn) 一個程序的主窗體主要是由窗體、菜單欄、工具欄、狀態(tài)欄等組成。 39。End If 20 2） 儀器設(shè)備信息維護(hù)： 窗體 form6，在屬性欄 caption 里面輸入儀器設(shè)備信息查詢維護(hù)，在窗體中放置 1 個datagrid 控件 ， 1 個 text 控件， 4 個 mand 控件 , 1 個 adodc ，并分別輸入相應(yīng)的屬性值。End If If = Then MsgBox 請輸入維修費(fèi)用 ,若無費(fèi)用 ,則請輸入 0, , 提示 Exit Sub End If If = Then MsgBox 請輸入儀器設(shè)備名稱 , , 提示 Exit Sub End If select * from wxinfo, conn, adOpenKeyset, adLockOptimistic rs(儀器設(shè)備編號 ) = rs(使用情況 ) = rs(維修記錄 ) = rs(維修日期 ) = rs(維修費(fèi)用 ) = rs(儀器設(shè)備名稱 ) = = = 26 = 39。+39。+39。+39。+39。+39。+39。根據(jù)軟件測試的側(cè)重點和主要目標(biāo)不同，通常把測試劃分為下面幾個方面： （ 1）功能測試：即需求測試，這是最基本的測試。在功能測試中，著重測試了既定的系統(tǒng)流程是否 能正常完成；在使用性測試時，著重測試了界面設(shè)計的合理性、美觀性，以及是否具備良好的用戶體驗，系統(tǒng)操作是否易于用戶理解與使用 。自然，白盒測試是最耗時間但也是最完整的測試。 （ 3）個人信息部分。 通過對系統(tǒng)各個部分的功能測試，找出了系統(tǒng)中存在的功能缺陷。 在本次應(yīng)用系統(tǒng)的設(shè)計中，由于 時間關(guān)系只進(jìn)行了黑盒測試。它所依據(jù)的是程序的外部特征表現(xiàn)，而不考慮其內(nèi)部邏輯結(jié)構(gòu)。 （ 2）可靠性測試：目的是檢測應(yīng)用系統(tǒng)在各種環(huán)境下的運(yùn)行是否正常與穩(wěn)定。) Exit Sub 30 End If End Sub Private Sub Command2_Click() Unload Me End Sub Private Sub Form_Load() (儀器設(shè)備編號 ) (儀器設(shè)備的名稱 ) (采購人 ) (出產(chǎn)廠家 ) (使用情況 ) (維修記錄 ) End Sub 31 第五章 系統(tǒng)調(diào)試與測試 系統(tǒng)測試的目的及策略 系統(tǒng)測試是軟件開發(fā)中非常重要的一個環(huán)節(jié)，它是衡量我們開發(fā)系統(tǒng)的一個標(biāo)尺。) = select * from wxinfo where (wxinfo. amp。) Exit Sub End If If = 使用情況 Or = 維修記錄 Then = select as 儀器設(shè)備編 號 ,名稱 as 儀器設(shè)備名稱 , as 采購人 , as 出產(chǎn)廠家 ,日期 as 出廠日期 , as 金額 , as 采購日期 , as 采購數(shù)量 from cginfo,wxinfo where ( = ) and (wxinfo. amp。) = select as 儀器設(shè)備編號 ,名稱 as 儀器設(shè)備名稱 ,wxinfo. 使用情況 as 使用情況 ,wxinfo. 維修記錄 as 維修記錄 , as 維修日期 , as 維修費(fèi)用 from tzinfo,wxinfo where ( = ) and (tzinfo. amp。) Exit Sub End If If = 領(lǐng)取人 Or = 領(lǐng)取單位 Then = select as 儀器設(shè)備編號 ,名稱 as 儀器設(shè)備名稱 , as 采購人 , as 出產(chǎn)廠家 ,日期 as 出廠日期 , as 金額 , as 采購日期 , as 采購數(shù)量 from cginfo,tzinfo where ( = ) and (tzinfo. amp。) = select as 儀器設(shè)備編號 ,名稱 as 儀器設(shè)備名稱 ,wxinfo. 使用情況 as 使用情況 ,wxinfo. 維修記錄 as 維修記錄 , as 維修日期 , as 維修費(fèi)用 from cginfo,wxinfo where ( = ) and (cginfo. amp。主要部分代碼： Private Sub Command1_Click() If ( = 儀器設(shè)備 編號 ) Or ( = 儀器設(shè) 備名稱 ) Or ( = 采購人 ) Or ( = 出產(chǎn)廠家 ) Then = select * from cginfo