畢業(yè)設(shè)計(jì)（論文）基于vb的教師管理系統(tǒng)

1、目目 錄錄 第一章第一章 緒緒 論論 .3 11 課題簡(jiǎn)介 .3 12 開發(fā)的意義 .3 13 團(tuán)隊(duì)構(gòu)成 .4 第二章第二章 開發(fā)環(huán)境及實(shí)現(xiàn)技術(shù)開發(fā)環(huán)境及實(shí)現(xiàn)技術(shù) .5 21 開發(fā)環(huán)境 .5 22 開發(fā)工具簡(jiǎn)介 .5 第三章第三章 系統(tǒng)設(shè)計(jì)系統(tǒng)設(shè)計(jì) .7 31 概要設(shè)計(jì) .7 32 詳細(xì)設(shè)計(jì) .8 第四章第四章 數(shù)據(jù)庫設(shè)計(jì)數(shù)據(jù)庫設(shè)計(jì) .10 41 數(shù)據(jù)庫 access簡(jiǎn)介.10 42 數(shù)據(jù)庫需求分析 .11 43 表的詳細(xì)結(jié)構(gòu)說明 .12 44 測(cè)試用例 .15 第五章第五章 系統(tǒng)的實(shí)現(xiàn)系統(tǒng)的實(shí)現(xiàn) .16 51 系統(tǒng)登錄模塊的實(shí)現(xiàn) .16 52 主界面的實(shí)現(xiàn) .20 53 教師信息管理模塊的實(shí)

2、現(xiàn) .22 531教師信息維護(hù)模塊的實(shí)現(xiàn).22 532教師信息查詢模塊的實(shí)現(xiàn).26 54 教師任課管理模塊的實(shí)現(xiàn) .29 541教師任課信息維護(hù)模塊的實(shí)現(xiàn).29 542教師任課信息查詢模塊的實(shí)現(xiàn).30 55 論文信息管理模塊的實(shí)現(xiàn) .32 551論文信息維護(hù)模塊的實(shí)現(xiàn).32 552論文信息查詢模塊的實(shí)現(xiàn).33 56 科研經(jīng)費(fèi)管理模塊的實(shí)現(xiàn) .34 561科研經(jīng)費(fèi)的收支與維護(hù)模塊的實(shí)現(xiàn).34 562科研經(jīng)費(fèi)收支查詢模塊的實(shí)現(xiàn).41 57 輔助功能模塊的實(shí)現(xiàn) .44 58 密碼管理模塊的實(shí)現(xiàn) .46 59 打印管理模塊的實(shí)現(xiàn) .48 第六章第六章 系統(tǒng)使用說明系統(tǒng)使用說明 .50 61 使用說明

3、.50 62 運(yùn)行環(huán)境 .50 第七章第七章 設(shè)計(jì)心得設(shè)計(jì)心得 .51 參考文獻(xiàn)參考文獻(xiàn) .52 第一章第一章 緒緒 論論 11 課題簡(jiǎn)介課題簡(jiǎn)介 教師考核管理系統(tǒng)是每一個(gè)高等學(xué)校管理教師的不可缺少的一個(gè)管理信息系統(tǒng)，它 的內(nèi)容對(duì)于高等學(xué)校的管理者來說是至關(guān)重要的，所以教師考核管理系統(tǒng)應(yīng)該能夠?yàn)槊?一個(gè)高等學(xué)校的管理者提供充足的信息和快捷的查詢手段，大大的方便高等學(xué)校的管理 者。 隨著科學(xué)技術(shù)的不斷提高，計(jì)算機(jī)科學(xué)日漸成熟，網(wǎng)絡(luò)管理的迅速發(fā)展，其強(qiáng)大的 功能已為人們深刻認(rèn)識(shí)，它已進(jìn)入人類社會(huì)的各個(gè)領(lǐng)域并發(fā)揮著越來越重要的作用。 作為計(jì)算機(jī)應(yīng)用的一部分，使用計(jì)算機(jī)對(duì)教師考核進(jìn)行管理，具有著手工管

