【導(dǎo)讀】20世紀(jì)以來(lái)，社會(huì)生產(chǎn)力迅速發(fā)展，科學(xué)技術(shù)突飛猛進(jìn)，長(zhǎng)，傳統(tǒng)的信息處理與決策的手段已不能適應(yīng)社會(huì)的需要，劇烈的競(jìng)爭(zhēng)形勢(shì)，一個(gè)人、一個(gè)企業(yè)要在現(xiàn)代社會(huì)中求生存，理.電子教務(wù)管理系統(tǒng)是管理信息系統(tǒng)的一個(gè)典型用例.技術(shù)密集型、勞動(dòng)密集型、智力密集型的項(xiàng)目。累，有一定的后發(fā)優(yōu)勢(shì)。自菲薄，更不能夜郎自大。要抓住當(dāng)前網(wǎng)絡(luò)經(jīng)濟(jì)興起的有利。地發(fā)揮信息產(chǎn)業(yè)對(duì)國(guó)民經(jīng)濟(jì)增長(zhǎng)的拉動(dòng)作用。管理實(shí)踐活動(dòng)兩者之間架設(shè)橋梁。

　　

【正文】 END IF END IF IF CHECK1(1).VALUE = 1 THEN IF TRIM() = THEN MSGBOX 姓名不能為空 , VBOKONLY + VBEXCLAMATION, 警告 EXIT SUB ELSE DD(1) = TRUE IF DD(0) = TRUE THEN TXTSQL = TXTSQL amp。 AND 姓名 = 39。 amp。 amp。 39。 ELSE TXTSQL = TXTSQL amp。 姓名 = 39。 amp。 amp。 39。 END IF END IF END IF IF CHECK1(2).VALUE THEN IF TRIM() = THEN MSGBOX 職稱不能為空 , VBOKONLY + VBEXCLAMATION, 警告 EXIT SUB ELSE DD(2) = TRUE IF DD(0) OR DD(1) THEN TXTSQL = TXTSQL amp。 AND 職稱 = 39。 amp。 amp。 39。 ELSE TXTSQL = TXTSQL amp。 職稱 = 39。 amp。 amp。 39。 END IF END IF END IF IF NOT (DD(0) OR DD(1) OR DD(2) OR DD(3)) THEN MSGBOX 請(qǐng)?jiān)O(shè)置查詢方式！ , VBOKONLY + VBEXCLAMATION, 警告 EXIT SUB END IF = = ADCMDTEXT = TXTSQL SET = ADODC1 END SUB PRIVATE SUB FORM_LOAD() CALL RESIZEINIT(ME) END SUB PRIVATE SUB FORM_RESIZE() CALL RESIZEFORM(ME) 39。窗體改變時(shí)，控件隨之變化 END SUB PRIVATE SUB TXTBJ_KEYPRESS(KEYASCII AS INTEGER) IF NOT ISNUMERIC(CHR(KEYASCII)) THEN KEYASCII = 0 END IF END SUB PRIVATE SUB TXTXH_KEYPRESS(KEYASCII AS INTEGER) IF NOT ISNUMERIC(CHR(KEYASCII)) THEN KEYASCII = 0 END IF END SUB 6 主界面設(shè)計(jì)與代碼分析 : 代碼分析 : PRIVATE SUB SJDCXD_CLICK() VBMODAL, MDIFORM1 END SUB PRIVATE SUB TBAR_BUTTONCLICK(BYVAL BUTTON AS ) SELECT CASE CASE 1 CASE 2 CASE 3 CASE 4 VBMODAL, MDIFORM1 CASE 6 CASE 7 CASE 8 END SELECT END SUB PRIVATE SUB TBAR_BUTTONMENUCLICK(BYVAL BUTTONMENU AS ) SELECT CASE CASE KSCJFX CASE BJFSDFX CASE NJFSDFX END SELECT END SUB PRIVATE SUB TCXT_CLICK() UNLOAD ME END SUB PRIVATE SUB TOOLBAR2_BUTTONCLICK(BYVAL BUTTON AS ) END SUB PRIVATE SUB WINDOWSC_CLICK() (VBCASCADE) END SUB PRIVATE SUB WINDOWSV_CLICK() (VBVERTICAL) END SUB PRIVATE SUB WINDWOSH_CLICK() (VBHORIZONTAL) END SUB PRIVATE SUB XSHMC_CLICK() END SUB PRIVATE SUB XSXJDAK_CLICK() END SUB PRIVATE SUB XSXXGL_CLICK() END SUB PRIVATE SUB XSXXZHCX_CLICK() END SUB PRIVATE SUB XTBZ_CLICK() IF DIR( amp。 \幫助文檔 .DOC) = THEN MSGBOX 幫助文件丟失，請(qǐng)查找 幫助文檔 .DOC 文件！ amp。 CHR(13) amp。 然后將它存放在應(yīng)用程序所在的目錄。 , , ELSE DIM SCR_HDC AS LONG DIM STARTDOC AS LONG SCR_HDC = GETDESKTOPWINDOW() STARTDOC = SHELLEXECUTE(SCR_HDC, OPEN, amp。 \幫助文檔 .DOC, , C:\, 1) END IF END SUB PRIVATE SUB XTGL_CLICK() END SUB PRIVATE SUB ZHCJCX_CLICK() END SUB PRIVATE SUB ZNCJSR_CLICK() VBMODAL, MDIFORM1 END SUB 第四章 數(shù)據(jù)庫(kù)的設(shè)計(jì) : : : : : : : 數(shù)據(jù)庫(kù)概念和發(fā)展 關(guān)系數(shù)據(jù)庫(kù)是目前各類數(shù)據(jù)庫(kù)中最重要、最流行的數(shù)據(jù)庫(kù)，他應(yīng)用數(shù)學(xué)方法來(lái)處理數(shù)據(jù)庫(kù)數(shù)據(jù)，是目前使用最廣泛的數(shù)據(jù)庫(kù)系統(tǒng)。 20 世紀(jì) 70 年代以后開(kāi)發(fā)的數(shù)據(jù)庫(kù)管理系統(tǒng)產(chǎn)品幾乎都是基于關(guān)系的。在數(shù)據(jù)庫(kù)發(fā)展的歷史上，最重要的成就就是關(guān)系模型。 關(guān)系數(shù)據(jù)庫(kù)系統(tǒng)與非關(guān)系數(shù)據(jù)庫(kù)系統(tǒng)的區(qū)別是：關(guān)系系統(tǒng)只有 “ 表 “ 這一種數(shù) 據(jù)結(jié)構(gòu)；而非關(guān)系數(shù)據(jù)庫(kù)系統(tǒng)還有其他數(shù)據(jù)結(jié)構(gòu)，對(duì)這些數(shù)據(jù)結(jié)構(gòu)有其他的操作。 結(jié)構(gòu)化查詢語(yǔ)言 SQL（ Structured Query Language）是一種介于關(guān)系代數(shù)與關(guān)系演算之間的語(yǔ)言，其功能包括查詢、操縱、定義和控制四個(gè)方面，是一個(gè)通用的、功能極強(qiáng)的關(guān)系數(shù)據(jù)庫(kù)語(yǔ)言。目前已成為關(guān)系數(shù)據(jù)庫(kù)的標(biāo)準(zhǔn)語(yǔ)言 測(cè)試在軟件開(kāi)發(fā)過(guò)程中一直都是備受關(guān)注的，即使在傳統(tǒng)的軟件工程中，也有一個(gè)明確、獨(dú)立的測(cè)試階段。隨著軟件危機(jī)的頻頻出現(xiàn)以及人們對(duì)于軟件本質(zhì)的進(jìn)一步認(rèn)識(shí)，測(cè)試的地位得到了前所未有的提高。測(cè)試 已經(jīng)不僅僅局限于軟件開(kāi)發(fā)中的一個(gè)階段，它已經(jīng)開(kāi)始貫穿于整個(gè)軟件開(kāi)發(fā)過(guò)程，人們已經(jīng)開(kāi)始認(rèn)識(shí)到：測(cè)試開(kāi)始的時(shí)間越早，測(cè)試執(zhí)行的越頻繁，所帶來(lái)的整個(gè)軟件開(kāi)發(fā)成本的下降就會(huì)越多。 Extreme Programming 更是把測(cè)試推到了極限的位置，一切軟件開(kāi)發(fā)活動(dòng)都要從首先編寫測(cè)試代碼開(kāi)始。 總 結(jié) 電子教務(wù) 管理系統(tǒng)是一個(gè)典型的信息管理系統(tǒng)，其主要通過(guò)軟件工程方面的選擇課題、需求分析、總體設(shè)計(jì)、選用工具、程序模塊、系統(tǒng)測(cè)試等幾個(gè)步驟來(lái)實(shí)現(xiàn)。開(kāi)發(fā)本系統(tǒng)的過(guò)程中，首先 要 對(duì) 高校教務(wù) 信息管理進(jìn)行系統(tǒng)調(diào)研， 熟悉 學(xué)校教 師的人事、檔案 管理 的 流程 、步驟；其次在系統(tǒng)需求分析過(guò)程中，要透過(guò)現(xiàn)象看本質(zhì)，敏銳觀察到學(xué)校教師管理中存在的各種問(wèn)題，并在總體設(shè)計(jì)把握好對(duì)問(wèn)題的分析、理解，進(jìn)而解決問(wèn)題；選用開(kāi)發(fā)工具要選用自己最熟悉、應(yīng)用較多的開(kāi)發(fā)工具，本系統(tǒng)開(kāi)發(fā)選用 MS Visual Basic ，其具有語(yǔ)言簡(jiǎn)單、功能強(qiáng)大、組件眾多的優(yōu)點(diǎn)。程序模塊的編制中，重點(diǎn)把握系統(tǒng)內(nèi)部完整性、功能性、實(shí)用性、便捷性，使其能夠協(xié)調(diào)統(tǒng)一、運(yùn)行無(wú)誤。 運(yùn)行結(jié)果證明，本學(xué)校教師信息 管理系統(tǒng) 極大提高了工作效率，節(jié)省了人力和物力，最終 滿足 學(xué)校管理、學(xué)校員工工作 的需要 ，同時(shí)也成為現(xiàn)代化學(xué)校管理的標(biāo)志 致 謝 我首先感謝我的指導(dǎo)老師呂老師，在他嚴(yán)格的要求下我懂得了開(kāi)發(fā)軟件要有一種極其認(rèn)真負(fù)責(zé)的態(tài)度。無(wú)論做什么事都要大膽的去想去做，這樣會(huì)有好的創(chuàng)意，才能更有作為。 在這里我還要感謝我們宿舍的其它 5 個(gè)同學(xué)。他們和我共同生活了四年，在生活和學(xué)習(xí)上給了我很大的幫助。 參考文獻(xiàn) 1 陳 明 . 軟件工程學(xué)教程 .科技出版社， 2020 2 薩師煊，王珊 . 數(shù)據(jù)庫(kù)系統(tǒng)概論 . 第三版 . 高等教育出版社， 2020 3 飛思科技產(chǎn)品研發(fā)中心 . visual basic 數(shù)據(jù)庫(kù)應(yīng)用開(kāi)發(fā) .電子工業(yè)出版社， 2020 4 飛思科技產(chǎn)品研發(fā)中心 . visual basic 開(kāi)發(fā)者手冊(cè) . 電子工業(yè)出版社 , 2020 5 申 旻 . visual basic 高手突破 . 清華大學(xué)出版社， 2020， 302 6 Steve Teixeira， Xaviver Pacheco 著，龍勁松， 王瑜，謝尚書譯 . visual basic 開(kāi)發(fā)人員指南 . 機(jī)械工業(yè)出版社 .2020 7 喬林 .參透 Delphi／ Kylix . 中國(guó)鐵道出版社 .2020 8 李維 .Inside 深入核心 VCL 架構(gòu)剖析 . 電子工業(yè)出版社 .2020 9 張立科編寫組 .Windows API 函數(shù)參考手冊(cè) .人民郵電出版社 .2020 嚴(yán)蔚敏，吳偉民 .數(shù)據(jù)結(jié)構(gòu) .第二版 .清華大學(xué)出版社 .2020 10 王珍 玲 。實(shí)用軟件工程教程 高等教育出版社 2020 11 （英） Ian Sommerville 機(jī)械工業(yè)出版社 2020 12 美 Cantu,U. 王輝等譯 visual basic 從入門到精通 電子工業(yè)出版社 2020 13 李維 面向?qū)ο箝_(kāi)發(fā)實(shí)踐之路（ visual basic ）(BORLAND資深顧問(wèn)著名 visual basic 作 ) 電子工業(yè)出版社 14 秦斌 等 visual basic 用 中國(guó)水利水電出版社 2020 .1 15 劉藝 visual basic 機(jī)械工業(yè)出版社 2020 basic 程序設(shè)計(jì)第二版 譚浩強(qiáng) 清華大學(xué)出版社 2020 17. visual 程序設(shè)計(jì)教程 . 胡同森 趙劍鋒等 . 浙江科學(xué)技術(shù)出版社 , (第二版 ) 周蘇 王文 著 科學(xué)出版社 2020 Basic 程序設(shè)計(jì)與開(kāi)發(fā)技術(shù) 求是科技 人民郵電出版社 畢業(yè)設(shè)計(jì) 電子教務(wù)管理系統(tǒng) 院系 ______ 專業(yè) ______ 班級(jí) ______ 姓名 ______ 日期 年 月 日 摘 要 20 世紀(jì)以來(lái)，社會(huì)生產(chǎn)力迅速發(fā)展，科學(xué)技術(shù)突飛猛進(jìn)，人們進(jìn)行信息交流的深度與廣度不斷增加，信息量急劇增長(zhǎng)，傳統(tǒng)的信息處理與決策的手段已不能適應(yīng)社會(huì)的需要，信息的重要性和信息處理問(wèn)題的緊迫性空前提高了，面對(duì)著日益復(fù)雜和不斷發(fā)展，變化的社會(huì)環(huán)境，特別是企業(yè)間日趨劇烈的競(jìng)爭(zhēng)形勢(shì)，一個(gè)人、一個(gè)企業(yè)要在現(xiàn)代社會(huì)中求生存，求發(fā)