教務(wù)管理系統(tǒng)概要設(shè)計和詳細(xì)設(shè)計

.1-.概要設(shè)計說明書1.總體設(shè)計1.1需求規(guī)定教務(wù)管理系統(tǒng)可分為學(xué)生信息管理系統(tǒng)和教師管理信息系統(tǒng),系統(tǒng)開發(fā)的整體任務(wù)是實現(xiàn)學(xué)校教師和學(xué)生信息管理的系統(tǒng)化、規(guī)范化、自動化和智能化,從而達(dá)到提高學(xué)校管理效率的目的。本階段目的在于明確系統(tǒng)的數(shù)據(jù)結(jié)構(gòu)和軟件結(jié)構(gòu),此外總體設(shè)計還將給出內(nèi)部軟件和外部系統(tǒng)部件之間的接口定義,各個軟件模塊的功能說明,數(shù)據(jù)結(jié)構(gòu)的細(xì)節(jié)以及具體的裝配要求。1.2運行環(huán)境軟件基本運行環(huán)境為WindowsXP環(huán)境。1.3基本設(shè)計概念和處理流程概要說明書的目的在于明確系統(tǒng)的數(shù)據(jù)結(jié)構(gòu)和軟件結(jié)構(gòu),設(shè)計外部軟件和內(nèi)部軟件的接口,說明各個軟件模塊的功能說明,數(shù)據(jù)結(jié)構(gòu)的細(xì)節(jié)等。系統(tǒng)的總體處理流程如圖1-1所示：學(xué)生選課選擇操作打印成績單班級信息維護報表統(tǒng)計教學(xué)管理成績輸入課表查詢基礎(chǔ)維護選擇操作學(xué)生選課選擇操作打印成績單班級信息維護報表統(tǒng)計教學(xué)管理成績輸入課表查詢基礎(chǔ)維護選擇操作教務(wù)管理系統(tǒng)教務(wù)管理系統(tǒng)選擇操作選擇操作教師信息維護課程信息維護學(xué)生信息維護教師信息維護課程信息維護學(xué)生信息維護圖1-1系統(tǒng)的總體處理流程1.4系統(tǒng)體系結(jié)構(gòu)用一覽表及框圖的形式說明本系統(tǒng)的系統(tǒng)元素〔各層模塊、子程序、公用程序等的劃分,扼要說明每個系統(tǒng)元素的標(biāo)識符和功能,分層次地給出各元素之間的控制與被控制關(guān)系。本系統(tǒng)的體系架構(gòu)如圖1-2所示：圖1-2系統(tǒng)體系架構(gòu)本系統(tǒng)體系結(jié)構(gòu)大致可以定義為：客戶機層上的表示層主要是通過Struts框架實現(xiàn)的,由顯示視圖產(chǎn)生一個請求。請求被ActionServlet〔控制器接收,它在struts-config.xml文件中尋找請求的URI,找到對應(yīng)的Action類后,Action類執(zhí)行相應(yīng)的業(yè)務(wù)邏輯。Action類執(zhí)行建立在模型組件基礎(chǔ)上的業(yè)務(wù)邏輯,模型組件是和應(yīng)用程序關(guān)聯(lián)的。一旦Action類處理完業(yè)務(wù)邏輯,它把控制權(quán)返回給ActionServlet,Action類提供一個鍵值作為返回的一部分,它指明了處理的結(jié)果。ActionServlet使用這個鍵值來決定在什么視圖中顯示Action的類處理結(jié)果。當(dāng)ActionServlet把Action類的處理結(jié)果傳送到指定的視圖中,請求的過程也就完成了。中間業(yè)務(wù)層是通過Spring框架實現(xiàn)的,首先建立一個BaseAction,它繼承了Action類,而其他定義的Action都要繼承這個BaseAction。這個BaseAction需要導(dǎo)入AppContext工具類,這個AppContext需要導(dǎo)入Spring中org.springframework.context.support.*；這樣一個繼承BaseAction的Action,就可以getXXXService<>的方法得到某一個service的實例服務(wù)定位器的設(shè)計模式。持久〔PO層是由hibernate架構(gòu)實現(xiàn)的,它包括關(guān)于整體數(shù)據(jù)庫的hibernate.cfg.xml文件、每個表的JavaBean類和每個表的hbm.xml文件,通過Spring集成模板HibernateTemplate提供DAO來使用PO。在Spring的配置文件〔applicationContext.xml中配置sessionFactory的bean來管理hibernate。管理員登陸業(yè)務(wù)調(diào)度管理員登陸業(yè)務(wù)調(diào)度班信維護課信維護學(xué)信維護?師信維護學(xué)生選課成績輸入???DAO組件XML解析數(shù)據(jù)連接持久實體課表查詢