4、理所無 法比擬的優(yōu)點(diǎn)，如:檢索迅速、查找方便、可靠性高、存儲(chǔ)量大、保密性好、壽命長(zhǎng)、成 本低等。這些優(yōu)點(diǎn)能夠極大地提高教師考核管理的效率，也是高等學(xué)校管理的科學(xué)化、 正規(guī)化管理，與先進(jìn)科學(xué)技術(shù)接軌的重要條件。 因此，開發(fā)這樣一套管理軟件成為很有必要的事情，對(duì)于我們即將計(jì)算機(jī)專業(yè)畢業(yè) 的學(xué)員來說，也是一次將計(jì)算機(jī)應(yīng)用于現(xiàn)實(shí)管理的一次很有意義的實(shí)踐活動(dòng)。 12 開發(fā)的意義開發(fā)的意義 1計(jì)算機(jī)已經(jīng)成為我們學(xué)習(xí)和工作的得力助手，使用其可方便的管理教師考核 今天，計(jì)算機(jī)的價(jià)格已經(jīng)十分低廉，性能卻有了長(zhǎng)足的進(jìn)步。它已經(jīng)被應(yīng)用于許多 領(lǐng)域。 現(xiàn)在我國的教師考核管理水平絕大部分還停留在紙介質(zhì)的基礎(chǔ)上，這樣的機(jī)

5、制已經(jīng) 不能適應(yīng)時(shí)代的發(fā)展，因?yàn)樗速M(fèi)了許多人力和物力，在信息時(shí)代這種傳統(tǒng)的管理方法 必然被計(jì)算機(jī)為基礎(chǔ)的信息管理所取代。 我作為一個(gè)計(jì)算機(jī)應(yīng)用專業(yè)的畢業(yè)生，希望可以在這方面有所貢獻(xiàn)。改革的總設(shè)計(jì) 師鄧小平同志說過“科學(xué)技術(shù)是第一生產(chǎn)力”，我希望能用我所學(xué)的知識(shí)編制出一個(gè)實(shí) 用的程序來幫助高等學(xué)校進(jìn)行教師考核管理。 開發(fā)這一系統(tǒng)的好處大約有以下幾點(diǎn)： 第一、可以存儲(chǔ)歷年教師考核的信息，安全、高效； 第二、只需一到二名檔案錄入員即可操作系統(tǒng)，節(jié)省人力； 第三、可以迅速查到教師考核的情況。 2為將來高等學(xué)校上網(wǎng)做好準(zhǔn)備 跟據(jù) 2003 年中國電信的調(diào)查報(bào)告顯示我國的上網(wǎng)人數(shù)已達(dá)到 1870 萬，互

6、聯(lián)網(wǎng)已經(jīng) 十分普及，本系統(tǒng)為高等學(xué)校將來的上網(wǎng)作了先期工作，比如計(jì)算機(jī)的財(cái)務(wù)管理模式的 建立。 13 團(tuán)隊(duì)構(gòu)成團(tuán)隊(duì)構(gòu)成 指導(dǎo)教師：* 成員：* 第二章第二章 開發(fā)環(huán)境及實(shí)現(xiàn)技術(shù)開發(fā)環(huán)境及實(shí)現(xiàn)技術(shù) 21 開發(fā)環(huán)境開發(fā)環(huán)境 硬件系統(tǒng)：奔騰 100 以上 cpu、64m 以上內(nèi)存、1g 以上硬盤、光驅(qū)。 軟件系統(tǒng)：windows 9x 或更高版本、visual basic 6.0 中文版、access 數(shù)據(jù)庫。 22 開發(fā)工具簡(jiǎn)介開發(fā)工具簡(jiǎn)介 微軟公司的 visual basic 6.0 是 windows 應(yīng)用程序開發(fā)工具，使目前最為廣泛的、 易學(xué)易用的面向?qū)ο蟮拈_發(fā)工具。visual basic

7、 提供了大量的控件，這些控件可用于設(shè) 計(jì)界面和實(shí)現(xiàn)各種功能，減少了編程人員的工作量，也簡(jiǎn)化了界面設(shè)計(jì)過程，從而有效 的提高了應(yīng)用程序的運(yùn)行效率和可靠性。故而，實(shí)現(xiàn)本系統(tǒng) vb 是一個(gè)相對(duì)較好的選擇。 access2000 就是關(guān)系數(shù)據(jù)庫開發(fā)工具，數(shù)據(jù)庫能匯集各種信息以供查詢、存儲(chǔ)和檢 索。access 的優(yōu)點(diǎn)在于它能使用數(shù)據(jù)表示圖或自定義窗體收集信息。數(shù)據(jù)表示圖提供了 一種類似于 excel 的電子表格，可以使數(shù)據(jù)庫一目了然。另外，access 允許創(chuàng)建自定 義報(bào)表用于打印或輸出數(shù)據(jù)庫中的信息。access 也提供了數(shù)據(jù)存儲(chǔ)庫，可以使用桌面數(shù) 據(jù)庫文件把數(shù)據(jù)庫文件置于網(wǎng)絡(luò)文件服務(wù)器，與其他網(wǎng)絡(luò)

