學(xué)生管理系統(tǒng)辦公自動(dòng)化畢業(yè)設(shè)計(jì)論文-資料下載頁(yè)

　　

【正文】 /*定義字符型變量aa*/If = ThenMsgBox 不可為空, 64, 提示Else = select * from chengj where sno=39。 amp。 aa amp。 39。 /*用data數(shù)據(jù)控件和學(xué)生基本成績(jī)表進(jìn)行數(shù)據(jù)鏈接*/If Then /*如果到文件尾*/MsgBox 查無(wú)此信息, 64, 提示 /*彈出消息框,無(wú)此信息*/End If = /*如果文本框?yàn)榭?焦點(diǎn)定在此文本框內(nèi)*/End IfEnd SubPrivate Sub Form_Load() = amp。 \ /*用data1自動(dòng)獲取路徑*/ = amp。 \ /*用data1自動(dòng)獲取路徑*/End Sub第六章 性能測(cè)試與分析軟件測(cè)試就是在受控制的條件下對(duì)系統(tǒng)或應(yīng)用程序進(jìn)行操作并評(píng)價(jià)操作結(jié)果的過(guò)程,所謂控制條件應(yīng)包括正常條件與非正常條件。包括以下測(cè)試:單元測(cè)試的對(duì)象是軟件設(shè)計(jì)的最小單位－模塊。我們?cè)谠O(shè)計(jì)階段所采取的測(cè)試就是單元測(cè)試。單元測(cè)試的依據(jù)是詳細(xì)設(shè)計(jì)描述，單元測(cè)試應(yīng)對(duì)模塊內(nèi)所有重要的控制路徑設(shè)計(jì)測(cè)試用例，以便發(fā)現(xiàn)模塊內(nèi)部的錯(cuò)誤。單元測(cè)試多采用白盒測(cè)試技術(shù)，系統(tǒng)內(nèi)多個(gè)模塊可以并行也進(jìn)行測(cè)試。單元測(cè)試任務(wù)包括：模塊接口測(cè)試，模塊局部數(shù)據(jù)結(jié)構(gòu)測(cè)試，模塊中所有獨(dú)立執(zhí)行通路測(cè)試，模塊的各條錯(cuò)誤處理通路測(cè)試，邊界條件測(cè)試。一般單元測(cè)試應(yīng)緊接在編碼之后，當(dāng)源程序編制完成并通過(guò)復(fù)審和編譯檢查，便可開始單元測(cè)試。測(cè)試用例的設(shè)計(jì)應(yīng)與復(fù)審工作相結(jié)合，根據(jù)設(shè)計(jì)信息選取測(cè)試數(shù)據(jù)，將增大發(fā)現(xiàn)上述各類錯(cuò)誤的可能性。在確定測(cè)試用例的同時(shí)，應(yīng)給出期望結(jié)果。提高模塊的內(nèi)聚度可簡(jiǎn)化單元測(cè)試，如果每個(gè)模塊只能完成一個(gè)，所需測(cè)試用例數(shù)目將顯著減少，模塊中的錯(cuò)誤也更容易發(fā)現(xiàn)。 本系統(tǒng)性能測(cè)試與分析根據(jù)以上關(guān)于軟件測(cè)試的理論，我用黑盒測(cè)試法對(duì)系統(tǒng)進(jìn)行了測(cè)試。結(jié)果證明，本系統(tǒng)基本上能實(shí)現(xiàn)《學(xué)生管理系統(tǒng)》要求的功能。同時(shí)測(cè)試過(guò)程中發(fā)現(xiàn)錯(cuò)誤如下：，連續(xù)三次輸入密碼或用戶名錯(cuò)誤，但系統(tǒng)并不退出；，其他用戶不能訪問(wèn)該共享文件；結(jié)束語(yǔ)經(jīng)過(guò)一個(gè)月對(duì)該系統(tǒng)的設(shè)計(jì)和開發(fā)，學(xué)生信息管理與分析系統(tǒng)基本開發(fā)完畢。其功能基本符合用戶需求，能夠完成學(xué)生基本情況和學(xué)生成績(jī)情況的添加、查詢、修改、刪除等功能。并提供部分系統(tǒng)注銷功能、通訊錄、幫助等功能，對(duì)于數(shù)據(jù)的一致性的問(wèn)題也通過(guò)程序進(jìn)行有效地解決。但由于畢業(yè)設(shè)計(jì)時(shí)間短，本人技術(shù)和水平有限，所以該系統(tǒng)還有許多不盡人意的地方，比如報(bào)表設(shè)計(jì)功能未能實(shí)現(xiàn)，只能顯示整個(gè)數(shù)據(jù)報(bào)表，而不能顯示部分?jǐn)?shù)據(jù)報(bào)表，用戶界面不夠美觀，出錯(cuò)處理不夠等許多方面問(wèn)題。這些都有待進(jìn)一步改善，我從本次畢業(yè)設(shè)計(jì)中學(xué)到許多課外無(wú)法學(xué)到的知識(shí)。致謝在畢業(yè)設(shè)計(jì)的近幾個(gè)月時(shí)間是我學(xué)生生涯中最有價(jià)值的一段時(shí)光。這里有治學(xué)嚴(yán)謹(jǐn)而不失親切的老師，有互相幫助的同學(xué)，更有向上、融洽的學(xué)習(xí)生活氛圍。借此論文之際，我想向大家表示我的謝意。首先感謝老師。本論文是在老師的指導(dǎo)下和同學(xué)們的幫助下修改完成的。在此，要對(duì)他們的細(xì)心幫助和指導(dǎo)表示由衷的感謝。在這段時(shí)間里，我從他們身上不僅學(xué)到了許多的專業(yè)知識(shí)，更感受到了他們工作中的兢兢業(yè)業(yè)，生活中的平易近人。此外，他們嚴(yán)謹(jǐn)?shù)闹螌W(xué)態(tài)度和忘我的工作精神值得我去學(xué)習(xí)。非常感謝大家在我的畢業(yè)設(shè)計(jì)中，給予了我極大的幫助，使我對(duì)整個(gè)畢業(yè)設(shè)計(jì)的思路有了總體的把握，并耐心的幫我解決了許多實(shí)際問(wèn)題，使我有了很大收獲。同時(shí)，他們?cè)谡麄€(gè)開發(fā)過(guò)程中提出了許多建設(shè)性意見，并給我解決了一些專業(yè)性問(wèn)題。感謝三年來(lái)傳授我知識(shí)的老師們，更要感謝我的家人對(duì)我學(xué)業(yè)上的支持和鼓勵(lì)，同時(shí)感謝所有關(guān)心幫助過(guò)我的同學(xué)、老師和學(xué)校。總之，在以后的學(xué)習(xí)生活中我將以加倍的努力作為對(duì)給予我?guī)椭膶W(xué)校、老師及同學(xué)們的回報(bào)。參考文獻(xiàn)[1] 張紅軍 .王虹 . Visual Basic . 北京： 人民郵電出版社，2002[2] 伍俊良. VB課程設(shè)計(jì)與系統(tǒng)開發(fā)案例. 北京： 清華大學(xué)出版社,2003[3] 林陳雷，郭安源. Visual Basic教育信息化系統(tǒng)開發(fā)實(shí)例導(dǎo)航. 北京: 人民郵電出版社,1998附錄（源程序）編寫代碼:主窗體代碼：Private Sub bj1_Click()End SubPrivate Sub bz_Click()End SubPrivate Sub cj_Click()End SubPrivate Sub cx_Click(Index As Integer)End SubPrivate Sub cx1_Click(Index As Integer)End SubPrivate Sub ll_Click()End SubPrivate Sub sc_Click(Index As Integer)End SubPrivate Sub sc1_Click(Index As Integer)End SubPrivate Sub tc_Click()aa = MsgBox(是否真的退出！, 36, 提示)If aa = 6 ThenEndElseEnd IfEnd SubPrivate Sub tx_Click()End SubPrivate Sub tj_Click(Index As Integer)End SubPrivate Sub tj1_Click(Index As Integer)End SubPrivate Sub xg_Click(Index As Integer)End SubPrivate Sub xg1_Click(Index As Integer)End SubPrivate Sub zx_Click()aa = MsgBox(是否真的注銷！, 36, 提示)If aa = 6 ThenUnload MeElse End IfEnd Sub在主菜單加入如下子菜單代碼：添加子菜單代碼：Private Sub Command1_Click()End SubPrivate Sub Command2_Click()If ThenMsgBox 已到首記錄, 64, 提示ElseEnd IfEnd SubPrivate Sub Command3_Click()If ThenMsgBox 已到末記錄, 64, 提示ElseEnd IfEnd SubPrivate Sub Command4_Click()End SubPrivate Sub Command5_Click()MsgBox 添加成功, 64, 提示End SubPrivate Sub Data1_Validate(Action As Integer, Save As Integer) = amp。 \End Sub修改子菜單：Private Sub Command1_Click()End SubPrivate Sub Command2_Click()If ThenMsgBox 已到首記錄, 64, 提示ElseEnd IfEnd SubPrivate Sub Command3_Click()If ThenMsgBox 已到末記錄, 64, 提示ElseEnd IfEnd SubPrivate Sub Command4_Click()End SubPrivate Sub Command5_Click()MsgBox 修改成功, 64, 提示End Sub查詢子菜單代碼如下：Private Sub Command1_Click()Dim aa As Stringaa = Trim()If = ThenMsgBox 不可為空, 64, 提示Else = select * from edit where sno=39。 amp。 aa amp。 39。If ThenMsgBox 無(wú)此信息, 64, 提示End If = End IfEnd SubPrivate Sub Command2_Click()Dim aa As Stringaa = Trim()If = ThenMsgBox 不可為空, 64, 提示Else = select * from chengj where sno=39。 amp。 aa amp。 39。If ThenMsgBox 查無(wú)此信息, 64, 提示End If = End IfEnd SubPrivate Sub Form_Load() = amp。 \ = amp。 \End Sub刪除子菜單代碼如下：Private Sub Command1_Click()End SubPrivate Sub Command2_Click()If ThenMsgBox 已到首記錄, 64, 提示ElseEnd IfEnd SubPrivate Sub Command3_Click()If ThenMsgBox 已到末記錄, 64, 提示ElseEnd IfEnd SubPrivate Sub Command4_Click()End SubPrivate Sub Command5_Click()MsgBox 刪除成功, 64, 提示End Sub通訊錄主菜單的瀏覽子菜單代碼如下：Private Sub Command1_Click()End SubPrivate Sub Command2_Click()If ThenMsgBox 已到首記錄, 64, 提示ElseEnd IfEnd SubPrivate Sub Command3_Click()If ThenMsgBox 已到末記錄, 64, 提示ElseEnd IfEnd SubPrivate Sub Command4_Click()End SubPrivate Sub Command5_Click()EndEnd Sub本系統(tǒng)制作過(guò)程中的代碼結(jié)束。