【正文】 txtName 域 If Len(Trim()) = 0 Then MsgBox (請選擇記錄) Exit Sub End If OriId = Val() 39。記錄編號(hào) If (OriId) = True Then 39。判斷是否存在此記錄信息26 OriInfoName = Trim() 39。將分類名稱保存到變量中 txtName = Trim() 39。varchar 框中顯示分類名稱 End IfEnd Sub（4）Cmd_Modi_Click 過程。選擇分類名稱，在文本框中對其修改后，單擊“修改”按鈕觸發(fā) Cmd_Modi_Click 事件，對應(yīng)的程序代碼如下：Private Sub Cmd_Modi_Click() 39。修改分類名稱 If Len(Trim()) = 0 Then MsgBox (請選擇記錄) Exit Sub End If 39。判斷新的名稱是否和原來的相同 If Trim(txtName) = OriInfoName Then Exit Sub End If 39。判斷新的名稱是否已經(jīng)存在 If (Trim(txtName)， 1) = True Then MsgBox (已經(jīng)存在此分類名稱) Exit Sub End If 39。更新名稱 = Trim(txtName) (OriId) DataRefresh 39。刷新分類列表End Sub（5）Cmd_Del_Click 過程。選擇要?jiǎng)h除的分類名稱，用戶單擊“刪除”按鈕觸發(fā)Cmd_Del_Click 事件，對應(yīng)的代碼如下：Private Sub Cmd_Del_Click()27 If Len(Trim()) = 0 Then MsgBox (請選擇記錄) Exit Sub End If 39。 確定刪除 If MsgBox(是否確定要?jiǎng)h除 ， vbYesNo， 請確認(rèn)) = vbNo Then Exit Sub End If 39。 刪除分類 (Val()) DataRefresh 39。刷新 DataList1End Sub 設(shè)備報(bào)廢信息管理模塊設(shè)備報(bào)廢信息管理模塊可以實(shí)現(xiàn)以下功能：? 系統(tǒng)管理員和審批經(jīng)理可以創(chuàng)建、修改、刪除和確認(rèn)報(bào)廢申請信息；? 審批經(jīng)理可以審批報(bào)廢申請信息。程序?qū)崿F(xiàn)流程如圖 420 所示：28報(bào)廢申請管理顯示各類狀態(tài)報(bào)廢設(shè)備記錄報(bào)廢審批管理管理顯示現(xiàn)有待審批 / 待報(bào)廢 / 已報(bào)廢設(shè)備記錄點(diǎn)擊申請調(diào)用設(shè)備信息查詢窗口 ，選中需要報(bào)廢設(shè)備填寫報(bào)廢原因新增報(bào)廢設(shè)備記錄返回并刷新顯示信息狀態(tài)為 “ 申請 ” 的記錄點(diǎn)擊提交是修改 、 刪除 、提交按鈕不能使用否彈出選擇審判人窗口更新報(bào)廢記錄 ，狀態(tài)為 “ 提交 ”確定審批經(jīng)理返回并刷新顯示信息點(diǎn)擊修改 / 刪除更新 / 刪除報(bào)廢記錄返回并刷新顯示信息狀態(tài)為 “ 提交 ” 的記錄點(diǎn)擊審批狀態(tài)為 “ 同意 ” 的記錄點(diǎn)擊報(bào)廢填寫審批意見不同意更新報(bào)廢記錄 ， 狀態(tài)為“ 不同意 ”同意刷新顯示信息更新報(bào)廢記錄 ， 狀態(tài)為“ 同意 ”返回并刷新顯示信息刷新顯示信息彈出確認(rèn)報(bào)廢提示更新報(bào)廢記錄 ， 狀態(tài)為“ 報(bào)廢 ”返回并刷新顯示信息圖 420 設(shè)備報(bào)廢信息管理模塊程序?qū)崿F(xiàn)流程 設(shè)備報(bào)廢申請管理窗體報(bào)廢申請管理窗體的名稱為 FrmDiscard，窗體布局如圖 421 所示。圖 420 報(bào)廢申請管理窗口報(bào)廢申請管理中包含兩種記錄，一種為還沒有提交的設(shè)備報(bào)廢申請；另一種為不同意報(bào)廢的申請記錄。29當(dāng)單擊“提交”按鈕時(shí)觸發(fā) Cmd_submit_click 事件，對應(yīng)的代碼如下：Private Sub Cmd_Submit_Click() If = True Then MsgBox 請選擇記錄 Exit Sub End If If MsgBox(是否確定要提交，提交后將不能更改記錄， vbYesNo， 請確認(rèn)) = vbNo Then Exit Sub End If 39。設(shè)置報(bào)廢單編號(hào) = (0) 39。選擇審批人 1 GridRefreshEnd Sub當(dāng)用戶提交報(bào)廢申請時(shí)，需要選擇審批人，選擇審批人的窗體為FrmDiscardSubmit，它的窗體布局如圖 422 所示。圖 422 選擇審批人窗口單擊“提交”觸發(fā) Cmd_submit_click 事件，對應(yīng)的代碼如下：Private Sub Cmd_Submit_Click() 39。更改報(bào)廢申請狀態(tài)和審批人 = = 提交30 OriId， 1 Unload MeEnd Sub提交設(shè)備報(bào)廢申請的同時(shí)更改申請單的狀態(tài)，并添加審批人信息。315 測試 測試環(huán)境A、操作系統(tǒng)：Windows 2022 Advanced Server，Windows 2022 Server，Windows XPB、數(shù)據(jù)引擎：Microsoft Sql Server 2022C、硬件要求：專業(yè)服務(wù)器即可D、帶寬要求：2M 共享或更高 編程工具編程語言：VB數(shù)據(jù)庫：SQL SERVER 2022 測試的技術(shù)與策略 測試的技術(shù)測試主要分兩種方法：白盒測試：白盒測試檢測軟件內(nèi)部的邏輯結(jié)構(gòu)，仔細(xì)檢查過程的細(xì)節(jié)為基礎(chǔ)通過提供一組指定條件和循環(huán)的測試用例，對穿過軟件的邏輯路徑進(jìn)行測試，可以在不同點(diǎn)檢查程序的狀態(tài)，以確定實(shí)際狀態(tài)與預(yù)期狀態(tài)是否一致。黑盒測試：黑盒測試著眼于軟件外部特性，而不考慮軟件內(nèi)部的邏輯結(jié)構(gòu)。黑盒測試指的是從軟件的接口進(jìn)行測試，主要看它是否能正常接受數(shù)據(jù)和輸出正確的結(jié)果。每個(gè)系統(tǒng)的測試都會(huì)用到兩種方法。當(dāng)使用黑盒時(shí)發(fā)現(xiàn)功能不能實(shí)現(xiàn)、編譯出錯(cuò)、輸入出錯(cuò)或輸出不是預(yù)期的結(jié)果時(shí)，更多的會(huì)使用白盒測試，跟蹤到程序的內(nèi)部看邏輯是否有不正確的地方。32 測試的策略單元測試：主要檢驗(yàn)軟件設(shè)計(jì)的最小單位——模塊。單元測試可分人工測試和計(jì)算機(jī)測試，人工測試更多的是代碼審核，而測試軟件則是計(jì)算機(jī)測試的常用的手段。集成測試：主要目標(biāo)是發(fā)現(xiàn)與接口有關(guān)的問題。它主要兩種方法：①一種是先測試每一塊模塊，在把所有模塊按設(shè)計(jì)結(jié)合在一起成為所需要的程序，稱之為非漸增式測試②另一種是把要裝配的兩塊測試完，再把它們組合起來測試，接下來再測試要裝配的下個(gè)模塊，在裝配后再測試，稱之為漸增式測試。 系統(tǒng)測試點(diǎn)在本系統(tǒng)當(dāng)中，由于大部分都是與表單交互的數(shù)據(jù)處理，所以我們主要采用了黑盒測試為主的測試方法，將系統(tǒng)中所有的流程都按照正常的途徑測試一次。測試點(diǎn)如下：頁面是否跳轉(zhuǎn)異常數(shù)據(jù)庫信息是否按預(yù)想結(jié)果發(fā)生變化系統(tǒng)運(yùn)行是否正確數(shù)據(jù)顯示是否正確在正常操作的基礎(chǔ)上，我們引入了異常處理機(jī)制，判斷在某些非正常操作下，系統(tǒng)是否正常工作。測試點(diǎn)如下：非授權(quán)操作情況（普通用戶和管理員權(quán)限刪除用戶權(quán)限控制、密碼錯(cuò)誤）下，是否有相應(yīng)提示或彈出到登錄頁面。數(shù)據(jù)庫未開啟情況下，是否會(huì)提示數(shù)據(jù)庫無法連接。非法的表單數(shù)據(jù)，或者錯(cuò)誤的輸入，是否有相應(yīng)提示。經(jīng)過以上測試，本系統(tǒng)的所有功能均能正常工作，無異常情況發(fā)生。336 結(jié)論1） 系統(tǒng)的特點(diǎn)本系統(tǒng)是一個(gè)計(jì)算機(jī)設(shè)備管理信息系統(tǒng) ，用于計(jì)算機(jī)設(shè)備日常維護(hù)管理。本系統(tǒng)從功能上來說，比較完備。系統(tǒng)以 C/S 結(jié)構(gòu)方式，實(shí)現(xiàn)了對信息數(shù)據(jù)的瀏覽、查詢和管理等基本數(shù)據(jù)庫操作，系統(tǒng)采用了模塊化設(shè)計(jì)方法，根據(jù)用戶的需求及程序的應(yīng)用與維護(hù)的易用性，將各個(gè)部分置于不同的模塊當(dāng)中，方便了程序的擴(kuò)展與維護(hù)，同時(shí)建立了程序功能復(fù)用的基礎(chǔ)。2） 系統(tǒng)的不足和改進(jìn)本系統(tǒng)基本上滿足了關(guān)于計(jì)算機(jī)設(shè)備信息管理方面的需要。實(shí)現(xiàn)了設(shè)備管理人員和運(yùn)維人員所要求的功能。界面上力求做到簡單、方便，在操作方面盡量避免由于用戶操作不當(dāng)帶來系統(tǒng)的出錯(cuò)現(xiàn)象。但由于時(shí)間倉促，本系統(tǒng)還存在一些不足之處，界面不夠美觀，需要進(jìn)一步修飾和美化；對數(shù)據(jù)庫操作的性能有待進(jìn)一步優(yōu)化，雖然本系統(tǒng)優(yōu)化了不少，但要達(dá)到理想狀態(tài)還有一段距離，如部分功能程序代碼過長。根據(jù)系統(tǒng)的不足，繼續(xù)改進(jìn)和完善本系統(tǒng)。提高審美觀點(diǎn)，力求給用戶提供美觀友好的界面；簡化程序代碼，可使不同界面之間能共享一些方法、函數(shù)和變量，對于相同的功能模塊可生成程序包供其它界面引用，這樣就會(huì)提高系統(tǒng)的運(yùn)行速度。3） 設(shè)計(jì)收獲與心得經(jīng)過這次畢業(yè)設(shè)計(jì)，我感到自己無論在專業(yè)知識(shí)方面，還是在自學(xué)能力方面都有了很大的收獲。讓我學(xué)到了以前我從沒有接觸過的新的知識(shí)，有些雖然學(xué)過，但從沒有真正用過的知識(shí)有了一定深入的了解，而且還增加了實(shí)踐操作能力及綜合運(yùn)用能力。需要注意的一點(diǎn)是，在設(shè)計(jì)過程中，一定要合理的掌握時(shí)間，安排時(shí)間。要嚴(yán)格按照預(yù)期設(shè)定的時(shí)間安排，完成指定地各項(xiàng)任務(wù)。否則，只會(huì)讓自己過得很累。另外，通過此次畢業(yè)設(shè)計(jì)，本人對開發(fā)一個(gè)軟件的各個(gè)階段有了一定的了解，深刻體會(huì)到設(shè)計(jì)一個(gè)好的系統(tǒng)，從需求分析→概要設(shè)計(jì)→詳細(xì)設(shè)計(jì)→系統(tǒng)的實(shí)現(xiàn)與編碼→測試，每一步都非常的重要，特別是書寫代碼時(shí)良好的習(xí)慣會(huì)對錯(cuò)誤的檢查和代碼的維護(hù)有很大的幫助，而不像以前寫代碼，只想實(shí)現(xiàn)要實(shí)現(xiàn)的功能，不管代碼的書寫質(zhì)量，內(nèi)存空間的有效利用等問題，而且一段好的代碼，必須要有注釋.在本系統(tǒng)開發(fā)過程中，為了趕進(jìn)度，對許多知識(shí)還沒做到深入的了解，對調(diào)試時(shí)產(chǎn)生的一些問題常常感到無從下手，當(dāng)然最后通過老師的指導(dǎo)和幫助，問題也得以解決。34參 考 文 獻(xiàn)[1] ：，20225[2] 計(jì)世資訊（CCW Research）.2022 年中國金融行業(yè)信息化建設(shè)與 IT 應(yīng)用趨勢研究報(bào)告》.計(jì)世資訊，20222[3] ，20223[4] 劉韜，駱娟，李閩溟， Basic 數(shù)據(jù)庫系統(tǒng)開發(fā)實(shí)例導(dǎo)航[M].北京：人民郵電出版社，2022[5] 趙杰，李濤，[M].北京：清華大學(xué)出版社，2022[6] 易福華. Visual Basic 典型系統(tǒng)實(shí)戰(zhàn)與解析[M].北京：電子工業(yè)出版社，2022[7] 李香敏，徐進(jìn)，姜世鋒， Server2022 程序員指南[M].北京：希望電子出版社，2022[8] 沈煒，楊世錫. Visual Basic 編程 從基礎(chǔ)到實(shí)踐[M].北京：電子工業(yè)出版社，202235附 錄