8、用戶共享數(shù)據(jù)庫。access 是一 種關(guān)系數(shù)據(jù)庫工具，關(guān)系數(shù)據(jù)庫是已開發(fā)的最通用的數(shù)據(jù)庫之一。如上所述，access 作 為關(guān)系數(shù)據(jù)庫開發(fā)具備了許多優(yōu)點(diǎn)，可以在一個(gè)數(shù)據(jù)包中同時(shí)擁有桌面數(shù)據(jù)庫的便利和 關(guān)系數(shù)據(jù)庫的強(qiáng)大功能。 微軟的 jet 數(shù)據(jù)庫引擎提供了與數(shù)據(jù)庫打交道的途徑，我們是通過它以及 visual basic 來訪問數(shù)據(jù)庫并對(duì)其進(jìn)行各種操作。visual basic、access 以及其他微軟的軟件 產(chǎn)品都是通過共用 jet 數(shù)據(jù)庫引擎，從而給用戶提供了豐富的數(shù)據(jù)類型。 data 控件在數(shù)據(jù)庫中的信息與將信息顯示給用戶看的 visual basic 程序之間架起 了一座橋梁。我們可以

9、設(shè)置 data 控件的各個(gè)屬性，告訴它要調(diào)用那個(gè)數(shù)據(jù)庫的哪個(gè)部分。 缺省情況下，data 控件根據(jù)數(shù)據(jù)庫中的一個(gè)或多個(gè)數(shù)據(jù)表建立一個(gè) dynaset-type（動(dòng)態(tài) 集合）類型的記錄集合。一個(gè)記錄集合是動(dòng)態(tài)的也就意味著，當(dāng)原來的數(shù)據(jù)表中的容改 變了以后，該記錄集合中的記錄也會(huì)隨之改變。data 控件還提供了用來瀏覽不同記錄的 各種跳轉(zhuǎn)按鈕。將 data 控件放置在窗體中之后，我們還必須在該控件與要處理的數(shù)據(jù)庫 之間建立聯(lián)系。 ado 是 mcrosoft 提出的第三種數(shù)據(jù)庫訪問對(duì)象，是 microsoft 數(shù)據(jù)庫訪問技術(shù)的一 個(gè)主要發(fā)展方向，ado 將 ole db 封裝在一個(gè)數(shù)據(jù)對(duì)象中，使得

10、 vb 程序中以方便地實(shí)現(xiàn)對(duì) 數(shù)據(jù)庫的訪問。 具體的與數(shù)據(jù)庫的關(guān)系如下： vb 數(shù)據(jù)庫應(yīng)用程序一般由用戶界面、數(shù)據(jù)庫引擎和數(shù)據(jù)倉庫三大部分組成。 1用戶界面: 用戶界面是指應(yīng)用程序與用戶進(jìn)行交互的界面，包括用于交互的所有 界面元素和代碼。它可以顯示數(shù)據(jù)并提供查看或更新數(shù)據(jù)的所有對(duì)象，比如數(shù)據(jù)作業(yè)窗 體，添加、刪除記錄或執(zhí)行查詢的 vb 代碼等，這些對(duì)象隱含著用來請(qǐng)求數(shù)據(jù)庫服務(wù)的屬 性、事件和方法。 2數(shù)據(jù)庫引擎:所謂數(shù)據(jù)庫引擎，是一種管理數(shù)據(jù)怎樣被存儲(chǔ)和檢索的軟件系統(tǒng)， 是應(yīng)用程序與物理數(shù)據(jù)庫之間的橋梁。它把應(yīng)用程序的請(qǐng)求翻譯成對(duì)各種類型數(shù)據(jù)庫的 物理操作,并向應(yīng)用程序返回結(jié)果。 3數(shù)據(jù)倉庫:

11、數(shù)據(jù)倉庫是包含數(shù)據(jù)庫表的一個(gè)或多個(gè)文件，是存放數(shù)據(jù)的地方。對(duì) 于本地的 vb 數(shù)據(jù)庫來說，就是.mdb 格式文件；對(duì)于不同的數(shù)據(jù)庫，它可能具備其它格式。 vb 訪問數(shù)據(jù)庫通常有三種途徑: 1.使用數(shù)據(jù)控件和數(shù)據(jù)綁定控件訪問數(shù)據(jù)庫； 2.通過 vb 提供的數(shù)據(jù)訪問變量編程訪問； 3.通過 odbc 接口訪問 odbc api 函數(shù)。 vb 程序的數(shù)據(jù)訪問通過數(shù)據(jù)訪問接口來實(shí)現(xiàn)。 在 vb 中，主要的數(shù)據(jù)訪問接口有三種：數(shù)據(jù)存取對(duì)象(data access object；dao)、 遠(yuǎn)程數(shù)據(jù)對(duì)象(remote data object；rdo)、activex 數(shù)據(jù)對(duì)象(activex data o

12、bjects；ado)。 vb 通過數(shù)據(jù)庫引擎可以訪問的數(shù)據(jù)庫分如下三類:內(nèi)部數(shù)據(jù)庫、外部數(shù)據(jù)庫和 odbc 數(shù)據(jù)庫。 第三章第三章 系統(tǒng)設(shè)計(jì)系統(tǒng)設(shè)計(jì) 31 概要設(shè)計(jì)概要設(shè)計(jì) 1、概要設(shè)計(jì)階段的主要任務(wù) 系統(tǒng)分析員審查軟件計(jì)劃、軟件需求分析提供的文檔，提出最佳推薦方案，用系 統(tǒng)流程圖，組成系統(tǒng)物理元素清單，成本效益分析，系統(tǒng)的進(jìn)度計(jì)劃，供指導(dǎo)教師審定， 審定后進(jìn)入設(shè)計(jì)。 確定模塊結(jié)構(gòu)，劃分功能模塊，將軟件功能需求分配給所劃分的最小單元模塊。 確定模塊間的聯(lián)系，確定數(shù)據(jù)結(jié)構(gòu)、文件結(jié)構(gòu)、數(shù)據(jù)庫模式，確定測(cè)試方法與策略。 編寫概要設(shè)計(jì)說明書，用戶手冊(cè)，測(cè)試計(jì)劃，選用相關(guān)的軟件工具來描述軟件結(jié) 構(gòu)，結(jié)

13、構(gòu)圖是經(jīng)常使用的軟件描述工具。選擇分解功能與劃分模塊的設(shè)計(jì)原則，例如模 塊劃分獨(dú)立性原則，信息隱蔽原則等。 2、概要設(shè)計(jì)的過程 概要設(shè)計(jì)要先進(jìn)行系統(tǒng)設(shè)計(jì)，復(fù)審系統(tǒng)計(jì)劃與需求分析，確定系統(tǒng)具體的實(shí)施方案； 然后進(jìn)行結(jié)構(gòu)設(shè)計(jì)，確定軟件結(jié)構(gòu)。 3、概要設(shè)計(jì)的原則 將軟件劃分成若干獨(dú)立成分的依據(jù)。 如何表示不同的成分內(nèi)的功能細(xì)節(jié)和數(shù)據(jù)結(jié)構(gòu)。 如何統(tǒng)一衡量軟件設(shè)計(jì)的技術(shù)質(zhì)量。 4、系統(tǒng)功能分析 根據(jù)學(xué)校的教務(wù)人員提供的教師考核管理的信息，開發(fā)的管理系統(tǒng)的達(dá)到的功能如 下： 1、教師基本信息管理 2、教師任課情況管理 3、教師發(fā)表論文情況管理 4、教師科研經(jīng)費(fèi)管理 5、系統(tǒng)維護(hù) 6、退出系統(tǒng) 根據(jù)以上分析

14、，該系統(tǒng)考慮將整個(gè)系統(tǒng)分解成如圖 3-1 模塊結(jié)構(gòu)圖: 圖 3-1 模塊結(jié)構(gòu)圖 并且在系統(tǒng)的開發(fā)過程中，我盡量注意模塊的高內(nèi)聚、低耦合，使得系統(tǒng)的整體性 能提高，并且也有利于投入使用后的系統(tǒng)維護(hù)。 32 詳細(xì)設(shè)計(jì)詳細(xì)設(shè)計(jì) 1、詳細(xì)設(shè)計(jì)的任務(wù) 詳細(xì)設(shè)計(jì)就是要在概要設(shè)計(jì)的結(jié)果的基礎(chǔ)上，考慮“怎樣實(shí)現(xiàn)”這個(gè)軟件系統(tǒng)，直 到對(duì)系統(tǒng)中的每個(gè)模塊給出足夠詳細(xì)的過程性描述。主要任務(wù)如下：為每個(gè)模塊確定 采用的算法，選擇某種適當(dāng)?shù)墓ぞ弑磉_(dá)算法的過程，寫出模塊的詳細(xì)過程性描述；確 定每一模塊使用的數(shù)據(jù)結(jié)構(gòu)；確定模塊接口的細(xì)節(jié)，包括對(duì)系統(tǒng)外部的接口和用戶界 面，對(duì)系統(tǒng)內(nèi)部其它模塊的接口，以及模塊輸入數(shù)據(jù)、輸出數(shù)據(jù)

