【文章內(nèi)容簡介】 select * from denglu where name=39。 amp。 aa amp。 39。and passwd=39。 amp。 bb amp。 39。 If 0 Then a = b = Unload Me Else MsgBox 姓名或密碼錯誤, 64, 提示 = = End If End IfEnd IfEnd SubPrivate Sub Command2_Click()EndEnd SubPrivate Sub Form_Load() = amp。 \End Sub 創(chuàng)建主窗體主窗體沒有包含控件，但包含一個菜單，設計中的 主窗體及其菜單如圖54所示。圖54 主窗體從主窗體的菜單中可以進入相應的子窗體中，進行用戶需要的工作。 創(chuàng)建人員管理窗體新建一個窗體，并命名為HRform。窗體的Caption屬性設置為“人員管理”。設置MDIChild屬性為true ，并將WindowState設置為最大化。用戶重新選擇DataGrid1控件中的行列，則記錄用戶所在的行。用戶單擊“添加員工”按鈕，則顯示添加員工窗體。用戶單擊“刪除員工”按鈕，則彈出對話框確認，無誤之后執(zhí)行SQL語句，刪除員工。然后刷新Ado數(shù)據(jù)控件，確保數(shù)據(jù)庫和DataGrid控件中的數(shù)據(jù)一致性。如果出現(xiàn)錯誤，將錯誤記錄到錯誤日志中。用戶單擊“修改員工”按鈕，則顯示修改員工窗體，并將響應的用戶選定信息傳遞給修改員工窗體。操作完畢，用戶單擊“取消”按鈕，可以退出本窗體。界面設計如圖55所示。圖55 添加員工窗體新建一個窗體，并命名為AddEForm，Caption設置為“添加員工”。如圖56所示。圖56 添加員工窗體修改員工窗體新建一個窗體，并命名為UpdateEForm，Caption設置為“修改員工”。窗體界面設計如圖57所示。圖57 修改員工窗體 創(chuàng)建職位管理窗體該窗體實現(xiàn)對職工的增刪改功能。單擊“添加職位”按鈕可以調(diào)用“添加職位”窗體，進行人員的添加。單擊“刪除職位”按鈕會彈出對話框，要求確認刪除該職位，單擊“是”按鈕，既刪除該職位。單擊“修改職位”按鈕可以調(diào)用”修改職位“窗體，進行人員信息的修改。單擊“取消“按鈕可以退出該窗體。窗體界面設計如圖58所示。 圖58 職位管理窗體添加職位窗體如圖59所示。圖59 添加職位窗體創(chuàng)建修改職工窗體圖510圖510 修改職位窗體 創(chuàng)建特殊項管理窗體該窗體實現(xiàn)對特殊項的增刪功能。特殊項管理窗體如圖511所示。圖511 特殊項管理窗體添加窗體界面如圖512所示。圖512 添加特殊項窗體修改窗體如圖513所示。圖513 修改特殊項窗體第6章 性能測試與分析 系統(tǒng)測試概述 系統(tǒng)測試的目標 系統(tǒng)測試是系統(tǒng)開發(fā)周期中的一個十分重要而且漫長的階段，它是保證系統(tǒng)質(zhì)量和可靠性的最后關口，是對整個系統(tǒng)開發(fā)過程包括系統(tǒng)分析、系統(tǒng)設計和系統(tǒng)實施的最終審查。雖然系統(tǒng)在測試之前經(jīng)過了系統(tǒng)分析、需求分析、數(shù)據(jù)庫分析、詳細分析等階段嚴格的技術審查，但是錯誤和疏漏的存在還是無法避免的。如果沒有再投入運行前的系統(tǒng)測試階段被發(fā)現(xiàn)并糾正，問題遲早會在進行中暴露出來，到那時要糾正錯誤將會付出更大的代價，因此系統(tǒng)測試是系統(tǒng)開發(fā)中一個最重要的環(huán)節(jié)，它的主要任務是在整個軟件中找出錯誤。 系統(tǒng)測試的目標從用戶的角度出發(fā)，希望通過軟件測試能充分暴露軟件中存在的問題和缺陷，從而考慮是否可以接受該產(chǎn)品；從開發(fā)者的角度出發(fā)，希望測試表明軟件產(chǎn)品不存在錯誤，已經(jīng)正確地實現(xiàn)了用戶的需求，確立人們對軟件質(zhì)量的信心。 系統(tǒng)測試過程在開發(fā)本系統(tǒng)時，為了使系統(tǒng)能夠穩(wěn)定運行，對本系統(tǒng)進行了有針對性的全面測試，采取的方式是：1. 菜單項測試：為了保證每一項下拉菜單能夠正確實現(xiàn)系統(tǒng)設計的功能，我把有關資料的所有基礎數(shù)據(jù)，輸入到本系統(tǒng)中，并對每一個菜單項反復進行了增加、刪除、修改等操作，從而保證了菜單級功能的正確實現(xiàn)。2. 數(shù)據(jù)跟蹤：完成菜單項測試后，我又對系統(tǒng)內(nèi)的每一個數(shù)據(jù)進行了跟蹤。例如：例如對資料的管理，我首先在管理模塊中對某種材料進行登記，然后在管理模塊中進行數(shù)據(jù)操作，隨時觀察這兩個數(shù)值之間是否有沖突產(chǎn)生，經(jīng)過對材料的數(shù)值多次不同大小的設置并進行驗證，說明該功能完全正常。3. 綜合測試：在以上測試的基礎上對系統(tǒng)功能進行了整體的測試，依次來檢驗系統(tǒng)功能是否符合系統(tǒng)設計的要求。 具體測試 用戶登陸測試 所涉及到的用戶應該先在數(shù)據(jù)庫中建立。用戶測試所用表單如表61所示。表61 用戶測試登記表測試對象用戶登錄所屬項目企業(yè)人事信息管理系統(tǒng)序號測試項名稱操作步驟預期結果實際結果測試結論1登錄選擇正確的用戶錯誤密碼系統(tǒng)提示輸入密碼不正確， 系統(tǒng)提示輸入密碼不正確，請重新輸入正確2登錄選擇用戶輸入錯誤系統(tǒng)提示沒有該密碼系統(tǒng)提示沒有這個用戶請重新輸入正確 職工工資的調(diào)整 輸入要調(diào)整職工的編號，單擊查詢即可找到，然后對其進行相應的修改，最后單擊修改即可操作成功。如輸入“001”將其工資調(diào)整為1350元， 綜合測試 時常有這樣的情況發(fā)生，每個模塊都能單獨工作，但這些模塊集成在一起之后卻不能正常工作，主要原因如下。1. 模塊相互調(diào)用時接口會引入許多新問題。例如：數(shù)據(jù)經(jīng)過接口可能丟失。2. 一個模塊對另一個模塊可能造成不應有的影響。3. 幾個子功能組合起來不能并實現(xiàn)主功能。4. 誤差不斷積累達到不可接受的程度。綜合測試是組裝軟件的系統(tǒng)測試技術，按設計要求把通過單元測試的各個模塊組裝在一起之后，進行測試，以便發(fā)現(xiàn)與接口有關的各種錯誤。 性能測試與分析 統(tǒng)測試應該由若干個不同測試組成，目的是充分運行系統(tǒng)，使系統(tǒng)各部件是否都能正常工作并完成所賦予的任務。通常要包括以下幾種測試。1. 恢復測試：主要檢查系統(tǒng)的容錯能力。當系統(tǒng)出錯時，能否在指定時間間隔內(nèi)修正錯誤并重新啟動系統(tǒng)。2. 安全測試：檢查系統(tǒng)對非法侵入的防范能力，安全測試期間，測試人員假扮非法入侵者，采用各種辦法試圖突破防線。3. 強度測試檢查程序?qū)Ξ惓Ｇ闆r的抵抗能力，測試總是迫使系統(tǒng)在異常的資源配置下進行。4. 性能測試：對于那些實時和嵌入式系統(tǒng)，軟件部分即使?jié)M足功能要求，也未必能夠滿足性能要求，雖然從單元測試起，每一測試步驟都包含性能測試，但只有當系統(tǒng)真正集成之后，在真實環(huán)境中才能全面、可靠地測試運行性能系統(tǒng)性能測試是為了完成這一任務。性能測試有時與強度測試相結合，經(jīng)常需要其他硬件的配套支持。進行恢復測試首先采用各種辦法強迫系統(tǒng)失敗，然后驗證系統(tǒng)是否能盡快恢復。進行安全測試時，可以想方設法截取或破譯口令；專門定做軟件破壞系統(tǒng)的保護機制；故意導致系統(tǒng)失敗，企圖趁恢復之機非法進入等等。理論上講，只要有足夠的時間和資源，沒有不可進入的系統(tǒng)。因此系統(tǒng)安全設計的準則是，使非法侵入的代價超過被保護信息的價值。強度測試可以采取大數(shù)據(jù)量、大運算量，運行需要最大存儲空間（或其他資源）的測試方法。結 論經(jīng)過一個多月的設計和開發(fā)，職工信息管理與分析系統(tǒng)基本開發(fā)完畢。其功能基本符合用戶需求，能夠完成各種信息的存儲和工資管理方面內(nèi)容等以及各類相關報表的信息。數(shù)據(jù)的一致性的問題也通過程序進行有效地解決。但由于畢業(yè)設計時間短，所以該系統(tǒng)還有許多不盡人意的地方，比如退休工人和月份報表的內(nèi)容沒有設計到，用戶界面不夠美觀，出錯處理不夠等許多方面問題。另外由于我水平有限，經(jīng)驗不夠豐富，肯請老師給予指導和指正。此程序還有待進一步開發(fā)和改善?！癕icrosoft Visual Basic ”的可視化的用戶界面，面向?qū)ο缶幊痰忍攸c也增加了許多功能強大的開發(fā)工具，同時也增強了數(shù)據(jù)庫訪問的快捷性和新的增強功能的向?qū)?，用戶可以使用Visual Basic ，隨著網(wǎng)絡功能的增強，Visual Basic的應用前景將會更加廣泛。謝 辭在即將畢業(yè)的近幾個月時間是我學生生涯中最有價值的一段時光。這里有治學嚴謹而不失親切的老師，有互相幫助的同學，更有向上、融洽的學習生活氛圍。借此論文之際，我要向所有人表示我的謝意?；仡櫲陮W習期間的一千余個日日夜夜，自己為有機會擺脫工作的煩惱與浮躁，靜心鉆研，潛心研究，并取得初步研究成果而感到欣慰。欣慰之余，我要向關心和支持我學習的所有領導、同事和朋友們表示真摯的謝意！ 首先感謝周老師。周老師在工作上非常的嚴謹，在他的細心幫助和指導下功夫的論文才得以順利地完成，還要感謝我身邊的一些同學，是他們和我一起研究探討，不怕困難，周老師嚴謹?shù)闹螌W態(tài)度和忘我的工作精神和同學們不怕困難的恒心都值得我去學習。非常感謝大家在我的畢業(yè)設計中，給予了我極大的幫助，使我對整個畢業(yè)設計的思路有了總體的把握，并耐心的幫我解決了許多實際問題，使我有了很大收獲。同時，他們在整個開發(fā)過程中提出了許多建設性意見，并給我解決了一些專業(yè)性問題?？傊?，在以后的學習生活中我將以加倍的努力作為對給予我?guī)椭膶W校、老師及同學們的回報。參考文獻[1] . [2] . . 2004[3] 孫涌. . 2006[4] . .[5] 東方人華. Office . 2002[6] 潭浩強. Visual Basic . 2002[7] 王金利. Visual Basic . 2004[8] 王曉敏. . 1999[9] 曾華. . 1997[10] 胡昌平. [11] 相關網(wǎng)站 ：// vb學習網(wǎng)[12] 李玉東. Visual Basic [13] 盧毅. Visual Basic [14] 王志敏. Visual [15] 匡松. Visual Basic ： 附　錄 （1）主窗體代碼：Private Sub Analysis_Click() End SubPrivate Sub HRManage_Click() End Sub相應MDIForm對象的Load事件，對整體進行初始化Private Sub MDIForm_Load() gfile = amp。 \ Set gX = CreateObject(excel. application)End SubPrivate Sub PayOffTable_Click() End SubPrivate Sub PosManage_Click() End SubPrivate Sub SpecialManage_Click() End SubPrivate Sub MDIFrom_QueryUnload(Cancel As Integer, UnloadMode As Integer) On Error Resume Next Unload AddEForm Unload AddPForm Unload AddSForm Unload UpdateEForm Unload UpdatePForm Unload UpdateSFormEnd Sub（2）人員管理窗體代碼：Public CurEm As IntegerPrivate Sub cmdAddEmployee_Click() End SubPrivate Sub cmdCancel_Click() End SubPrivate Sub cmdDeleteEmployee_Click() Dim interrfileno As Integer On Error GoTo errgoto openDBFile = 0 = CurEm If vbYes = MsgBox(是否刪除 amp。 amp。 ?, vbYesNo) Then = CurEm = 0 delete from 職位 where 職位= amp。 amp。 End If closeDBfile Exit Suberrgoto: interrfileno = FreeFile() Open For Append As interrfileno Print interrfileno, Chr(34) + Format(Now, YYYYMMDD HH:MM:SS) + Chr(34), Chr(34) + 信息 + Chr(34), Chr(34) + + Chr(34), Chr(34) + cmdDeleteEmployee_click(HRForm) + Chr(34), Chr(34) + + Chr(34) Close interrfilenoEnd Sub響應修改員工，按鈕的單擊事件，調(diào)用修改員工窗體。Private