2.接口設(shè)計2.1用戶接口用戶接口語法結(jié)構(gòu)軟件回答信息教務(wù)系統(tǒng)管理員登錄以英文和漢字開頭,不超過6個字符進入主界面信息管理相關(guān)操作進行相應(yīng)的操作3.運行設(shè)計3.1運行模塊組合具體軟件的運行模塊組合為程序多窗口的運行環(huán)境,各個模塊在軟件運行過程中能較好的交換信息,處理數(shù)據(jù)。3.2運行控制軟件運行時有較友好的界面,基本能夠?qū)崿F(xiàn)用戶的數(shù)據(jù)處理要求。3.3運行時間系統(tǒng)的運行時間基本可以達(dá)到要求。4.系統(tǒng)數(shù)據(jù)結(jié)構(gòu)4.1邏輯設(shè)計教務(wù)管理系統(tǒng)E-R圖選課表FK1PK編號學(xué)號課序號PK課程名稱課程簡稱選課表FK1PK編號學(xué)號課序號PK課程名稱課程簡稱拼音碼本學(xué)期課程教師開課系別年份課程表PK編號4.2邏輯結(jié)構(gòu)設(shè)計表1、表名稱：bkb表類型：約束表含義：班級報考表字段名稱字段類型Null含義示例數(shù)據(jù)id整形否,自增主鍵列1name字符值八班2、表名稱：cjb表類型：約束表含義：班級成績表〔打印表字段名稱字段類型Null含義示例數(shù)據(jù)id整形否,自增主鍵列1cjb_id整形否外鍵列1name字符值八班3、表名稱：jhcjb表類型：約束表含義：班級計劃成績表〔顯示和打印字段名稱字段類型Null含義示例數(shù)據(jù)id整形否,自增主鍵列1name字符值八班4、表名稱：hks表類型：約束表含義：班計劃學(xué)期考試課程表字段名稱字段類型Null含義示例數(shù)據(jù)id整形否,自增主鍵列1fangguansuo_id整形否外鍵列1name字符值長三5、表名稱：hxq表類型：約束表含義：班計劃學(xué)期課程開設(shè)表字段名稱字段類型Null含義示例數(shù)據(jù)id整形否,自增主鍵列1name字符值英語fenshu整形分?jǐn)?shù)46、表名稱：xjh表類型：約束表含義：班教學(xué)計劃信息表參見bkb表7、表名稱：xxb表類型：約束表含義：班注冊和檔案表參見bkb表8、表名稱：kbpdfb表類型：約束表含義：報考編排登分表參見bkb表9、表名稱：ctdmkb_tmp表類型：約束表含義：畢業(yè)課程替代免考表參見cjb表10、表名稱：ctdmkb表類型：約束表含義：畢業(yè)課程替代免考表參見cjb表11、表名稱：ysmdb表類型：約束表含義：畢業(yè)生名單參見cjb表12、表名稱：ycymdb表類型：約束表含義：畢業(yè)預(yù)審審核差異名單表參見cjb表13、表名稱：yyshsdfb表類型：約束表含義：畢業(yè)預(yù)審審核得分表參見ycymdb表表名稱：yyshsdfb_tmp表類型：實體表含義：畢業(yè)預(yù)審審核得分表字段名稱字段類型Null含義示例數(shù)據(jù)id整形否,自增主鍵列zhaidihao字符宅第號zhuanghao字符幢號diquleibie字符地區(qū)類別限定：一類/二類/三類chanbie字符產(chǎn)別限定：直管/自管/托管chanquanzhenghao字符產(chǎn)權(quán)證號jiuqu整形舊區(qū)約束表：qujiuxiaoqu整形舊小區(qū)約束表：xiaoqujiulouhao字符舊樓號xinqu整形新區(qū)約束表：quxinxiaoqu整形新小區(qū)約束表：xiaoquxinlouhao字符新樓號jiegou整形結(jié)構(gòu)約束表：jiegouzongcengshu整形總層數(shù)15、表名稱：gdw類型：約束表含義：采購單位16、表名稱：gdwdhzz類型：約束表含義：采購單位到貨總賬17、表名稱：gdwzz類型：約束表含義：采購總賬18、表名稱：gdhmxb類型：約束表含義：采購到貨明細(xì)表19、表名稱：gdhmxml類型：約束表含義：采購到貨明細(xì)目錄20、表名稱：gmxb類型：約束表含義：采購明細(xì)表21、表名稱：gzb類型：約束表含義：采購總表22、表名稱：cjdmb類型：約束表含義：成績代碼表23、表名稱：cjgdb類型：約束表含義：成績更動表24、表名稱：cjtjb類型：約束表含義：成績統(tǒng)計表25、表名稱：cjzb類型：約束表含義：成績總表26、表名稱：cjzb_copy類型：約束表含義：成績總表27、表名稱：dgdw類型：約束表含義：訂購單位28、表名稱：dgdwmxb類型：約束表含義：訂購單位明細(xì)表29、表名稱：dgmxb類型：約束表含義：訂購明細(xì)表30、表名稱：dgzb類型：約束表含義：訂購總表31、表名稱：fxzyb類型：約束表含義：輔修專業(yè)表32、表名稱：jhkkkcb類型：約束表含義：計劃開考課程表33、表名稱：jhkkkcb類型：約束表含義：計劃開考課程傳遞表34、表名稱：jljb類型：約束表含義：獎勵級別表35、表名稱：jlqkjzb類型：約束表含義：獎勵情況記載表36、表名稱：jccgfdml類型：約束表含義：教材采購分單目錄37、表名稱：jccgjsb類型：約束表含義：教材采購計算表38、表名稱：jccgmxb類型：約束表含義：教材采購明細(xì)表39、表名稱：jccgshb類型：約束表含義：教材采購審核表40、表名稱：jcch類型：約束表含義：教材冊號41、表名稱：jcdgzb類型：約束表含義：教材訂購總表42、表名稱：jclxbmdz類型：約束表含義：教材類型編碼對照43、表名稱：jcsmmb類型：約束表含義：教材說明模板44、表名稱：jcthzt類型：約束表含義：教材替換狀態(tài)45、表名稱：dgdwzb類型：約束表含義：教材征訂訂購單位總表46、表名稱：jczb類型：約束表含義：教材總表47、表名稱：jxbm類型：約束表含義：教學(xué)部門表48、表名稱：jxdg類型：約束表含義：教學(xué)大綱49、表名稱：jxhjdy類型：約束表含義：教學(xué)環(huán)節(jié)定義50、表名稱：kkdw類型：約束表含義：開課單位表51、表名稱：kcqkb類型：約束表含義：考場情況表52、表名稱：kdxxb類型：約束表含義：考點代碼表53、表名稱：kslb類型：約束表含義：考生類別代碼表54、表名稱：ksdmb類型：約束表含義：考試代碼表55、表名稱：ksdmcd類型：約束表含義：考試代碼傳遞表56、表名稱：ksdxb類型：約束表含義：考試對象表57、表名稱：ksfsdm類型：約束表含義：考試方式代碼表58、表名稱：kslxdmb類型：約束表含義：考試類型代碼表59、表名稱：kccc類型：約束表含義：課程層次代碼表60、表名稱：kcgldw類型：約束表含義：課程管理單位61、表名稱：kcjsfs類型：約束表含義：課程建設(shè)方式62、表名稱：kcjsjb類型：約束表含義：課程建設(shè)級別表63、表名稱：kcjslb類型：約束表含義：課程建設(shè)類別64、表名稱：kcjcdzb類型：約束表含義：課程教材對照65、表名稱：kclb類型：約束表含義：課程類別代碼表66、表名稱：kctdb類型：約束表含義：課程替代表67、表名稱：kcxz類型：約束表含義：課程性質(zhì)代碼表68、表名稱：kczb類型：約束表含義：課程總表69、表名稱：ljhkcb類型：約束表含義：類計劃課程表70、表名稱：ljhxqks類型：約束表含義：類計劃學(xué)期開設(shè)課程表71、表名稱：ljhxqksb類型：約束表含義：類計劃學(xué)期考試課程表72、表名稱：ljxjhb類型：約束表含義：類教學(xué)計劃表73、表名稱：mzdmb類型：約束表含義：民族代碼表74、表名稱：ndszb類型：約束表含義：年度收支表75、表名稱：njdmb類型：約束表含義：年級代碼表76、表名稱：njkcb類型：約束表含義：年級課程表77、表名稱：njzyb類型：約束表含義：年級專業(yè)表78、表名稱：xkkcb類型：約束表含義：新開課程表79、表名稱：xszcb類型：約束表含義：新生注冊表80、表名稱：xflydmb類型：約束表含義：學(xué)費來源代碼表81、表名稱：xjbddmb類型：約束表含義：學(xué)籍變動代碼表82、表名稱：xjbdjzb類型：約束表含義：學(xué)籍變動記載表83、表名稱：xjztdmb類型：約束表含義：學(xué)籍狀態(tài)代碼表84、表名稱：fzjbytj類型：約束表含義：學(xué)生非在籍和畢業(yè)生統(tǒng)計表85、表名稱：xsjbqkb類型：約束表含義：學(xué)生基本情況表86、表名稱：xsjhcjb類型：約束表含義：學(xué)生計劃成績表87、表名稱：xslbdmb類型：約束表含義：學(xué)生類別代碼表88、表名稱：xslxdmb類型：約束表含義：學(xué)生類型代碼表89、表名稱：xslxdyb類型：約束表含義：學(xué)生類型代碼對應(yīng)表90、表名稱：bjxx表類型：約束表含義：班級信息表字段名稱字段類型Null含義示例數(shù)據(jù)Bjbh整形否,自增主鍵列1Nj字符值英語Bjmc字符名稱信管八班Bjjc字符簡稱8班Rs整形人數(shù)80Bzr字符班主任王91、表名稱：jgdmb表類型：約束表含義：籍貫代碼表字段名稱字段類型Null含義示例數(shù)據(jù)Jgbh整形否,自增主鍵列1Jg字符值XX92、表名稱：mzdmb表類型：約束表含義：民族代碼表字段名稱字段類型Null含義示例數(shù)據(jù)Mzbh整形否,自增主鍵列1Mz字符值漢93、表名稱：zzmmdmb表類型：約束表含義：政治面貌代碼表字段名稱字段類型Null含義示例數(shù)據(jù)Zzmmbh整形否,自增主鍵列1Zzmm字符值94、表名稱：xjdm表類型：約束表含義：學(xué)籍代碼表字段名稱字段類型Null含義示例數(shù)據(jù)Xjbh整形否,自增主鍵列1Xjmc字符值2009765096、表名稱：cjb表類型：約束表含義：成績表字段名稱字段類型Null含義示例數(shù)據(jù)Bh整形否,自增主鍵列1Xh字符值20097650111Kcbh整形課程編號4Cj整形值99Kscs整形值2Sfbx字符是否補修是Sfck字符是否重考是Sfqcj字符確定成績是97、表名稱：xsxx表類型：約束表含義：學(xué)生信息表字段名稱字段類型Null含義示例數(shù)據(jù)Xh整形否,自增主鍵列20097650111Xm字符值張三Bjbh整形班級編號4Xb字符性別男Nj字符年級2009Zzmmbh整形政治面貌編號2Mzbh整形民族編號2Jgbh整形籍貫編號3Sfzh整形身份證號Xjbh整形學(xué)籍編號200998、表名稱：kcxx表類型：約束表含義：課程信息表字段名稱字段類型Null含義示例數(shù)據(jù)Kcbh整形否,自增主鍵列1Kcmc字符值英語Kcjc字符值英語Pym字符值YingyuBxqkc字符值Js字符教師吳Kkxb整形開課系別1Xf整形學(xué)分399、表名稱：kcb表類型：約束表含義：課程表字段名稱字段類型Null含義示例數(shù)據(jù)Bh整形否,自增主鍵列1Kxh字符課序號2Kcbh整形課程編號4Sksjt整形上課時間天Sksjj整形上課時間節(jié)Skdd字符上課地點100、表名稱：xkb表類型：約束表含義：選課表字段名稱字段類型Null含義示例數(shù)據(jù)Bh整形否,自增主鍵列1Xh整形學(xué)號20097650111Kxh整形課序號44.2物理結(jié)構(gòu)設(shè)計系統(tǒng)的物理結(jié)構(gòu)具體由數(shù)據(jù)庫來設(shè)計與生成,故此處略。5.系統(tǒng)出錯處理設(shè)計5.1出錯信息錯誤登錄信息系統(tǒng)提示錯誤登錄信息系統(tǒng)返回登錄界面輸入錯誤的數(shù)據(jù)系統(tǒng)提示數(shù)據(jù)錯誤信息提示重新輸入數(shù)據(jù)打印不成功系統(tǒng)提示打印不成功信息進行重新打印操作5.2補救措施由于數(shù)據(jù)在數(shù)據(jù)庫中已經(jīng)有備份,故在系統(tǒng)出錯后可以依靠數(shù)據(jù)庫的恢復(fù)功能,并且依靠日志文件使系統(tǒng)再啟動,就算系統(tǒng)崩潰數(shù)據(jù)也不會丟失或遭到破壞。但有可能占用更多的數(shù)據(jù)存儲空間,權(quán)衡措施由用戶來決定第5章詳細(xì)設(shè)計說明書1.引言1.1項目定義教務(wù)綜合管理信息系統(tǒng)是為了適應(yīng)現(xiàn)代化學(xué)校管理的需要,加快推進我校數(shù)字化校園建設(shè)、充分利用校園網(wǎng),利用網(wǎng)絡(luò)、多媒體等計算機應(yīng)用技術(shù)和手段,提高辦公效率、改善質(zhì)量的高效管理信息系統(tǒng)。1.2編寫目的本文檔為"教務(wù)管理系統(tǒng)-詳細(xì)設(shè)計說明書",主要用于為實現(xiàn)系統(tǒng)的功能而進行的系統(tǒng)詳細(xì)設(shè)計說明,詳細(xì)系統(tǒng)各軟件組成模塊的實現(xiàn)流程、功能、接口、編譯、測試要點等內(nèi)容,便于對系統(tǒng)的編碼進行指導(dǎo)和約束。1.3.參考資料《教務(wù)管理系統(tǒng)_系統(tǒng)軟件需求說明書》?！督虅?wù)管理系統(tǒng)_系統(tǒng)概要設(shè)計說明書》?！督虅?wù)管理系統(tǒng)_數(shù)據(jù)庫設(shè)計說明書〔數(shù)據(jù)庫字典》等。2.程序系統(tǒng)的結(jié)構(gòu)2.1整個教務(wù)管理系統(tǒng)的結(jié)構(gòu)可由以下圖示來表明：學(xué)生選課選擇操作打印成績單班級信息維護報表統(tǒng)計教學(xué)管理成績輸入課表查詢基礎(chǔ)維護選擇操作學(xué)生選課選擇操作打印成績單班級信息維護報表統(tǒng)計教學(xué)管理成績輸入課表查詢基礎(chǔ)維護選擇操作教務(wù)管理系統(tǒng)教務(wù)管理系統(tǒng)選擇操作選擇操作教師信息維護課程信息維護學(xué)生信息維護教師信息維護課程信息維護學(xué)生信息維護圖1-1系統(tǒng)的總體處理流程3.系統(tǒng)功能實現(xiàn)從前面需求分析可以看出,系統(tǒng)功能龐雜,主要分為前臺瀏覽器<B/S>信息發(fā)布和數(shù)據(jù)查詢,后臺<C/S>數(shù)據(jù)管理和處理,教務(wù)管理功能部分?jǐn)?shù)據(jù)分為四類：學(xué)生基本信息相關(guān)；教師基本信息相關(guān)；課程信息相關(guān)；學(xué)生成績綜合查詢相關(guān)。從使用和操作的功能上分,有三種用戶：該校學(xué)生；業(yè)務(wù)數(shù)據(jù)管理人員〔學(xué)生工作輔導(dǎo)員、教務(wù)干事；系統(tǒng)管理員。為便于整個系統(tǒng)組織管理,把各個相對獨立的數(shù)據(jù)或功能組織到整個大系統(tǒng)中來,我們把各個相對獨立的功能完全獨立設(shè)計,編譯成獨立的目標(biāo)<功能>模塊〔singleExecutable,各功能模塊最后被集成到一個稱為虛擬桌面的控制臺模塊中。相應(yīng)地將系統(tǒng)結(jié)構(gòu)分為一個控制臺程序和七個子系統(tǒng),各子系統(tǒng)又分為若干各子模塊。對應(yīng)于每一個模塊,幾乎都有錄入、查詢、修改、刪除、查看詳細(xì)資料等這幾個功能。整個業(yè)務(wù)流程就是由這幾種基本功能實現(xiàn)的。在這里每個模塊都要用到的功能沒必要在每個子模塊里重復(fù)闡述,在每個子模塊里只列出區(qū)別于其它子模塊的功能實現(xiàn)。3.1系統(tǒng)控制臺模塊功能：各子功能模塊的組織和調(diào)用；統(tǒng)一的登陸界面實現(xiàn)到數(shù)據(jù)庫服務(wù)器的登陸；顯示教務(wù)主頁系統(tǒng)圖標(biāo)。設(shè)計：1.登陸數(shù)據(jù)庫:輸入數(shù)據(jù)庫服務(wù)器名<ServerIP>、用戶賬號<>UserID、密碼<PassWord>；登陸數(shù)據(jù)庫服務(wù)器,檢索系統(tǒng)權(quán)限表,根據(jù)權(quán)限設(shè)置相應(yīng)功能模塊：①無此用戶或禁止權(quán)限Enable=False;②瀏覽權(quán)限Enable=True;修改UserID=;修改PassWord:=;③修改權(quán)限Enable=True;修改UserID=;修改PassWord:=;2.采用WinXP下程序組、程序項的原理組織各執(zhí)行模塊：登陸服務(wù)器基礎(chǔ)維護教學(xué)管理報表統(tǒng)計退出各程序組、程序項的顯示分別可以是分層/樹狀/大圖標(biāo)/小圖標(biāo)等方式；各程序項或菜單項的名稱命名為相應(yīng)功能模塊的目標(biāo)代碼文件名。3.2.各具體模塊如下：模塊1名稱：班級信息維護輸入:班級信息維護處理:維護管理該校各班級基本信息輸出:各班級信息數(shù)據(jù)表:班級信息表模塊2名稱：學(xué)生基本信息維護輸入:學(xué)生基本信息處理:維護管理學(xué)生基本信息輸出:學(xué)生基本信息數(shù)據(jù)表:學(xué)生信息表模塊3名稱：課程信息維護輸入:課程信息維護處理:維護管理課程基本信息輸出:課程信息數(shù)據(jù)表:課程信息表模塊4名稱：學(xué)生選課信息輸入:學(xué)生選課信息處理:維護管理學(xué)生選課信息輸出:學(xué)生選課信息數(shù)據(jù)表:學(xué)生基本信息表課程信息表模塊5名稱：課表查詢輸入:課表查詢處理:維護管理課表查詢信息輸出:所查班級課表數(shù)據(jù)表:學(xué)生基本信息表班級信息表模塊6名稱：成績輸入輸入:成績輸入處理:維護管理成績輸入信息輸出:成績數(shù)據(jù)表:學(xué)生基本信息表課程信息表模塊7名稱：教師信息為維護輸入:教師信息為維護處理:維護管理教師信息輸出:教師信息數(shù)據(jù)表:教師信息表4.具體設(shè)計：設(shè)計功能實現(xiàn)包括：班級信息維護,學(xué)生信息維護,課程信息維護,學(xué)生選課,課表查詢,成績輸入,報表統(tǒng)計,退出系統(tǒng)PublicClassfrmMainInheritsPrivateFunctionGetInstanceState<ByValnameAsString>AsBoolean'獲得frmMain窗體的子窗體的數(shù)量DimiAsInteger=Me.MdiChildren.Length'循環(huán)判斷是否有名為name的子窗體實例Fori=0ToMe.MdiChildren.Length-1IfMe.MdiChildren<i>.Name=nameThen'存在名為name的子窗體,是子窗體獲得焦點并返回TrueMe.MdiChildren<i>.Focus<>ReturnTrueEndIfNext'不存在名為Name的子窗體FalseReturnFalseEndFunctionPrivateSubmnClass_Click<ByValsenderAsSystem.Object,ByValeAsSystem.EventArgs>HandlesmnClass.ClickIfGetInstanceState<"frmClass">ThenExitSubEndIfDimchildFrmAsfrmClass=NewfrmClasschildFrm.MdiParent=MechildFrm.Show<>EndSubPrivateSubmnStudent_Click<ByValsenderAsSystem.Object,ByValeAsSystem.EventArgs>HandlesmnStudent.ClickIfGetInstanceState<"frmStudent">ThenExitSubEndIfDimchildFrmAsfrmStudent=NewfrmStudentchildFrm.MdiParent=MechildFrm.Show<>EndSubPrivateSubmnSubject_Click<ByValsenderAsSystem.Object,ByValeAsSystem.EventArgs>HandlesmnSubject.ClickIfGetInstanceState<"frmSubject">ThenExitSubEndIfDimchildFrmAsfrmSubject=NewfrmSubjectchildFrm.MdiParent=MechildFrm.Show<>EndSubPrivateSubmnSelect_Click<ByValsenderAsSystem.Object,ByValeAsSystem.EventArgs>HandlesmnSelect.ClickIfGetInstanceState<"frmSelect">ThenExitSubEndIfDimchildFrmAsfrmSelect=NewfrmSelectchildFrm.MdiParent=MechildFrm.Show<>EndSubPrivateSubmnCourse_Click<ByValsenderAsSystem.Object,ByValeAsSystem.EventArgs>HandlesmnCourse.ClickIfGetInstanceState<"frmCourse">ThenExitSubEndIfDimchildFrmAsfrmCourse=NewfrmCoursechildFrm.MdiParent=MechildFrm.Show<>EndSubPrivateSubmnResult_Click<ByValsenderAsSystem.Object,ByValeAsSystem.EventArgs>HandlesmnResult.ClickIfGetInstanceState<"frmScore">ThenExitSubEndIfDimchildFrmAsfrmScore=NewfrmScorechildFrm.MdiParent=MechildFrm.Show<>EndSubPrivateSubmnReport_Click<ByValsenderAsSystem.Object,ByValeAsSystem.EventArgs>HandlesmnReport.ClickIfGetInstanceState<"frmReport">ThenExitSubEndIfDimchildFrmAsfrmReport=NewfrmReportchildFrm.MdiParent=MechildFrm.Show<>EndSubPrivateSubmnExit_Click<ByValsenderAsSystem.Object,ByValeAsSystem.EventArgs>HandlesmnExit.ClickEndSubEndClass5.基礎(chǔ)維護：5.1班級信息維護實現(xiàn)的功能包括：查看首記錄：表中首個班級記錄,上記錄,下記錄,查尾記錄,新增,修改,刪除等可實現(xiàn)模糊搜索功能即：輸入班級編號可查詢相關(guān)班級信息如下所示：PublicClassfrmBaseInheritsProtectedbmDataAsBindingManagerBaseProtecteddtDataAsDataTable'bAdd=true為新增'bAdd=false為修改ProtectedbAddAsBooleanPrivateSubfrmBase_Load<ByValsenderAsObject,_ByValeAsSystem.EventArgs>HandlesMyBase.LoadPrepare<>SetDataGrid<>SetTextBoxState<True>EndSubPrivateSubToolBar1_ButtonClick<ByValsenderAsObject,_ByValeAsToolBarButtonClickEventArgs>_HandlesToolBar1.ButtonClickSelectCaseCase"首記錄"'返回首記錄bmData.Position=0Case"上記錄"IfbmData.Position<>0ThenbmData.Position-=1EndIfCase"下記錄"IfbmData.Position<>bmData.CountThenbmData.Position+=1EndIfCase"尾記錄"'返回尾記錄bmData.Position=bmData.CountCase"新增"Me.dgdList.Enabled=FalseSetTextBoxState<False>SetToolBarState<False>bAdd=TrueClear<>Case"修改"Me.dgdList.Enabled=FalseSetTextBoxState<False>SetToolBarState<False>bAdd=FalseCase"刪除"'彈出詢問對話框DimdlgResultAsDialogResult=_MessageBox.Show<"你確認(rèn)刪除此數(shù)據(jù)？",_"刪除",MessageBoxButtons.OKCancel>IfdlgResult=DialogResult.OKThenDeleteData<>EndIfCase"保存"SetToolBarState<True>SetTextBoxState<True>IfbAdd=TrueThen'為新增數(shù)據(jù)保存SaveForAdd<>Else'為更新數(shù)據(jù)保存SaveForUpdate<>EndIfMe.dgdList.Enabled=TrueCase"取消"SetTextBoxState<True>SetToolBarState<True>Me.dgdList.Enabled=TrueSearchResult<>Case"退出"'關(guān)閉本窗體Me.Close<>EndSelectTryMe.dgdList.CurrentRowIndex=bmData.PositionSetData<>CatchexAsExceptionEndTryEndSubPrivateSubbtnSearch_Click<ByValsenderAsSystem.Object,_ByValeAsSystem.EventArgs>HandlesbtnSearch.ClickSearchResult<>EndSubPrivateSubdgdList_CurrentCellChanged<ByValsenderAsObject,_ByValeAsSystem.EventArgs>HandlesdgdList.CurrentCellChangedTry'判斷bmData是否為NothingIfbmDataIsNothingThenExitSubEndIfIfbmData.Position<>dgdList.CurrentCell.RowNumberThenSetData<>EndIfCatchexAsExceptionMessageBox.Show<ex.ToString>EndTryEndSubPrivateSubSetToolBarState<ByValbStateAsBoolean>'設(shè)置Button的是否能夠單擊ToolBar1.Buttons<0>.Enabled=bStateToolBar1.Buttons<1>.Enabled=bStateToolBar1.Buttons<2>.Enabled=bStateToolBar1.Buttons<3>.Enabled=bStateToolBar1.Buttons<4>.Enabled=bStateToolBar1.Buttons<5>.Enabled=bStateToolBar1.Buttons<6>.Enabled=bStateToolBar1.Buttons<7>.Enabled=NotbStateToolBar1.Buttons<8>.Enabled=NotbStateEndSubPublicOverridableSubPrepare<>EndSub'設(shè)置DataGrid控件PublicOverridableSubSetDataGrid<>EndSub'查詢函數(shù)PublicOverridableSubSearchResult<>SetDataGrid<>'dgdList.DataSource=dtData.DefaultViewEndSub'新增函數(shù)PublicOverridableSubLoadData<>EndSubPublicOverridableSubSaveForAdd<>EndSub'更新函數(shù)PublicOverridableSubSaveForUpdate<>EndSub'刪除函數(shù)PublicOverridableSubDeleteData<>EndSub'清除函數(shù)PublicOverridableSubClear<>EndSub'設(shè)置TextBox函數(shù)PublicOverridableSubSetTextBoxState<ByValbStateAsBoolean>EndSubPublicOverridableSubSetData<>EndSubEndClass5.2學(xué)生信息維護實現(xiàn)的功能包括：查看首記錄,上記錄,下記錄,查尾記錄,新增,修改,刪除等可實現(xiàn)模糊搜索功能如下所示：PublicClassfrmStudentInherits教務(wù)管理系統(tǒng).frmBasePublicOverridesSubPrepare<>Me.Text="學(xué)生信息維護"Me.Label1.Text="學(xué)號"Me.Label2.Text="姓名"Me.Label3.Text="年級"'設(shè)置ComboBox控件數(shù)據(jù)源DimdbAsDataBase=NewDataBaseDimdvAsDataView=db.RunSelectSQL_<"select班級編號,班級名稱from班級信息orderby班級名稱">Me.cbbClassId.DataSource=dvMe.cbbClassId.DisplayMember="班級名稱"Me.cbbClassId.ValueMember="班級編號"dv=db.RunSelectSQL_<"select政治面貌編號,政治面貌from政治面貌代碼表">Me.cbbPolity.DataSource=dvMe.cbbPolity.DisplayMember="政治面貌"Me.cbbPolity.ValueMember="政治面貌編號"dv=db.RunSelectSQL<"select民族編號,民族from民族代碼表">Me.cbbNation.DataSource=dvMe.cbbNation.DisplayMember="民族"Me.cbbNation.ValueMember="民族編號"dv=db.RunSelectSQL<"select籍貫編號,籍貫from籍貫代碼表">Me.cbbBirthPlace.DataSource=dvMe.cbbBirthPlace.DisplayMember="籍貫"Me.cbbBirthPlace.ValueMember="籍貫編號"dv=db.RunSelectSQL<"select學(xué)籍編號,學(xué)籍名稱from學(xué)籍代碼表">Me.cbbStatus.DataSource=dvMe.cbbStatus.DisplayMember="學(xué)籍名稱"Me.cbbStatus.ValueMember="學(xué)籍編號"db.Dispose<>EndSubPublicOverridesSubLoadData<>DimstrFilterAsStringIftxbOne.Text.Trim.Length=0ThenIftxbTwo.Text.Trim.Length=0ThenIftxbThree.Text.Trim.Length=0ThenstrFilter=""ElsestrFilter="where年級like'"strFilter+=txbThree.Text.Trim+"%'"EndIfElsestrFilter="where姓名like'"strFilter+=txbTwo.Text.Trim+"%'"Ifth<>0ThenstrFilter+="and年級like'"strFilter+=txbThree.Text.Trim+"%'"EndIfEndIfElsestrFilter="where學(xué)號like'"im+"%'"IftxbTwo.Text.Trim.Length<>0ThenstrFilter+="and姓名like'"strFilter+=txbTwo.Text.Trim+"%'"IftxbThree.Text.Trim.Length<>0ThenstrFilter+="and年級like'"strFilter+=txbThree.Text.Trim+"%'"EndIfElseIftxbThree.Text.Trim.Length<>0ThenstrFilter+="and年級like'"rim+"%'"EndIfEndIfEndIf'清空DataSet11DataSet11.Clear<>SqlConnection1.ConnectionString=DataBase.sConnDimstrSQLAsStringSqlDataAdapter1.SelectCommand.CommandText_="select*from學(xué)生信息"+strFilter'根據(jù)查詢條件重新填充DataSet11SqlDataAdapter1.Fill<DataSet11>dtData=DataSet11.Tables<"學(xué)生信息">IfdtData.Columns.Count<15ThendtData.Columns.Add<"班級">dtData.Columns.Add<"政治面貌">dtData.Columns.Add<"民族">dtData.Columns.Add<"籍貫">dtData.Columns.Add<"學(xué)籍">EndIfbmData=Me.BindingContext<DataSet11,"學(xué)生信息">IfbmData.Count<>0ThenbmData.Position=0EndIfEndSubPublicOverridesSubSetDataGrid<>LoadData<>'定義一個DataGrid表樣式DimtsAsNewDataGridTableStyleDimaColumnTextColumnAsDataGridTextBoxColumnDimnumColsAsInteger=dtData.Columns.CountDimiAsIntegerFori=0TonumCols-1'Ifi=6Then'i=10'EndIfaColumnTextColumn=NewDataGridTextBoxColumnaColumnTextColumn.MappingName=_dtData.Columns<i>.ColumnNameaColumnTextColumn.HeaderText=_dtData.Columns<i>.ColumnNameaColumnTextColumn.NullText=""aColumnTextColumn.ReadOnly=True'aColumnTextColumn.Width=55ts.GridColumnStyles.Add<aColumnTextColumn>Nextts.AlternatingBackColor=Color.LightGrayts.AllowSorting=Falsets.MappingName=dtData.TableNamedgdList.TableStyles.Clear<>dgdList.TableStyles.Add<ts>DimdvAsDataView=dtData.DefaultViewdv.AllowNew=Falsedv.AllowDelete=False'dv.AllowEdit=False'設(shè)置數(shù)據(jù)源dgdList.DataSource=dtData.DefaultViewbmData=Me.BindingContext<DataSet11,"學(xué)生信息">lblCount.Text="記錄數(shù):"+dtData.Rows.Count.ToString<>SetDetailData<>EndSubPrivateSubSetDetailData<>DimdtClassId,dtPolity,dtNation,_dtBirthPlace,dtStatusAsDataTableDimdbAsDataBase=NewDataBasedtClassId=db.RunSelectSQL_<"select班級編號,班級名稱from班級信息orderby班級名稱">.TabledtPolity=db.RunSelectSQL_<"select政治面貌編號,政治面貌from政治面貌代碼表">.TabledtNation=db.RunSelectSQL_<"select民族編號,民族from民族代碼表">.TabledtBirthPlace=db.RunSelectSQL_<"select籍貫編號,籍貫from籍貫代碼表">.TabledtStatus=db.RunSelectSQL_<"select學(xué)籍編號,學(xué)籍名稱from學(xué)籍代碼表">.TableDimdvAsDataViewForiAsInteger=0TodtData.Rows.Count-1dv=dtClassId.DefaultViewdv.RowFilter="班級編號='"+dtData.Rows<i><"班級編號">+"'"dtData.Rows<i><"班級">=dv<0><1>dv=dtPolity.DefaultViewdv.RowFilter="政治面貌編號='"+dtData.Rows<i><"政治面貌編號">+"'"dtData.Rows<i><"政治面貌">=dv<0><1>dv=dtNation.DefaultViewdv.RowFilter="民族編號='"+dtData.Rows<i><"民族編號">+"'"dtData.Rows<i><"民族">=dv<0><1>dv=dtBirthPlace.DefaultViewdv.RowFilter="籍貫編號='"+dtData.Rows<i><"籍貫編號">+"'"dtData.Rows<i><"籍貫">=dv<0><1>dv=dtStatus.DefaultViewdv.RowFilter="學(xué)籍編號='"+dtData.Rows<i><"學(xué)籍編號">+"'"dtData.Rows<i><"學(xué)籍">=dv<0><1>NextEndSubPublicOverridesSubSetTextBoxState<ByValbStateAsBoolean>Me.GroupBox1.Enabled=NotbStateEndSubPublicOverridesSubClear<>Me.txbClassId.Text=""Me.txbGrade.Text=""Me.txbName.Text=""Me.txbPID.Text=""Me.cbbBirthPlace.Text=""Me.cbbClassId.Text=""Me.cbbNation.Text=""Me.cbbPolity.Text=""Me.cbbSex.Text=""Me.cbbStatus.Text=""EndSubPublicOverridesSubSaveForAdd<>DimdrAsDataRow=DataSet11.Tables<"學(xué)生信息">.NewRow<>Trydr<"學(xué)號">=Medr<"姓名">=Medr<"年級">=Medr<"性別">=Medr<"年級">=Medr<"身份證號">=Medr<"政治面貌編號">=Me.cbbPolity.SelectedValuedr<"民族編號">=Me.cbbNation.SelectedValuedr<"籍貫編號">=Me.cbbBirthPlace.SelectedValuedr<"班級編號">=Me.cbbClassId.SelectedValuedr<"學(xué)籍編號">=Me.cbbStatus.SelectedValueCatchexAsExceptionMessageBox.Show<"數(shù)據(jù)格式不正確！">ReturnEndTryTryDataSet11.Tables<"學(xué)生信息">.Rows.Add<dr>IfMe.DataSet11.HasChanges=TrueThenSqlDataAdapter1.Update<DataSet11>EndIfCatchexAsExceptionMessageBox.Show<ex.ToString>'<"數(shù)據(jù)添加失敗!">EndTryLoadData<>dgdList.DataSource=dtData.DefaultViewEndSubPublicOverridesSubDeleteData<>Try'刪除當(dāng)前行的數(shù)據(jù)DataSet11.Tables<"學(xué)生信息">._Rows<bmData.Position>.Delete<>IfMe.DataSet11.HasChanges=TrueThen'更新DataSet11SqlDataAdapter1.Update<DataSet11>EndIfCatchexAsExceptionMessageBox.Show<"數(shù)據(jù)刪除失敗!">EndTryEndSubPublicOverridesSubSaveForUpdate<>TryDimrowAsIntegerrow=dgdList.CurrentCell=_NewDataGridCell<<row+1>ModbmData.Count,0>'判斷是否有更新的數(shù)據(jù)IfMe.DataSet11.HasChanges=TrueThenSqlDataAdapter1.Update<DataSet11>EndIfCatchexAsExceptionMessageBox.Show<"數(shù)據(jù)修改失敗!">EndTryEndSubPrivateSubfrmStudent_Load<ByValsenderAsSystem.Object,ByValeAsSystem.EventArgs>HandlesMyBase.LoadEndSubEndClass5.3課程信息維護實現(xiàn)的功能包括：查看首記錄：表中首個班級記錄,上記錄,下記錄,查尾記錄,新增,修改,刪除等可實現(xiàn)模糊搜索功能如下所示：PublicClassfrmSelectInheritsPrivatedtDataAsDataTablePrivatedtSubjectAsDataTablePrivateSubbtnSearch_Click<ByValsenderAsSystem.Object,_ByValeAsSystem.EventArgs>HandlesbtnSearch.ClickSetDGDSubject<>EndSubPrivateSubbtnSelect_Click<ByValsenderAsSystem.Object,_ByValeAsSystem.EventArgs>HandlesbtnSelect.ClickIfdgdList.CurrentCell.RowNumber=-1Or_dgdSubject.CurrentCell.RowNumber=-1ThenExitSubEndIfDimdbAsDataBase=NewDataBaseDimdvAsDataViewDimstrSQLAsString=""DimstrTmpAsString=dtSubject._Rows<dgdSubject.CurrentCell.RowNumber><1>.ToString.Trim<>strSQL="select*from選課表where學(xué)號='"strSQL+="'and課序號in<select課序號from課程表where課程編號='"strSQL+=strTmp+"'>"dv=db.RunSelectSQL<strSQL>Ifdv.Count<>0ThenMessageBox.Show<"該課程已經(jīng)選擇！">db.Dispose<>ExitSubEndIfDimstrCIdAsString=dtSubject._Rows<dgdSubject.CurrentCell.RowNumber><0>.ToString.Trim<>strSQL="select*from選課表asa,課程表asb"strSQL+="wherea.課序號=b.課序號anda.學(xué)號='"strSQL+=txbId.Text.Trim+"'and100*b.上課時間天+"strSQL+="b.上課時間節(jié)in<select100*上課時間天+上課時間節(jié)"strSQL+="from課程表where課序號='"+strCId+"'>"dv=db.RunSelectSQL<strSQL>Ifdv.Count<>0ThenMessageBox.Show<"該課序號時間和已經(jīng)選擇的課程沖突！">ExitSubElsestrSQL="insertinto選課表<學(xué)號,課序號>values<'"strSQL+=txbId.Text.Trim+"','"+strCId+"'>"db.RunDelOrInsSQL<strSQL>strSQL="selectc.學(xué)號,a.課序號,b.課程名稱,b.教師,b.開課系別,"strSQL+="a.上課時間天,a.上課時間節(jié),a.上課地點from選課表"strSQL+="asc,課程表asa,課程信息asbwhere"strSQL+="a.課程編號=b.課程編號andc.課序號=a.課序號and學(xué)號='"strSQL+=txbId.Text.Trim+"'orderbya.課序號"dv=db.RunSelectSQL<strSQL>dv.AllowDelete=Falsedv.AllowEdit=Falsedv.AllowNew=FalsedtData=dv.TableMe.dgdList.DataSource=dtDataEndIfdb.Dispose<>EndSubPrivateSubbtnDel_Click<ByValsenderAsSystem.Object,_ByValeAsSystem.EventArgs>HandlesbtnDel.ClickIfMe.dgdList.CurrentCell.RowNumber=-1ThenExitSubEndIfDimdlgResultAsDialogResult=MessageBox._Show<"確定刪除指定的已選課程嗎?","提示",_MessageBoxButtons.YesNo>IfdlgResult=DialogResult.YesThenDimstrCIdAsString=dtData._Rows<dgdList.CurrentCell.RowNumber><1>.ToString.Trim<>DimstrSQLAsString="deletefrom選課表where學(xué)號='"strSQL+=MestrSQL+="'and課序號='"+strCId+"'"DimdbAsDataBase=NewDataBasedb.RunDelOrInsSQL<strSQL>DimdvAsDataViewstrSQL="selectc.學(xué)號,a.課序號,b.課程名稱,b.教師,b.開課系別,"strSQL+="a.上課時間天,a.上課時間節(jié),a.上課地點from選課表"strSQL+="asc,課程表asa,課程信息asbwhere"strSQL+="a.課程編號=b.課程編號andc.課序號=a.課序號"strSQL+="and學(xué)號='"+txbId.Text.Trim+"'orderbya.課序號"dv=db.RunSelectSQL<strSQL>dv.AllowDelete=Falsedv.AllowEdit=Falsedv.AllowNew=FalsedtData=dv.TableMe.dgdList.DataSource=dtDatadb.Dispose<>EndIfEndSubPrivateSubbtnDisplay_Click<ByValsenderAsSystem.Object,_ByValeAsSystem.EventArgs>HandlesbtnDisplay.ClickDimdlgChildAsfrmCourse=NewfrmCoursedlgChild.Show<>EndSubPrivateSubtxbId_KeyDown<ByValsenderAsObject,_ByValeAsSystem.Windows.Forms.KeyEventArgs>HandlestxbId.KeyDownIfe.KeyCode=Keys.EnterAndtxbId.Text.Trim.Length<>0ThenDimdbAsDataBase=NewDataBaseDimstrSQLAsString=""strSQL="select姓名,班級名稱,學(xué)籍編號from學(xué)生信息asa,"strSQL+="班級信息asbwherea.班級編號=b.班級編號"strSQL+="and學(xué)號='"+Me.txbId.Text.Trim+"'"DimdvAsDataView=db.RunSelectSQL<strSQL>Ifdv.Count=0ThenMessageBox.Show<"不是在籍的學(xué)生">Me.txbId.Text=""ElseMe.txbName.Text=dv<0><0>.ToString.TrimMe.txbGrade.Text=dv<0><1>.ToString.TrimEndIfstrSQL="selectc.學(xué)號,a.課序號,b.課程名稱,b.教師,b.開課系別,"strSQL+="a.上課時間天,a.上課時間節(jié),a.上課地點from選課表"strSQL+="asc,課程表asa,課程信息asbwherea.課程編號"strSQL+="=b.課程編號andc.課序號=a.課序號and學(xué)號='"strSQL+="'orderbya.課序號"dv=db.RunSelectSQL<strSQL>Ifdv.Count=0ThenMessageBox.Show<"不是在籍的學(xué)生">Me.txbId.Text=""Elsedv.AllowDelete=Falsedv.AllowEdit=Falsedv.AllowNew=False