15、及局部數(shù)據(jù)的全部細(xì)節(jié)。 要為每一個(gè)模塊設(shè)計(jì)出一組測(cè)試用例，以便在編碼階段對(duì)模塊代碼（即程序）進(jìn)行預(yù) 主界面主界面 教教 師師 基基 本本 信信 息息 管管 理理 教教 師師 任任 課課 信信 息息 管管 理理 教教 師師 發(fā)發(fā) 表表 論論 文文 管管 理理 輔輔 助助 功功 能能 教教 師師 科科 研研 經(jīng)經(jīng) 費(fèi)費(fèi) 管管 理理 登錄登錄 定的測(cè)試，模塊的測(cè)試用例是軟件測(cè)試計(jì)劃的重要組成部分，通常應(yīng)包括輸入數(shù)據(jù)，期 望輸出等內(nèi)容。 2、詳細(xì)設(shè)計(jì)的方法 程序流程圖、n-s 圖、pad 圖、ipo 圖 本系統(tǒng)在開發(fā)過程中所采用的詳細(xì)設(shè)計(jì)方法為 ipo 圖： 1、教師考核的信息錄入模塊 ipo 圖：

16、2、教師考核信息的查詢模塊 ipo 圖： 3、輔助功能模塊 ipo 圖： 4、密碼修改模塊 ipo 圖： i io op p 考核教師的各 項(xiàng)信息 提供相應(yīng) 的界面供 操作人員 錄入 保存到表 i io op p 設(shè)置查詢條件提供相應(yīng) 的界面供 操作人員 操作 1顯示查詢 的結(jié)果 2統(tǒng)計(jì)相關(guān) 信息 i io op p 各類維護(hù)信息提供相應(yīng) 的界面供 操作人員 操作 保存到收入/ 支出項(xiàng)目表 i io op p 原密碼 新密碼 確認(rèn)密碼 提供相應(yīng) 的界面供 操作人員 操作 保存到用戶 管理表 第四章第四章 數(shù)據(jù)庫設(shè)計(jì)數(shù)據(jù)庫設(shè)計(jì) 41 數(shù)據(jù)庫數(shù)據(jù)庫 access 簡(jiǎn)介簡(jiǎn)介 access 中文版是

17、microsoft office 2000 套裝軟件的數(shù)據(jù)庫管理系統(tǒng)軟件，是目前 比較流行的小型桌面數(shù)據(jù)庫管理系統(tǒng)，它適用于小型企業(yè)、學(xué)校、個(gè)人等用戶，可以通 過多種方式實(shí)現(xiàn)對(duì)數(shù)據(jù)收集、分類、篩選處理，提供用戶查詢或打印報(bào)表。 access 具有良好的界面，采用了與 windows 和 microsoft office 系列軟件完全一致 的風(fēng)格，用戶可以通過菜單和對(duì)話框操作，不用編寫任何命令便能有效地實(shí)現(xiàn)各種功能 的操作，完成數(shù)據(jù)管理任務(wù)。microsoft office 的一個(gè)集成化的程序設(shè)計(jì)語言是 vba(visual basic for applications)，使用 vba 可以創(chuàng)建

18、非常實(shí)用的數(shù)據(jù)庫應(yīng)用系統(tǒng)。 access 可以作為個(gè)人計(jì)算機(jī)終端和大型主機(jī)系統(tǒng)之間的橋梁。通過如 sql、odbc 等 特定技術(shù)，方便地存儲(chǔ)、檢索和處理服務(wù)器平臺(tái)上的關(guān)鍵信息，提供了靈活、可靠、安 全的客戶/服務(wù)器解決方案。 access 可以接受多種格式的數(shù)據(jù)，從而方便了用戶在不同系統(tǒng)之間進(jìn)行數(shù)據(jù)轉(zhuǎn)換。 隨著 internet 網(wǎng)絡(luò)應(yīng)用的發(fā)展，access 還增加了使用信息發(fā)布 web 向?qū)Ш陀?html 格式導(dǎo)出對(duì)象的功能。 數(shù)據(jù)庫的概念 數(shù)據(jù)庫是一種存儲(chǔ)數(shù)據(jù)并對(duì)數(shù)據(jù)進(jìn)行操作的工具。數(shù)據(jù)庫的作用在于組織和表達(dá)信 息，簡(jiǎn)而言之，數(shù)據(jù)庫就是信息的集合。計(jì)算機(jī)的數(shù)據(jù)庫可以分為兩類：非關(guān)系數(shù)據(jù)庫

