【正文】 = 39。 xueli amp。End IfIf shengri Then where = where amp。 amp。５）代碼及實(shí)現(xiàn)方式。③如果記錄不存在，則不更新數(shù)據(jù)庫。定義列數(shù) .Cols = 9 39。where = Mid(where, 5, Len(where))這段代碼是指由于 where 條件在積累時(shí)最前面有一個(gè) ”AND”存在，這不符合 SQL 的書寫規(guī)則，因此使用“Mid” 函數(shù)將前面的“And”去掉，保證 SQL 能正確執(zhí)行。 39。 AND zhiwu = 39。 zhuanye amp。End IfIf xueli Then where = where amp。 amp。 39。４）操作。MsgBox 學(xué)生信息輸入成功！, vbOKOnlyExit SubEnd Sub這段代碼是指插入成功后，顯示 messagebox“學(xué)生信息輸入成功！ ”。 amp。 amp。 amp。 amp。 amp。將 的值賦給變量 shengri。, vbOKOnly Exit SubEnd IfIf = Then MsgBox 請輸入學(xué)生職務(wù)。４）操作。 學(xué)生信息查詢模 塊的設(shè)計(jì)與實(shí)現(xiàn)本模塊包括４個(gè)子模塊：學(xué)生信息錄入模塊、學(xué)生信息查詢模塊、學(xué)生信息修改模塊和學(xué)生信息刪除模塊。 amp。 初始化閃屏 如圖 61圖 61在啟動(dòng)窗體 中添加了如下代碼：Private Sub Form_Load() = 1 39。（2） 學(xué)生工資一覽模塊：可對學(xué)生的工資進(jìn)行一覽操作。第五章 總體設(shè)計(jì) 系 統(tǒng)層 次框圖工資查詢系統(tǒng)的系統(tǒng)模塊土如圖 31 所示。已完成的應(yīng)用程序是使用 Visual Basic 虛擬機(jī)真正 .exe 文件，您可以自由發(fā)布。Visual Basic 編程系統(tǒng)和 VBA 都使用這一語言。第三章 學(xué)生查詢系統(tǒng)開發(fā)工具和環(huán)境本學(xué)生查詢系統(tǒng)是在 Visual Basic 環(huán)境下開發(fā)的。面向?qū)ο蠓ㄗ钪饕奶攸c(diǎn)是對對象為基礎(chǔ)，對象是分析問題和解決問題的核心。D、形成最終的查詢信息。②原型法的開發(fā)過程采用原型法開發(fā)查詢信息系統(tǒng)可以分為如下幾個(gè)階段：A、確定用戶的基本需求。(5)輔助決策功能：通過對數(shù)據(jù)的加工處理，可以快速地獲取對決策有影響的信息，從而為合理的配置學(xué)校的各項(xiàng)資源，做出最佳的決策提供科學(xué)的依據(jù)。查詢信息系統(tǒng)運(yùn)用了數(shù)據(jù)庫的技術(shù)，對基礎(chǔ)數(shù)據(jù)進(jìn)行統(tǒng)一規(guī)劃、存儲(chǔ)，供各層查詢?nèi)藛T使用，從而實(shí)現(xiàn)了數(shù)據(jù)的一致和共享。1985 年，查詢信息系統(tǒng)創(chuàng)始人，明尼蘇達(dá)大學(xué)卡爾森查詢學(xué)院的著名教授戴維斯（ ）給出了一個(gè)具有代表性的定義： “查詢信息系統(tǒng)是一個(gè)利用計(jì)算機(jī)硬件和軟件，手工作業(yè)、分析、計(jì)劃、控制和決策模型以及數(shù)據(jù)庫的用戶－機(jī)器系統(tǒng)。? 性能上是否滿足要求。一般意義上的測試大多是指動(dòng)態(tài)測試。6） 對發(fā)現(xiàn)錯(cuò)誤較多的程序段，應(yīng)進(jìn)行更深入的測試。 測試軟件測試的目的是為了發(fā)現(xiàn)程序中的錯(cuò)誤而執(zhí)行程序的過程。詳細(xì)設(shè)計(jì)的主要任務(wù)是：為每個(gè)模塊進(jìn)行詳細(xì)的算法設(shè)計(jì)。(2)數(shù)據(jù)結(jié)構(gòu)及數(shù)據(jù) 庫設(shè)計(jì)。為了完整描述目標(biāo)系統(tǒng)，還要做一些補(bǔ)充：說明目標(biāo)系統(tǒng)的人機(jī)界面；說明至今尚未詳細(xì)考慮的細(xì)節(jié)。當(dāng)前系統(tǒng)是指目前正在運(yùn)行的系統(tǒng)，可能是需要改進(jìn)的正在計(jì)算機(jī)上運(yùn)行的軟件系統(tǒng)，也可能是人工處理系統(tǒng)。推薦可行的方案。此項(xiàng)查詢功能用戶界面友好，用戶可以簡單、快捷地查詢到自己需要的信息。為了節(jié)省篇幅，本畢業(yè)設(shè)計(jì)在后面的系統(tǒng)中，較為詳細(xì)地介紹了第 4 個(gè)階段。②可行性研究。學(xué)生信息查詢系統(tǒng)就是把分散的企事業(yè)單位的學(xué)生信息實(shí)行統(tǒng)一、集中、規(guī)范的收集查詢，建立分類編號查詢、電腦存儲(chǔ)查詢以及防火、防潮、防蛀、防盜等現(xiàn)代化、專業(yè)化的查詢系統(tǒng)，為企事業(yè)單位和學(xué)生解除后顧之憂。 ...........................................................................................................4(2)數(shù)據(jù)結(jié)構(gòu)及數(shù)據(jù)庫設(shè)計(jì)。目錄摘 要 ..............................................................................................................................................1引言 ....................................................................................................................................................3第一章 查詢信息系統(tǒng)設(shè)計(jì)與開發(fā)方法 ..........................................................................................3 .....................................................................................................................................3 .................................................................................................................................3 .....................................................................................................................................4 .....................................................................................................................................4(1)軟件系統(tǒng)結(jié)構(gòu)設(shè)計(jì)。當(dāng)學(xué)校規(guī)模比較小的時(shí)候，人力可以完成，隨著學(xué)校的規(guī)模越來越大，學(xué)校的學(xué)生人數(shù)也越來越多，依然維持著人力進(jìn)行學(xué)生信息查詢，必然會(huì)造成工作效率低，工作錯(cuò)誤增高的問題。一個(gè)計(jì)算機(jī)軟件，從開始構(gòu)思起，經(jīng)過該軟件成功投入使用，直到生命周期包括 8 個(gè)階段： ①問題定義。對于畢業(yè)設(shè)計(jì)來說，上述 8 個(gè)階段中的（3）~（6）是畢業(yè)設(shè)計(jì)報(bào)告（論文）中重點(diǎn)寫的內(nèi)容。查詢的條件包括：生源、專業(yè)、外語成績、計(jì)算機(jī)水平、獎(jiǎng)懲情況、參加的社會(huì)工作等。導(dǎo)出和評價(jià)各種方案。SA 分析步驟：了解當(dāng)前系統(tǒng)的工作流程，或得當(dāng)前系統(tǒng)的物理模型。作進(jìn)一步補(bǔ)充和優(yōu)化。5） 評價(jià)模塊結(jié)構(gòu)的質(zhì)量。詳細(xì)設(shè)計(jì)階段可以使用的工具 有:IPO 圖、程序流程圖、盒圖、PAD 圖等。編碼就是把軟件的結(jié)果翻譯成計(jì)算機(jī)可以“理解”的形式用某種程序設(shè)計(jì)語言書寫的程序。5） 長期保留測試用例。動(dòng)態(tài)測試是指通過運(yùn)行程序發(fā)現(xiàn)錯(cuò)誤。? 訪問外部信息是否有錯(cuò)。第二章 查詢信息系統(tǒng)概述查詢信息系統(tǒng)現(xiàn)狀 ：查詢信息系統(tǒng)（MIS）是一門邊緣學(xué)科，集查詢科學(xué)、信息科學(xué)、系統(tǒng)科學(xué)、現(xiàn)代通信技術(shù)和電子計(jì)算機(jī)技術(shù)于一體。（2）查詢信息系統(tǒng)的查詢過程就是對數(shù)據(jù)進(jìn)行懼、存儲(chǔ)、加工處理、傳遞，并產(chǎn)生信息的過程，因此數(shù)據(jù)是查詢信息系統(tǒng)的靈魂。(4)控制功能：通過信息的反饋可以對整個(gè)學(xué)校生產(chǎn)經(jīng)營的各個(gè)部門、各個(gè)環(huán)節(jié)的運(yùn)行情況進(jìn)行監(jiān)測、協(xié)調(diào)、控制，保證系統(tǒng)的正常運(yùn)行。再在此基礎(chǔ)上與用戶交流，將模型不斷補(bǔ)充，修改完善，如此反復(fù)，最終直至用戶和開發(fā)者都比較滿意為止，就形成了一個(gè)相對穩(wěn)定、較為理想的查詢信息系統(tǒng)。開發(fā)人員針對這些問題不斷地對系統(tǒng)進(jìn)行修改、擴(kuò)充與完善，直至用戶滿意為止。在開發(fā)過程中，分析和設(shè)計(jì)階段獨(dú)立于程序設(shè)計(jì)語言，信息系統(tǒng)模型設(shè)計(jì)好后，最終用具體的程序設(shè)計(jì)語言、數(shù)據(jù)庫或硬件來實(shí)現(xiàn)。本系統(tǒng)在開發(fā)過程中具體是采用了原型法和面向?qū)ο髢煞N方法相結(jié)合的開發(fā)思路，力求在開發(fā)過程中盡量吸收這兩種方法的長處，而克服它們的短處。Visual Basic 不僅是 Visual Basic 編程語言。Inter 能力強(qiáng)大，使得您很容易在應(yīng)用程序內(nèi)通過 Inter 或 intra 訪問文檔和應(yīng)用程序，或者創(chuàng)建 Inter 服務(wù)器應(yīng)用程序。? 數(shù)據(jù)庫：Microsoft Access 2022。 學(xué)生查詢系統(tǒng)退出系統(tǒng)員工工資查詢（）員工信息查詢（）用戶注冊（）用戶登陸（）4. 學(xué)生工資模塊（1） 學(xué)生工資錄入模塊：可對學(xué)生的工資進(jìn)行存儲(chǔ)操作。本系統(tǒng)主要把學(xué)生信息查詢方面的信息通過整理形成一個(gè)較完整的體系，以便使其查詢更加系統(tǒng)化、完善化。 amp。在“用戶名” 標(biāo)簽后的文本框中輸入“admin ”,在“密碼”標(biāo)簽后的文本框中輸入“admin”，單擊 【確定】按鈕，便可進(jìn)入本系統(tǒng)的主界面。本頁面使用了 數(shù)據(jù)庫中的信息數(shù)據(jù)表。, vbOKOnly Exit SubEnd IfIf = Then MsgBox 請輸入學(xué)生所在部門。將 的值賦給 jiguan。Set Glb_MyWkSp = Workspaces(0)Set Glb_MyDB = (Con_DBpath)SQLStr = INSERT INTO xinxi VALUES (39。,39。,39。,39。,39。) SQLStr這段代碼是將頁面上輸入的信息插入到數(shù)據(jù)庫 xinxi 表中。本頁面使用了 數(shù)據(jù)庫中的信息數(shù)據(jù)表。 xingming amp。 AND jiguan = 39。 39。 amp。End IfIf zhiwu Then where = where amp。 gongling amp。設(shè)置單元大小 .ColWidth(0) = 1000 .ColWidth(1) = 500 .ColWidth(2) = 1500 .ColWidth(3) = 1000 .ColWidth(4) = 1000 .ColWidth(5) = 1000 .ColWidth(6) = 1000 .ColWidth(7) = 1000 .ColWidth(8) = 800 End With Loop End If Exit SubEnd If這段代碼是將查詢出來的滿足條件的數(shù)據(jù)顯示在界面相對應(yīng)的位置上，如圖６－４所示。 line = 0 Do While = False line = line + 1 xingming = (0) xingbie = (1) jiguan = (2) shengri = (3) xueli = (4) zhuanye = (5) bumen = (6) zhiwu = (7) gongling = (8) With MSHFlexGrid1 39。②如果記錄存在，則以現(xiàn)在的學(xué)生信息，將 xinxi 表中的學(xué)生信息更新。 ［取消］按鈕的作用是回到主頁面。 AND xingbie = 39。 39。 amp。End IfIf bumen Then where = where amp。 zhiwu amp。, vbOKOnly Exit SubEnd Ifwhere = Mid(where, 5, Len(where))Set Glb_MyWkSp = Workspaces(0)Set Glb_MyDB = (Con_DBpath)SQLStr = SELECT COUNT(*) FROM xinxi WHERE amp。 xingbie1 amp。 shengri1 amp。 zhuanye1 amp。 zhiwu1 amp。, vbOKOnly = = = = = = = = = = End IfExit SubEnd Sub（４）信息刪除模塊１）學(xué)生信息刪除的 IPO 圖。本頁面使用了 數(shù)據(jù)庫中的 xinxi 數(shù)據(jù)表。②如果信息全部輸入，則將頁面上輸入的信息添加到數(shù)據(jù)庫的 gongzi 表中。［取消］按鈕的作用是回到主頁面。本頁面使用了 數(shù)據(jù)庫的 gongzi 數(shù)據(jù)表。d the whale municate over hundreds of miles? How did it use echoes to find its prey in the ocean gloom, to stun fish, diagnose illness in ano