【正文】 另外，通過(guò)此次畢業(yè)設(shè)計(jì)，本人對(duì)開(kāi)發(fā)一個(gè)軟件的各個(gè)階段有了一定的了解，深刻體會(huì)到設(shè)計(jì)一個(gè)好的系統(tǒng)，從需求分析→概要設(shè)計(jì)→詳細(xì)設(shè)計(jì)→系統(tǒng)的實(shí)現(xiàn)與編碼→測(cè)試，每一步都非常的重要，特別是書(shū)寫(xiě)代碼時(shí)良好的習(xí)慣會(huì)對(duì)錯(cuò)誤的檢查和代碼的維護(hù)有很大的幫助，而不像以前寫(xiě)代碼，只想實(shí)現(xiàn)要實(shí)現(xiàn)的功能，不管代碼的書(shū)寫(xiě)質(zhì)量，內(nèi)存空間的有效利用等問(wèn)題，而且一段好的代碼，必須要有注釋.在本系統(tǒng)開(kāi)發(fā)過(guò)程中，為了趕進(jìn)度，對(duì)許多知識(shí)還沒(méi)做到深入的了解，對(duì)調(diào)試時(shí)產(chǎn)生的一些問(wèn)題常常感到無(wú)從下手，當(dāng)然最后通過(guò)老師的指導(dǎo)和幫助，問(wèn)題也得以解決。要嚴(yán)格按照預(yù)期設(shè)定的時(shí)間安排，完成指定地各項(xiàng)任務(wù)。讓我學(xué)到了以前我從沒(méi)有接觸過(guò)的新的知識(shí)，有些雖然學(xué)過(guò)，但從沒(méi)有真正用過(guò)的知識(shí)有了一定深入的了解，而且還增加了實(shí)踐操作能力及綜合運(yùn)用能力。提高審美觀點(diǎn)，力求給用戶提供美觀友好的界面；簡(jiǎn)化程序代碼，可使不同界面之間能共享一些方法、函數(shù)和變量，對(duì)于相同的功能模塊可生成程序包供其它界面引用，這樣就會(huì)提高系統(tǒng)的運(yùn)行速度。但由于時(shí)間倉(cāng)促，本系統(tǒng)還存在一些不足之處，界面不夠美觀，需要進(jìn)一步修飾和美化；對(duì)數(shù)據(jù)庫(kù)操作的性能有待進(jìn)一步優(yōu)化，雖然本系統(tǒng)優(yōu)化了不少，但要達(dá)到理想狀態(tài)還有一段距離，如部分功能程序代碼過(guò)長(zhǎng)。實(shí)現(xiàn)了設(shè)備管理人員和運(yùn)維人員所要求的功能。系統(tǒng)以 C/S 結(jié)構(gòu)方式，實(shí)現(xiàn)了對(duì)信息數(shù)據(jù)的瀏覽、查詢和管理等基本數(shù)據(jù)庫(kù)操作，系統(tǒng)采用了模塊化設(shè)計(jì)方法，根據(jù)用戶的需求及程序的應(yīng)用與維護(hù)的易用性，將各個(gè)部分置于不同的模塊當(dāng)中，方便了程序的擴(kuò)展與維護(hù)，同時(shí)建立了程序功能復(fù)用的基礎(chǔ)。336 結(jié)論1） 系統(tǒng)的特點(diǎn)本系統(tǒng)是一個(gè)計(jì)算機(jī)設(shè)備管理信息系統(tǒng) ，用于計(jì)算機(jī)設(shè)備日常維護(hù)管理。非法的表單數(shù)據(jù)，或者錯(cuò)誤的輸入，是否有相應(yīng)提示。測(cè)試點(diǎn)如下：非授權(quán)操作情況（普通用戶和管理員權(quán)限刪除用戶權(quán)限控制、密碼錯(cuò)誤）下，是否有相應(yīng)提示或彈出到登錄頁(yè)面。 系統(tǒng)測(cè)試點(diǎn)在本系統(tǒng)當(dāng)中，由于大部分都是與表單交互的數(shù)據(jù)處理，所以我們主要采用了黑盒測(cè)試為主的測(cè)試方法，將系統(tǒng)中所有的流程都按照正常的途徑測(cè)試一次。集成測(cè)試：主要目標(biāo)是發(fā)現(xiàn)與接口有關(guān)的問(wèn)題。32 測(cè)試的策略單元測(cè)試：主要檢驗(yàn)軟件設(shè)計(jì)的最小單位——模塊。每個(gè)系統(tǒng)的測(cè)試都會(huì)用到兩種方法。黑盒測(cè)試：黑盒測(cè)試著眼于軟件外部特性，而不考慮軟件內(nèi)部的邏輯結(jié)構(gòu)。更改報(bào)廢申請(qǐng)狀態(tài)和審批人 = = 提交30 OriId， 1 Unload MeEnd Sub提交設(shè)備報(bào)廢申請(qǐng)的同時(shí)更改申請(qǐng)單的狀態(tài)，并添加審批人信息。選擇審批人 1 GridRefreshEnd Sub當(dāng)用戶提交報(bào)廢申請(qǐng)時(shí)，需要選擇審批人，選擇審批人的窗體為FrmDiscardSubmit，它的窗體布局如圖 422 所示。29當(dāng)單擊“提交”按鈕時(shí)觸發(fā) Cmd_submit_click 事件，對(duì)應(yīng)的代碼如下：Private Sub Cmd_Submit_Click() If = True Then MsgBox 請(qǐng)選擇記錄 Exit Sub End If If MsgBox(是否確定要提交，提交后將不能更改記錄， vbYesNo， 請(qǐng)確認(rèn)) = vbNo Then Exit Sub End If 39。程序?qū)崿F(xiàn)流程如圖 420 所示：28報(bào)廢申請(qǐng)管理顯示各類(lèi)狀態(tài)報(bào)廢設(shè)備記錄報(bào)廢審批管理管理顯示現(xiàn)有待審批 / 待報(bào)廢 / 已報(bào)廢設(shè)備記錄點(diǎn)擊申請(qǐng)調(diào)用設(shè)備信息查詢窗口 ，選中需要報(bào)廢設(shè)備填寫(xiě)報(bào)廢原因新增報(bào)廢設(shè)備記錄返回并刷新顯示信息狀態(tài)為 “ 申請(qǐng) ” 的記錄點(diǎn)擊提交是修改 、 刪除 、提交按鈕不能使用否彈出選擇審判人窗口更新報(bào)廢記錄 ，狀態(tài)為 “ 提交 ”確定審批經(jīng)理返回并刷新顯示信息點(diǎn)擊修改 / 刪除更新 / 刪除報(bào)廢記錄返回并刷新顯示信息狀態(tài)為 “ 提交 ” 的記錄點(diǎn)擊審批狀態(tài)為 “ 同意 ” 的記錄點(diǎn)擊報(bào)廢填寫(xiě)審批意見(jiàn)不同意更新報(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)廢申請(qǐng)管理窗體報(bào)廢申請(qǐng)管理窗體的名稱為 FrmDiscard，窗體布局如圖 421 所示。 刪除分類(lèi) (Val()) DataRefresh 39。選擇要?jiǎng)h除的分類(lèi)名稱，用戶單擊“刪除”按鈕觸發(fā)Cmd_Del_Click 事件，對(duì)應(yīng)的代碼如下：Private Sub Cmd_Del_Click()27 If Len(Trim()) = 0 Then MsgBox (請(qǐng)選擇記錄) Exit Sub End If 39。更新名稱 = Trim(txtName) (OriId) DataRefresh 39。判斷新的名稱是否和原來(lái)的相同 If Trim(txtName) = OriInfoName Then Exit Sub End If 39。選擇分類(lèi)名稱，在文本框中對(duì)其修改后，單擊“修改”按鈕觸發(fā) Cmd_Modi_Click 事件，對(duì)應(yīng)的程序代碼如下：Private Sub Cmd_Modi_Click() 39。將分類(lèi)名稱保存到變量中 txtName = Trim() 39。記錄編號(hào) If (OriId) = True Then 39。選擇數(shù)據(jù)列表中的記錄，在文本框中同時(shí)顯示此分類(lèi)名稱，對(duì)應(yīng)的代碼如下：Private Sub DataList1_Click() 39。判斷數(shù)據(jù)庫(kù)中是否已經(jīng)存在此分類(lèi)名稱 If (Trim(txtName)， 1) = True Then MsgBox (已經(jīng)存在此分類(lèi)名稱) Exit Sub End If 39。在文本框中輸入新的分類(lèi)名稱，單擊“添加”按鈕時(shí)觸發(fā) cmd_add_click 事件，代碼如下：Private Sub Cmd_Add_Click()25 39。設(shè)置列表中顯示字段 = InfoID 39。設(shè)置 SQL 語(yǔ)句 = SELECT * FROM BaseInfo WHERE TypeId= + Trim(TypeID) 39。其中過(guò)程 DataRefresh 對(duì)應(yīng)的代碼如下：Private Sub DataRefresh() 39。表 43 設(shè)備分類(lèi)管理窗體控件及其屬性表對(duì)象名 屬性 屬性值DataList1 Name DataList1(用來(lái)顯示設(shè)備分類(lèi)名稱 )Adodcl Visible False(用來(lái)提供數(shù)據(jù)源 )TxtName Name Txtname（用來(lái)編輯分類(lèi)名稱）Cmd_Add caption 添加Cmd_Modi caption 修改Cmd_del Caption 刪除Cmd_exit Caption 退出窗體代碼如下：（1）Form_Load 過(guò)程，對(duì)應(yīng)代碼：Private Sub Form_Load() 39。23 設(shè)備分類(lèi)管理設(shè)備分類(lèi)管理窗體的名稱為 FrmType，布局如圖 48 所示。如果當(dāng)前用戶是普通用戶，則打開(kāi)用戶編輯窗體，編輯自己的用戶信息 With FrmUserEdit .OriUser = .txtUserName = .txtPass = .txtPass2 = .Modify = True .Show 1 End WithEnd SubPrivate Sub mn_Users_Click() 39。報(bào)廢申請(qǐng)管理 1End SubPrivate Sub mn_Approve_Click() 39。設(shè)備巡檢管理 1End SubPrivate Sub mn_Move_Click() 39。設(shè)備信息管理 1End SubPrivate Sub mn_Mntenance_Click() 39?；拘畔⒐芾? 1End SubPrivate Sub mn_Types_Click() = 1 = 設(shè)備類(lèi)型管理 1End SubPrivate Sub mn_Interprise_Click() = 221 = 設(shè)備品牌管理 1End SubPrivate Sub mn_Branch_Click() = 3 = 支行管理 1End SubPrivate Sub mn_Exit_Click() 39。19圖 45 窗體菜單編輯程序?qū)崿F(xiàn)流程如圖 46 所示：進(jìn)入系統(tǒng)進(jìn)入各級(jí)菜單進(jìn)入系統(tǒng)用戶管理進(jìn)入 基本信息管理設(shè)備運(yùn)行管理進(jìn)入各子窗口管理員權(quán)限退出系統(tǒng)點(diǎn)擊退出系統(tǒng)修改自身口令 否用戶管理是提示“ 沒(méi)有權(quán)限 ”圖 46 主界面程序?qū)崿F(xiàn)流程圖系統(tǒng)主界面如圖 47 所示：20圖 47 系統(tǒng)主界面主窗體 FrmMain 代碼如下：Private Sub Form_Load() 39。本系統(tǒng)中主窗體名為 FrmMain。16表 41 設(shè)置登錄窗體的屬性窗體屬性 設(shè)置值 具體說(shuō)明名稱 FrmLogin 設(shè)置窗體名稱BorderStyle 1Fixed Single設(shè)置窗體的邊框?qū)傩訡aption 身份驗(yàn)證 窗體的標(biāo)題條文本ControlBox False 取消控制按鈕，防止用戶通過(guò)控制按鈕關(guān)閉對(duì)話框StartUpPosition2屏幕中心 設(shè)置窗體彈出時(shí)，位置在屏幕中心登錄窗體中控件的屬性如表 42 所示。登錄用戶名或密碼為空是 ， 重新登錄用戶名校驗(yàn)否記錄身份進(jìn)入系統(tǒng)正確登錄嘗試達(dá)到 3 次錯(cuò)誤退出是否 ， 重新登錄密碼校驗(yàn) 正確錯(cuò)誤圖 41 登錄程序?qū)崿F(xiàn)流程圖登錄窗體的名稱為 FrmLogin，他的界面布局如圖 42 所示。154 系統(tǒng)詳細(xì)設(shè)計(jì) 設(shè)計(jì)登錄窗體當(dāng)系統(tǒng)運(yùn)行時(shí)，首先打開(kāi)登錄窗體，只有有權(quán)限的用戶才能進(jìn)入系統(tǒng)。6. Discard 類(lèi)用來(lái)管理表 Discard 的數(shù)據(jù)庫(kù)操作，它保存為 。4. Check 類(lèi)用來(lái)管理表