19、（flat-file）和關(guān)系數(shù)據(jù)庫（relational）。關(guān)系數(shù)據(jù)庫中包含了多個(gè)數(shù)據(jù)表的信息， 數(shù)據(jù)庫含有各個(gè)不同部分的術(shù)語，象記錄、域等。 新建一個(gè)數(shù)據(jù)庫 創(chuàng)建任何一個(gè)數(shù)據(jù)庫的第一步是仔細(xì)的規(guī)劃數(shù)據(jù)庫，設(shè)計(jì)必須是靈活的、有邏輯的。 創(chuàng)建一個(gè)數(shù)據(jù)庫結(jié)構(gòu)的過程被認(rèn)為是數(shù)據(jù)模型設(shè)計(jì)。 1 標(biāo)識(shí)需要的數(shù)據(jù)； 2 收集被標(biāo)識(shí)的字段到表中； 3 標(biāo)識(shí)主關(guān)鍵字字段； 4 繪制一個(gè)簡(jiǎn)單的數(shù)據(jù)圖表； 5 規(guī)范數(shù)據(jù)； 6 標(biāo)識(shí)指定字段的信息； 7 創(chuàng)建物理表。 修改已建的數(shù)據(jù)庫 數(shù)據(jù)庫的修改分為：添加、編輯和刪除記錄。這三種操作均可由 visual basic 創(chuàng)建 的程序來完成，下面的章節(jié)將詳細(xì)描述實(shí)現(xiàn)的具

20、體方法。 實(shí)現(xiàn)數(shù)據(jù)庫之間的聯(lián)系 數(shù)據(jù)庫之間的關(guān)系指明兩個(gè)庫之間共享一個(gè)共同的關(guān)鍵字值。一個(gè)連接是指一種虛 擬的表，這種表是在當(dāng)用戶要求從相互關(guān)聯(lián)的各個(gè)不同的表中獲取信息時(shí)建立的，關(guān)鍵 字段用于在相互連接的不同表中查找匹配的記錄。一個(gè)更高級(jí)的連接形式稱為自連接。 這種連接是指一個(gè)表被連接到它自己的一個(gè)字段，或在不同的紀(jì)錄中由重復(fù)數(shù)據(jù)的組合 字段。數(shù)據(jù)庫中有三種不同類型的關(guān)鍵字：主關(guān)鍵字、組合關(guān)鍵字和外關(guān)鍵字。在表中 使用的關(guān)鍵字類型用于描述庫表示什么以及在數(shù)據(jù)庫中如何與其它的庫建立關(guān)系。 42 數(shù)據(jù)庫需求分析數(shù)據(jù)庫需求分析 根據(jù)調(diào)查有關(guān)單位的教師考核管理的實(shí)際情況，分析得到如下的數(shù)據(jù)庫結(jié)構(gòu)。 以

21、科研經(jīng)費(fèi)管理的表為例，其余的表的信息參見目錄下的“教師考核.mdb”數(shù)據(jù)庫。 教師考核收支表： 收入/支出項(xiàng)目表： 用戶管理表： 43 表的詳細(xì)結(jié)構(gòu)說明表的詳細(xì)結(jié)構(gòu)說明 教師考核收支表的詳細(xì)信息： 收入項(xiàng)目表的詳細(xì)結(jié)構(gòu)為： 支出項(xiàng)目表的詳細(xì)結(jié)構(gòu)為： 用戶管理表的詳細(xì)結(jié)構(gòu)為： 44 測(cè)試用例測(cè)試用例 教師考核收支表的測(cè)試用例： 收入項(xiàng)目表的測(cè)試用例： 支出項(xiàng)目表的測(cè)試用例： 第五章第五章 系統(tǒng)的實(shí)現(xiàn)系統(tǒng)的實(shí)現(xiàn) 51 系統(tǒng)登錄模塊的實(shí)現(xiàn)系統(tǒng)登錄模塊的實(shí)現(xiàn) 1流程圖 2界面： 界面包括的控件有標(biāo)簽、文本框、命令按鈕等控件。 3實(shí)現(xiàn)過程： 第一步將所需的控件放到窗體的相應(yīng)位置；方法：首先在“工具箱”中

