【正文】 材名： C 出版社： 清華大學(xué) 出版社 教材類(lèi)型：計(jì)算機(jī) 預(yù)訂數(shù)量： 900 預(yù)訂單價(jià)： 25 教材主編：韓玉民 ）系統(tǒng)顯示信息輸入完畢。MsgBox 經(jīng)手人不能為空！ , vbOKOnly + vbExclamation, .）語(yǔ)句 教材預(yù)訂信息 輸入異常數(shù)據(jù)，系統(tǒng)出現(xiàn)錯(cuò)誤，解決辦法在系統(tǒng)程序中添加（ findnumerror: If 0 Then MsgBox End If . ..）語(yǔ)句 第 6 節(jié) 查詢(xún)界面的測(cè)試 教材庫(kù)存查詢(xún)界面的測(cè)試 該測(cè)試的目的是保證 教材庫(kù)存查詢(xún)界面 的正確性與在數(shù)據(jù)輸入不正確 或有異常數(shù)據(jù) 時(shí)的容錯(cuò)與糾錯(cuò)性。當(dāng)輸入異常數(shù)據(jù)時(shí)（ 教材編號(hào)： 00100X）系統(tǒng)會(huì)彈出有錯(cuò)誤 信息。當(dāng)輸入錯(cuò)誤數(shù)據(jù)時(shí)（ 教材編號(hào)： 001001 教材名： C 教材出版社： 清華大學(xué) 出版社 教材數(shù)量： 900 教材單價(jià)： 25 教材主編：韓玉民 教材類(lèi)型： 出版時(shí)間： 2020430）系統(tǒng)顯示缺少 輸入教材類(lèi)型 信息，無(wú)法查詢(xún)。 當(dāng)輸入錯(cuò)的學(xué)號(hào)是如 2020200650 系統(tǒng)會(huì)提示學(xué)號(hào)錯(cuò)誤。 總的來(lái)說(shuō)，軟件通過(guò)測(cè)試，基本上達(dá)到需求 分析 階段所提出的要求 。 但是，由于實(shí)際條件和時(shí)間限制，還有自己平時(shí)的學(xué)習(xí)不夠，系統(tǒng)在功能方面還不完善，有的僅僅是最簡(jiǎn)單最基本的功能實(shí)現(xiàn)，而且 由于我們知識(shí)面的局限性，對(duì)于具體的 MIS 管理系統(tǒng)方面的知識(shí)還有很大的欠缺，可能在設(shè)計(jì)數(shù)據(jù)庫(kù)存在著不合理的地方，以至于影響到整個(gè)系統(tǒng)的功能以及性能。 湖北大學(xué)本科畢業(yè)論文（設(shè)計(jì)） 31 致 謝 在論文即將完成之際，回顧在緊張的工作中進(jìn)行畢業(yè)設(shè)計(jì)的生活，感到受益匪淺，在此向所有關(guān)心和幫助過(guò)我的老師同學(xué)致以最真誠(chéng)的感謝。 vbCrLf amp。GetWhereString(cboPart, 系部 ) strWhere = strWhere amp。 and amp。 CDateType(CStr(Date)) End Select End If 庫(kù)存查詢(xún)代碼 Private Sub cmdquery_Click() Dim rst As Dim strWhere As String Dim strsql As String blnNoRecordset = False blnClick = True Set rst = New strsql = Select ISBN,書(shū)名 ,主編 ,出版社 ,版本 ,價(jià)格 ,實(shí)存數(shù)量 ,可取數(shù)量 from 湖北大學(xué)本科畢業(yè)論文（設(shè)計(jì)） 35 sxxb strWhere = Where 1=1 strWhere = strWhere amp。 GetWhereString(cboEdition, 版本 ) 39。 strWhere, nDb, adOpenStatic, adLockOptimistic If = 0 Then blnNoRecordset = True End If Set printRs = rst showdata rst If blnNoRecordset Or Not blnClick Then = False Else = True End If End Sub 。 strsql amp。 GetWhereString(cboPublish, 出版社 ) strWhere = strWhere amp。 strDat amp。 strDat Case 等于 getString = and 訂書(shū)日期 between amp。 \, 訂購(gòu)查詢(xún) Exit Sub End If Dim a As Variant a = MsgBox(確定要將網(wǎng)格中所修改的數(shù)據(jù)保存到數(shù)據(jù)庫(kù)嗎 ？ , vbYesNo + vbQuestion, 保存嗎？ ) If a vbYes Then Exit Sub End If (1).Text = 正在保存?? Dim rst As Dim strWhere As String Dim strsql As String Dim strDat As String Dim strToday As String Dim getString As String blnNoRecordset = False blnClick = True Set rst = New strsql = Select * from Query strWhere = Where 1=1 湖北大學(xué)本科畢業(yè)論文（設(shè)計(jì)） 34 strWhere = strWhere amp。 再者，我還要十分感謝我的同學(xué)，沒(méi)有他們的幫助我的畢業(yè)設(shè)計(jì)也不會(huì)較順利的完成。 總之，通過(guò)這次畢業(yè)設(shè)計(jì)使我學(xué)到了很多書(shū)本上沒(méi)有的知識(shí)，讓我了解到只有將理論和實(shí)際相結(jié)合才能將學(xué)到的知識(shí)消化為自己的，同時(shí)也讓我認(rèn)識(shí)到了我自身 的不足。 我對(duì)開(kāi)發(fā)環(huán)境 C并不是很熟悉，在以前的學(xué)習(xí) 中也只是涉及到簡(jiǎn)單的程序設(shè)計(jì)，一開(kāi)始做的還是有點(diǎn)力不從心，但在導(dǎo)師的耐心指導(dǎo)下，通過(guò)自己的努力學(xué)習(xí)和探索，我已經(jīng)使自己可以使用C以及 SQL 數(shù)據(jù)庫(kù)應(yīng)用程序。 通過(guò)測(cè)試系統(tǒng) 基本達(dá)到設(shè)計(jì)要求， 系統(tǒng) 功能完整，用戶界面良好，錯(cuò)誤處理正確，且能正確提示錯(cuò)誤種類(lèi) 。 學(xué)生繳費(fèi)情況 的測(cè)試 該測(cè)試的目的是保證 學(xué)生繳費(fèi)查詢(xún)界面 的正確性與在數(shù)據(jù)輸入不正確 或有異常數(shù)據(jù) 時(shí)的容錯(cuò)與糾錯(cuò)性。 湖北大學(xué)本科畢業(yè)論文（設(shè)計(jì)） 29 入書(shū)查詢(xún)界面的測(cè)試 該 測(cè)試的目的是保證 入書(shū)查詢(xún)界面 的正確性與在數(shù)據(jù)輸入不正確 或有異常數(shù)據(jù) 時(shí)的容錯(cuò)與糾錯(cuò)性。 當(dāng)輸入正確的查詢(xún)信息時(shí)（ 教材編號(hào)： 001001）此時(shí)系統(tǒng)會(huì)顯示查詢(xún)信息。當(dāng)輸入異常數(shù)據(jù)時(shí)（ 教材編號(hào)： 001001 教材 名： C 出版社： 清華大學(xué) 出版社 教材類(lèi)型：計(jì)算機(jī) 預(yù)訂數(shù)量： 900 預(yù)訂單價(jià)： 25 教材主編： XX）系統(tǒng)會(huì)彈出有錯(cuò)誤信息。當(dāng)輸入異常數(shù)據(jù)時(shí)（ 教材編號(hào)：001001 教材名： C 出版社： 清華大學(xué) 出版社 教材類(lèi)型：計(jì)算機(jī) 預(yù)訂數(shù)量： 900 預(yù)訂單價(jià)： 25 教材主編： XX）系統(tǒng)會(huì)彈出有錯(cuò)誤信息。 學(xué)生信息錄入界面通過(guò)測(cè)試及時(shí)發(fā)現(xiàn)系統(tǒng)所存在的問(wèn)題，及時(shí)調(diào)整系統(tǒng)程序例如： 添加學(xué)生 輸入錯(cuò)誤數(shù)據(jù)，系統(tǒng)出現(xiàn)錯(cuò)誤，解決辦法在系統(tǒng)程序中添加（ 39。 第 4 節(jié) 學(xué)生基本情況錄入界面的測(cè)試 該測(cè)試 的目的是保證添加 學(xué)生信息 窗口的正確性與在數(shù)據(jù)輸入不正確 或有異常數(shù)據(jù) 時(shí)的容錯(cuò)與糾錯(cuò)性。MsgBox 出版社名稱(chēng)不能為空！ , vbOKOnly + vbExclamation, .）語(yǔ)句 教材入庫(kù)輸入異常數(shù)據(jù)，系統(tǒng)出現(xiàn)錯(cuò)誤，解決辦法在系統(tǒng)程序中添加（ findnumerror: If 0 Then MsgBox End If . ..）語(yǔ)句 湖北大學(xué)本科畢業(yè)論文（設(shè)計(jì)） 27 第 3 節(jié) 教材出庫(kù)界面測(cè)試 該測(cè)試的目的是保證 出庫(kù)教材 信息窗口的正確性與在數(shù)據(jù)輸入不正確 或有異常數(shù)據(jù) 時(shí)的容錯(cuò)與糾錯(cuò)性。 當(dāng)輸入正確信息時(shí)（編號(hào)： 001001 書(shū)名： C 作者： 韓玉民 出版社： 清華大學(xué) 出版社）此時(shí)會(huì)顯示紀(jì)錄完成。 該系統(tǒng)的用戶名為user,密碼為 123，或者是用戶名為 admin,密碼為 1234。 教材入庫(kù)模塊程序流程圖 圖 314 教材入庫(kù)模塊 程序 流程圖 判斷是否進(jìn)行入庫(kù)記錄 教材入庫(kù)記錄 提示記錄完畢 更新數(shù)據(jù)庫(kù) 輸入添加成功 湖北大學(xué)本科畢業(yè)論文（設(shè)計(jì)） 24 教材出庫(kù)模塊程序流程圖 圖 315 教材出庫(kù)模塊 程序 流程圖 查詢(xún)系統(tǒng)模塊程序 流程圖 該模塊可實(shí)現(xiàn)功能有： 讀第一條紀(jì)錄 是否判斷出庫(kù)修改 讀下第一條紀(jì)錄 修改內(nèi)容 判斷是否輸入完整 提示輸 入完整 進(jìn)行修該 更新數(shù)據(jù)庫(kù) 輸入修改成功 湖北大學(xué)本科畢業(yè)論文（設(shè)計(jì)） 25 圖 316 查詢(xún)系統(tǒng)模塊程序 流程圖 查詢(xún)條件的選擇 教材信息 查詢(xún)條件的選擇 日期 出版社 主編 學(xué)生信息 按學(xué)號(hào) 輸出結(jié)果 湖北大學(xué)本科畢業(yè)論文（設(shè)計(jì)） 26 第 4 章 系統(tǒng)測(cè)試與運(yùn)行 它實(shí)施對(duì)軟件規(guī)格說(shuō)明、設(shè)計(jì)規(guī)格說(shuō)明和編碼的最終審核。 4． 在 領(lǐng)取教材 信息 界面中必須填寫(xiě)的字段有 教材編號(hào) 、 領(lǐng)書(shū)數(shù)量 、 領(lǐng)書(shū)日期 ， 填寫(xiě)完以后點(diǎn)湖北大學(xué)本科畢業(yè)論文（設(shè)計(jì)） 23 確定后發(fā)書(shū)。 教 材的入庫(kù)與出庫(kù) 如圖 311， 312 所示 湖北大學(xué)本科畢業(yè)論文（設(shè)計(jì)） 22 圖 311 教材的入庫(kù)圖 圖 312 教材 出庫(kù) 圖 1． 所需填寫(xiě)的字段： 教材 編號(hào) 、 教材名 、 教材出版社 、 教材主編 、 教材 數(shù)量 、 教材單價(jià) 、 出版日期、教材類(lèi)別 。 管理員 管理 管理員 管理和學(xué)生管理是最重要的部分，它涉及到系統(tǒng)的安全問(wèn)題和學(xué)生的詳細(xì)資料，如圖所示 圖 38 管理員 管理中心圖 管理員 管理中心提供 教師基本信息、教師教材、查詢(xún)教師或?qū)W生信息 以及學(xué)生基本情況、教材出庫(kù)情況等功能 ，在其中可以 添加教師和學(xué)生的基本情況 。