22、選中所需的 控件圖標(biāo)，然后在表單的恰當(dāng)位置上單擊鼠標(biāo)并拖動(dòng)鼠標(biāo)，即可把由所選取的控件生成 的對(duì)象添加到窗體上。如下圖： y n 開始 輸入登錄密碼 是否正確 主界面 第二步，選擇窗體或控件進(jìn)行屬性設(shè)置，如圖為窗體的屬性設(shè)置界面: 第三步雙擊相應(yīng)的控件，在控件的相應(yīng)過程中編寫代碼： 如此窗體上“進(jìn)入”與“退出”按鈕的代碼如下： private sub command1_click() sql = select * from 用戶管理 where user = data source= persist security info=false adodc1.recordsource = 專業(yè) ado

23、dc1.refresh adodc2.connectionstring = provider=microsoft.jet.oledb.4.0;data source= persist security info=false adodc2.recordsource = 系別 adodc2.refresh adodc3.connectionstring = provider=microsoft.jet.oledb.4.0;data source= persist security info=false adodc3.recordsource = 任教班級(jí) adodc3.refresh end su

24、b 實(shí)現(xiàn)與數(shù)據(jù) 庫的連接 實(shí)現(xiàn)與數(shù)據(jù)庫中 的表的連接 532 教師信息查詢模塊的實(shí)現(xiàn)教師信息查詢模塊的實(shí)現(xiàn) 1、流程圖： 2、運(yùn)行界面： 3、實(shí)現(xiàn)過程： 第一步將所需的控件放到表單的相應(yīng)位置；方法：首先在“表單控件”工具欄先 選中所需的控件圖件，然后在表單的恰當(dāng)位置上單擊鼠標(biāo)并拖動(dòng)鼠標(biāo)，即可把由所選 取的控件生成的對(duì)象添加到表單上,如上圖： 包括的控件主要有：標(biāo)簽、文本框、單選命令、表格等。 第二步，選擇窗體或控件進(jìn)行屬性設(shè)置，先選取中需要設(shè)置屬性的對(duì)象，然后在 屬性窗口里顯示了該控件對(duì)象的所有屬性、事件和方法。 第三步雙擊相應(yīng)的控件，在控件的相應(yīng)過程中編寫程序。 “查詢”的主要代碼如下： n

25、 y 開始 設(shè)置查詢條件查詢 是否繼續(xù) 退出 private sub command1_click() if option1.value then sql = select * from 教師基本情況 where 教師編號(hào)= data source= persist security info=false adodc1.recordsource = 經(jīng)費(fèi)收支 adodc1.refresh adodc2.connectionstring = provider=microsoft.jet.oledb.4.0;data source= persist security info=false adod

26、c2.recordsource = 收入項(xiàng)目 adodc2.refresh adodc3.connectionstring = provider=microsoft.jet.oledb.4.0;data source= persist security info=false adodc3.recordsource = 支出項(xiàng)目 adodc3.refresh end sub 如日期 text2 的控件的主要屬性設(shè)置如下： 其他 text 的設(shè)置同。 連接數(shù)據(jù)庫 數(shù)據(jù)庫中的 何表 數(shù)據(jù)來源 對(duì)應(yīng)表中的字段 562 科研經(jīng)費(fèi)收支查詢模塊的實(shí)現(xiàn)科研經(jīng)費(fèi)收支查詢模塊的實(shí)現(xiàn) 1流程圖： 2運(yùn)行界面： 3實(shí)

27、現(xiàn)過程： 第一步將所需的控件放到表單的相應(yīng)位置；方法：首先在“表單控件”工具欄先 選中所需的控件圖件，然后在表單的恰當(dāng)位置上單擊鼠標(biāo)并拖動(dòng)鼠標(biāo)，即可把由所選 取的控件生成的對(duì)象添加到表單上,如上圖： 包括的控件主要有：?jiǎn)芜x按鈕、文本框、命令按鈕、表格等。 第二步，選擇窗體或控件進(jìn)行屬性設(shè)置，先選取中需要設(shè)置屬性的對(duì)象，然后在 屬性窗口里顯示了該控件對(duì)象的所有屬性、事件和方法。 第三步雙擊相應(yīng)的控件，在控件的相應(yīng)過程中編寫程序。 n y 開始 設(shè)置查詢條件查詢 是否繼續(xù) 退出 下面把此界面的主要代碼作一介紹： 按鈕的代碼如下： private sub command1_click() dim s

28、trquery as string command1.enabled = false command2.enabled = true command3.enabled = true d1 = trim(text1.text) d2 = trim(text2.text) adodc1.commandtype = adcmdtext if option1.value = true then strquery = select * from 經(jīng)費(fèi)收支 where len(經(jīng)費(fèi)收入) and 日期= & d1 & and 日期= & d1 & and 日期= & d1 & and 日期= & d2 &

29、 end if if option3.value then strquery = select * from 經(jīng)費(fèi)收支 where 經(jīng)手人= & trim(text3.text) & end if adodc1.recordsource = strquery adodc1.refresh if adodc1.recordset.recordcount = 0 then msgbox 不存在此記錄! end if end sub “繼續(xù)”按鈕的代碼如下： private sub command2_click() command1.enabled = true command2.enabled =

30、 false command3.enabled = true end sub 此過程主要是借助于 sql（結(jié)構(gòu)化查詢語言）語句來進(jìn)行查詢，并通過 option 按鈕 組判斷用戶選擇的查詢方式。然后通過 adodc1.recordsource = strquery 來進(jìn)行數(shù)據(jù)源 更新。如果找不到要找數(shù)據(jù)，則提示退出。 表格用來存放查詢的結(jié)果。表格的主要屬性為： “教師考核余額”的代碼為： private sub command4_click() c = adodc1.recordset.recordcount adodc1.recordset.movefirst 數(shù)據(jù)源 表格的標(biāo)題 for n

31、= 1 to c if len(adodc1.recordset(經(jīng)費(fèi)收入) then a = a + adodc1.recordset(金額) else b = b + adodc1.recordset(金額) end if adodc1.recordset.movenext next msgbox 收入為： & a & 支出為： & b & chr(13) + 教師考核余額為： & str(a - b), , 系統(tǒng)統(tǒng)計(jì) end sub 統(tǒng)計(jì)滿足條件的收入數(shù)、支出數(shù)、教師考核余額數(shù)，結(jié)果界面為： 57 輔助功能模塊的實(shí)現(xiàn)輔助功能模塊的實(shí)現(xiàn) 下面主要以科研經(jīng)費(fèi)的收入項(xiàng)目和支出項(xiàng)目為例來進(jìn)行介紹

32、。 1流程圖： 2運(yùn)行界面： n y 開始 增加刪除項(xiàng)目 是否繼續(xù) 退出 3實(shí)現(xiàn)過程： 第一步將所需的控件放到表單的相應(yīng)位置；方法：首先在“表單控件”工具欄先 選中所需的控件圖件，然后在表單的恰當(dāng)位置上單擊鼠標(biāo)并拖動(dòng)鼠標(biāo)，即可把由所選 取的控件生成的對(duì)象添加到表單上,如上圖： 包括的控件主要有：標(biāo)簽、文本框、命令按鈕、data 等。 第二步，選擇窗體或控件進(jìn)行屬性設(shè)置，先選取中需要設(shè)置屬性的對(duì)象，然后在 屬性窗口里顯示了該控件對(duì)象的所有屬性、事件和方法。 第三步雙擊相應(yīng)的控件，在控件的相應(yīng)過程中編寫程序。 現(xiàn)將控件的相應(yīng)代碼說明如下： 收入項(xiàng)目的代碼分別如下： private sub comm

33、and1_click() if command1.caption = 新增 then command1.caption = 確定 data1.recordset.addnew text2.setfocus command2.enabled = false command3.enabled = false command4.enabled = false else command1.caption = 新增 data1.recordset.update data1.recordset.movelast command2.enabled = true command3.enabled = true

34、 command4.enabled = true end if end sub private sub command2_click() data1.recordset.delete data1.recordset.moveprevious end sub private sub command3_click() data1.recordset.edit data1.recordset.update end sub private sub command4_click() unload me form4.show end sub 支出項(xiàng)目的代碼同上。 58 密碼管理模塊的實(shí)現(xiàn)密碼管理模塊的實(shí)現(xiàn)

35、 界面如下圖： 數(shù)據(jù)庫的連接方法同上。 界面的設(shè)計(jì)如下： 第一步將所需的控件放到表單的相應(yīng)位置；方法：首先在“表單控件”工具欄先 選中所需的控件圖件，然后在表單的恰當(dāng)位置上單擊鼠標(biāo)并拖動(dòng)鼠標(biāo)，即可把由所選 取的控件生成的對(duì)象添加到表單上,如上圖： 包括的控件主要有：標(biāo)簽、文本框、命令按鈕、data 等。 第二步，選擇窗體或控件進(jìn)行屬性設(shè)置，先選取中需要設(shè)置屬性的對(duì)象，然后在 屬性窗口里顯示了該控件對(duì)象的所有屬性、事件和方法。 第三步雙擊相應(yīng)的控件，在控件的相應(yīng)過程中編寫程序。 主要代碼如下： private sub command1_click() if trim(text1.text) = trim(text4.text) then if trim(text2.text) = trim(text3.text) then text4.text = text3.text data1.updatereco