1、 概要設計說明書1. 總體設計1.1 需求規(guī)定教務管理系統(tǒng)可分為學生信息管理系統(tǒng)和教師管理信息系統(tǒng)，系統(tǒng)開發(fā)的整體任務是實現學校教師和學生信息管理的系統(tǒng)化、規(guī)范化、自動化和智能化，從而達到提高學校管理效率的目的。本階段目的在于明確系統(tǒng)的數據結構和軟件結構，此外總體設計還將給出內部軟件和外部系統(tǒng)部件之間的接口定義，各個軟件模塊的功能說明，數據結構的細節(jié)以及具體的裝配要求。1.2 運行環(huán)境軟件基本運行環(huán)境為Windows XP環(huán)境。1.3 基本設計概念和處理流程概要說明書的目的在于明確系統(tǒng)的數據結構和軟件結構，設計外部軟件和內部軟件的接口，說明各個軟件模塊的功能說明，數據結構的細節(jié)等。系統(tǒng)的總體處

2、理流程如圖1-1所示： 學生選課選擇操作打印成績單班級信息維護報表統(tǒng)計教學管理成績輸入課表查詢基礎維護選擇操作教務管理系統(tǒng) 選擇操作教師信息維護課程信息維護學生信息維護圖1-1 系統(tǒng)的總體處理流程1.4 系統(tǒng)體系結構用一覽表及框圖的形式說明本系統(tǒng)的系統(tǒng)元素（各層模塊、子程序、公用程序等）的劃分，扼要說明每個系統(tǒng)元素的標識符和功能，分層次地給出各元素之間的控制與被控制關系。本系統(tǒng)的體系架構如圖1-2所示：圖1-2 系統(tǒng)體系架構本系統(tǒng)體系結構大致可以定義為：客戶機層上的表示層主要是通過Struts框架實現的，由顯示視圖產生一個請求。 請求被ActionServlet（控制器）接收，它在struts

3、-config.xml文件中尋找請求的URI，找到對應的Action類后，Action類執(zhí)行相應的業(yè)務邏輯。Action類執(zhí)行建立在模型組件基礎上的業(yè)務邏輯，模型組件是和應用程序關聯的。一旦Action類處理完業(yè)務邏輯，它把控制權返回給ActionServlet，Action類提供一個鍵值作為返回的一部分，它指明了處理的結果。ActionServlet使用這個鍵值來決定在什么視圖中顯示Action的類處理結果。當ActionServlet把Action類的處理結果傳送到指定的視圖中，請求的過程也就完成了。中間業(yè)務層是通過Spring框架實現的，首先建立一個BaseAction,它繼承了Acti

4、on類，而其他定義的Action都要繼承這個BaseAction。這個BaseAction需要導入AppContext工具類，這個AppContext需要導入Spring中org.springframework.context.support.*；這樣一個繼承BaseAction的Action，就可以getXXXService()的方法得到某一個service的實例-服務定位器的設計模式。持久（PO）層是由hibernate架構實現的，它包括關于整體數據庫的hibernate.cfg.xml文件、每個表的JavaBean類和每個表的hbm.xml文件，通過Spring集成模板Hibernate

5、Template提供DAO 來使用PO。在Spring 的配置文件（applicationContext.xml）中配置sessionFactory的bean 來管理hibernate。管理員登陸 業(yè)務調度 班信維護課信維護 學信維護?師信維護學生選課成績輸入?DAO組件XML解析數據連接持久實體課表查詢本系統(tǒng)組件圖如圖1-3所示2. 接口設計2.1 用戶接口用戶接口語法結構軟件回答信息教務系統(tǒng)管理員登錄以英文和漢字開頭，不超過6個字符進入主界面信息管理相關操作進行相應的操作3. 運行設計3.1 運行模塊組合具體軟件的運行模塊組合為程序多窗口的運行環(huán)境，各個模塊在軟件運行過程中能較好

6、的交換信息，處理數據。3.2 運行控制軟件運行時有較友好的界面，基本能夠實現用戶的數據處理要求。3.3 運行時間系統(tǒng)的運行時間基本可以達到要求。4. 系統(tǒng)數據結構 4.1 邏輯設計教務管理系統(tǒng)E-R圖選課表FK1PK 編號學號課序號PK課程名稱課程簡稱拼音碼本學期課程教師開課系別年份課程表PK 編號4.2 邏輯結構設計表1、表名稱：bkb 表類型：約束表 含義：班級報考表字段名稱字段類型Null含義示例數據id整形否，自增主鍵列1name字符值八班2、表名稱：cjb 表類型：約束表 含義：班級成績表（打印表）字段名稱字段類型Null含義示例數據id整形否，自增主鍵列1cjb_id整形否外鍵列1

7、name字符值八班3、表名稱：jhcjb 表類型：約束表 含義：班級計劃成績表（顯示和打印）字段名稱字段類型Null含義示例數據id整形否，自增主鍵列1name字符值八班4、表名稱：hks 表類型：約束表 含義：班計劃學期考試課程表字段名稱字段類型Null含義示例數據id整形否，自增主鍵列1fangguansuo_id整形否外鍵列1name字符值長三5、表名稱：hxq 表類型：約束表 含義：班計劃學期課程開設表字段名稱字段類型Null含義示例數據id整形否，自增主鍵列1name字符值英語fenshu整形分數46、表名稱：xjh 表類型：約束表 含義：班教學計劃信息表參見 bkb 表7、表名稱：

8、xxb 表類型：約束表 含義：班注冊和檔案表參見 bkb 表8、表名稱：kbpdfb 表類型：約束表 含義：報考編排登分表參見bkb 表9、表名稱：ctdmkb_tmp 表類型：約束表 含義：畢業(yè)課程替代免考表參見 cjb 表10、表名稱：ctdmkb 表類型：約束表 含義：畢業(yè)課程替代免考表參見 cjb 表11、表名稱：ysmdb 表類型：約束表 含義：畢業(yè)生名單參見 cjb 表12、表名稱：ycymdb 表類型：約束表 含義：畢業(yè)預審審核差異名單表參見 cjb 表13、表名稱：yyshsdfb 表類型：約束表 含義：畢業(yè)預審審核得分表參見 ycymdb 表14、 表名稱：yyshsdfb_

9、tmp 表類型：實體表 含義：畢業(yè)預審審核得分表字段名稱字段類型Null含義示例數據id整形否，自增主鍵列zhaidihao字符宅第號zhuanghao字符幢號diquleibie字符地區(qū)類別限定：一類/二類/三類chanbie字符產別限定：直管/自管/托管chanquanzhenghao字符產權證號jiuqu整形舊區(qū)約束表：qujiuxiaoqu整形舊小區(qū)約束表：xiaoqujiulouhao字符舊樓號xinqu整形新區(qū)約束表：quxinxiaoqu整形新小區(qū)約束表：xiaoquxinlouhao字符新樓號jiegou整形結構約束表：jiegouzongcengshu整形總層數15、表名稱：

10、gdw 類型：約束表 含義：采購單位16、表名稱：gdwdhzz 類型：約束表 含義：采購單位到貨總賬17、表名稱：gdwzz 類型：約束表 含義：采購總賬18、表名稱：gdhmxb 類型：約束表 含義：采購到貨明細表19、表名稱：gdhmxml 類型：約束表 含義：采購到貨明細目錄20、表名稱：gmxb 類型：約束表 含義：采購明細表21、表名稱：gzb 類型：約束表 含義：采購總表22、表名稱：cjdmb 類型：約束表 含義：成績代碼表23、表名稱：cjgdb 類型：約束表 含義：成績更動表24、表名稱：cjtjb 類型：約束表 含義：成績統(tǒng)計表25、表名稱：cjzb 類型：約束表 含義：

11、成績總表26、表名稱：cjzb_copy 類型：約束表 含義：成績總表27、表名稱：dgdw 類型：約束表 含義：訂購單位28、表名稱：dgdwmxb 類型：約束表 含義：訂購單位明細表29、表名稱：dgmxb 類型：約束表 含義：訂購明細表30、表名稱：dgzb 類型：約束表 含義：訂購總表31、表名稱：fxzyb 類型：約束表 含義：輔修專業(yè)表32、表名稱：jhkkkcb 類型：約束表 含義：計劃開考課程表33、表名稱：jhkkkcb 類型：約束表 含義：計劃開考課程傳遞表34、表名稱：jljb 類型：約束表 含義：獎勵級別表35、表名稱：jlqkjzb 類型：約束表 含義：獎勵情況記載表

12、36、表名稱：jccgfdml 類型：約束表 含義：教材采購分單目錄37、表名稱：jccgjsb 類型：約束表 含義：教材采購計算表38、表名稱：jccgmxb 類型：約束表 含義：教材采購明細表39、表名稱：jccgshb 類型：約束表 含義：教材采購審核表40、表名稱：jcch 類型：約束表 含義：教材冊號41、表名稱：jcdgzb 類型：約束表 含義：教材訂購總表42、表名稱：jclxbmdz 類型：約束表 含義：教材類型編碼對照43、表名稱：jcsmmb 類型：約束表 含義：教材說明模板44、表名稱：jcthzt 類型：約束表 含義：教材替換狀態(tài)45、表名稱：dgdwzb 類型：約束表

13、 含義：教材征訂訂購單位總表46、表名稱：jczb 類型：約束表 含義：教材總表47、表名稱：jxbm 類型：約束表 含義：教學部門表48、表名稱：jxdg 類型：約束表 含義：教學大綱49、表名稱：jxhjdy 類型：約束表 含義：教學環(huán)節(jié)定義50、表名稱：kkdw 類型：約束表 含義：開課單位表51、表名稱：kcqkb 類型：約束表 含義：考場情況表52、表名稱：kdxxb 類型：約束表 含義：考點代碼表53、表名稱：kslb 類型：約束表 含義：考生類別代碼表54、表名稱：ksdmb 類型：約束表 含義：考試代碼表55、表名稱：ksdmcd 類型：約束表 含義：考試代碼傳遞表56、表名稱

14、：ksdxb 類型：約束表 含義：考試對象表57、表名稱：ksfsdm 類型：約束表 含義：考試方式代碼表58、表名稱：kslxdmb 類型：約束表 含義：考試類型代碼表59、表名稱：kccc 類型：約束表 含義：課程層次代碼表60、表名稱：kcgldw 類型：約束表 含義：課程管理單位61、表名稱：kcjsfs 類型：約束表 含義：課程建設方式62、表名稱：kcjsjb 類型：約束表 含義：課程建設級別表63、表名稱：kcjslb 類型：約束表 含義：課程建設類別64、表名稱：kcjcdzb 類型：約束表 含義：課程教材對照65、表名稱：kclb 類型：約束表 含義：課程類別代碼表66、表名

15、稱：kctdb 類型：約束表 含義：課程替代表67、表名稱：kcxz 類型：約束表 含義：課程性質代碼表68、表名稱：kczb 類型：約束表 含義：課程總表69、表名稱：ljhkcb 類型：約束表 含義：類計劃課程表70、表名稱：ljhxqks 類型：約束表 含義：類計劃學期開設課程表71、表名稱：ljhxqksb 類型：約束表 含義：類計劃學期考試課程表72、表名稱：ljxjhb 類型：約束表 含義：類教學計劃表73、表名稱：mzdmb 類型：約束表 含義：民族代碼表74、表名稱：ndszb 類型：約束表 含義：年度收支表75、表名稱：njdmb 類型：約束表 含義：年級代碼表76、表名稱：

16、njkcb 類型：約束表 含義：年級課程表77、表名稱：njzyb 類型：約束表 含義：年級專業(yè)表78、表名稱：xkkcb 類型：約束表 含義：新開課程表79、表名稱：xszcb 類型：約束表 含義：新生注冊表80、表名稱：xflydmb 類型：約束表 含義：學費來源代碼表81、表名稱：xjbddmb 類型：約束表 含義：學籍變動代碼表82、表名稱：xjbdjzb 類型：約束表 含義：學籍變動記載表83、表名稱：xjztdmb 類型：約束表 含義：學籍狀態(tài)代碼表84、表名稱：fzjbytj 類型：約束表 含義：學生非在籍和畢業(yè)生統(tǒng)計表85、表名稱：xsjbqkb 類型：約束表 含義：學生基本情

17、況表86、表名稱：xsjhcjb 類型：約束表 含義：學生計劃成績表87、表名稱：xslbdmb 類型：約束表 含義：學生類別代碼表88、表名稱：xslxdmb 類型：約束表 含義：學生類型代碼表89、表名稱：xslxdyb 類型：約束表 含義：學生類型代碼對應表90、表名稱：bjxx 表類型：約束表 含義：班級信息表字段名稱字段類型Null含義示例數據Bjbh整形否，自增主鍵列1Nj字符值英語Bjmc字符名稱信管八班Bjjc字符簡稱8班Rs整形人數80Bzr字符班主任王91、表名稱：jgdmb 表類型：約束表 含義：籍貫代碼表字段名稱字段類型Null含義示例數據Jgbh整形否，自增主鍵列1J

18、g字符值鄭州92、表名稱：mzdmb 表類型：約束表 含義：民族代碼表字段名稱字段類型Null含義示例數據Mzbh整形否，自增主鍵列1Mz字符值漢93、表名稱：zzmmdmb 表類型：約束表 含義：政治面貌代碼表字段名稱字段類型Null含義示例數據Zzmmbh整形否，自增主鍵列1Zzmm字符值94、表名稱：xjdm 表類型：約束表 含義：學籍代碼表字段名稱字段類型Null含義示例數據Xjbh整形否，自增主鍵列1Xjmc字符值2009765096、表名稱：cjb 表類型：約束表 含義：成績表字段名稱字段類型Null含義示例數據Bh整形否，自增主鍵列1Xh字符值20097650111Kcbh整形課

19、程編號4Cj整形值99Kscs整形值2Sfbx字符是否補修是Sfck字符是否重考是Sfqcj字符確定成績是97、表名稱：xsxx 表類型：約束表 含義：學生信息表字段名稱字段類型Null含義示例數據Xh整形否，自增主鍵列20097650111Xm字符值張三Bjbh整形班級編號4Xb字符性別男Nj字符年級2009Zzmmbh整形政治面貌編號2Mzbh整形民族編號2Jgbh整形籍貫編號3Sfzh整形身份證號Xjbh整形學籍編號200998、表名稱：kcxx 表類型：約束表 含義：課程信息表字段名稱字段類型Null含義示例數據Kcbh整形否，自增主鍵列1Kcmc字符值英語Kcjc字符值英語Pym字符

20、值YingyuBxqkc字符值Js字符教師吳Kkxb整形開課系別1Xf整形學分399、表名稱：kcb 表類型：約束表 含義：課程表字段名稱字段類型Null含義示例數據Bh整形否，自增主鍵列1Kxh字符課序號2Kcbh整形課程編號4Sksjt整形上課時間天Sksjj整形上課時間節(jié)Skdd字符上課地點100、表名稱：xkb 表類型：約束表 含義：選課表字段名稱字段類型Null含義示例數據Bh整形否，自增主鍵列1Xh整形學號20097650111Kxh整形課序號44.2 物理結構設計系統(tǒng)的物理結構具體由數據庫來設計與生成，故此處略。5. 系統(tǒng)出錯處理設計5.1 出錯信息錯誤登錄信息系統(tǒng)提示錯誤登錄信

21、息系統(tǒng)返回登錄界面輸入錯誤的數據系統(tǒng)提示數據錯誤信息提示重新輸入數據打印不成功系統(tǒng)提示打印不成功信息進行重新打印操作5.2 補救措施由于數據在數據庫中已經有備份，故在系統(tǒng)出錯后可以依靠數據庫的恢復功能，并且依靠日志文件使系統(tǒng)再啟動，就算系統(tǒng)崩潰數據也不會丟失或遭到破壞。但有可能占用更多的數據存儲空間，權衡措施由用戶來決定 第5章 詳細設計說明書1. 引言1.1 項目定義教務綜合管理信息系統(tǒng)是為了適應現代化學校管理的需要，加快推進我校數字化校園建設、充分利用校園網，利用網絡、多媒體等計算機應用技術和手段，提高辦公效率、改善質量的高效管理信息系統(tǒng)。 1.2 編寫目的本文檔為“教務管理系統(tǒng)-詳細設計

22、說明書”，主要用于為實現系統(tǒng)的功能而進行的系統(tǒng)詳細設計說明，詳細系統(tǒng)各軟件組成模塊的實現流程、功能、接口、編譯、測試要點等內容，便于對系統(tǒng)的編碼進行指導和約束。1.3. 參考資料教務管理系統(tǒng)_系統(tǒng)軟件需求說明書。教務管理系統(tǒng)_系統(tǒng)概要設計說明書。教務管理系統(tǒng)_數據庫設計說明書（數據庫字典）等。2. 程序系統(tǒng)的結構2.1整個教務管理系統(tǒng)的結構可由以下圖示來表明： 學生選課選擇操作打印成績單班級信息維護報表統(tǒng)計教學管理成績輸入課表查詢基礎維護選擇操作教務管理系統(tǒng) 選擇操作教師信息維護課程信息維護學生信息維護圖1-1 系統(tǒng)的總體處理流程 3. 系統(tǒng)功能實現從前面需求分析可以看出，系統(tǒng)功能龐雜，主要分

23、為前臺瀏覽器(B/S)信息發(fā)布和數據查詢，后臺(C/S)數據管理和處理，教務管理功能部分數據分為四類：學生基本信息相關；教師基本信息相關；課程信息相關； 學生成績綜合查詢相關。從使用和操作的功能上分，有三種用戶：該校學生；業(yè)務數據管理人員（學生工作輔導員、教務干事）；系統(tǒng)管理員。為便于整個系統(tǒng)組織管理，把各個相對獨立的數據或功能組織到整個大系統(tǒng)中來，我們把各個相對獨立的功能完全獨立設計，編譯成獨立的目標(功能)模塊（single Executable），各功能模塊最后被集成到一個稱為虛擬桌面的控制臺模塊中。相應地將系統(tǒng)結構分為一個控制臺程序和七個子系統(tǒng)，各子系統(tǒng)又分為若干各子模塊。對應于每一個

24、模塊，幾乎都有錄入、查詢、修改、刪除、查看詳細資料等這幾個功能。整個業(yè)務流程就是由這幾種基本功能實現的。在這里每個模塊都要用到的功能沒必要在每個子模塊里重復闡述，在每個子模塊里只列出區(qū)別于其它子模塊的功能實現。3.1 系統(tǒng)控制臺模塊功能：各子功能模塊的組織和調用；統(tǒng)一的登陸界面實現到數據庫服務器的登陸；顯示教務主頁 系統(tǒng)圖標。設計：1. 登陸數據庫:輸入數據庫服務器名(ServerIP)、用戶賬號()UserID、密碼(PassWord)； 登陸數據庫服務器，檢索系統(tǒng)權限表，根據權限設置相應功能模塊：無此用戶或禁止權限Enable = False;瀏覽權限Enable = True;修改 Us

25、er ID= ;修改 Pass Word := ;修改權限Enable = True;修改 User ID = ;修改 Pass Word := ;2. 采用WinXP 下程序組、程序項的原理組織各執(zhí)行模塊：登陸服務器 基礎維護 教學管理報表統(tǒng)計退出各程序組、程序項的顯示分別可以是分層/樹狀/大圖標/小圖標等方式；各程序項或菜單項的名稱命名為相應功能模塊的目標代碼文件名。3.2. 各具體模塊如下： 模塊1名稱：班級信息維護輸入: 班級信息維護處理: 維護管理該校各班級基本信息輸出: 各班級信息 數據表:班級信息表模塊2名稱：學生基本信息維護輸入:學生基本信息處理: 維護管理學生基本信息輸出:

26、學生基本信息 數據表:學生信息表模塊3名稱：課程信息維護輸入: 課程信息維護處理: 維護管理課程基本信息輸出: 課程信息 數據表:課程信息表模塊4名稱：學生選課信息輸入:學生選課信息處理: 維護管理學生選課信息輸出: 學生選課信息 數據表:學生基本信息表課程信息表模塊5名稱：課表查詢輸入:課表查詢處理: 維護管理課表查詢信息輸出:所查班級課表 數據表:學生基本信息表班級信息表模塊6名稱：成績輸入輸入:成績輸入處理: 維護管理成績輸入信息輸出:成績 數據表:學生基本信息表課程信息表模塊7名稱：教師信息為維護輸入: 教師信息為維護處理: 維護管理教師信息輸出: 教師信息 數據表:教師信息表 4.

27、具體設計：設計功能實現包括：班級信息維護，學生信息維護，課程信息維護，學生選課，課表查詢，成績輸入，報表統(tǒng)計，退出系統(tǒng)Public Class frmMain Inherits Private Function GetInstanceState(ByVal name As String) As Boolean '獲得frmMain窗體的子窗體的數量 Dim i As Integer = Me.MdiChildren.Length '循環(huán)判斷是否有名為name的子窗體實例 For i = 0 To Me.MdiChildren.Length - 1 If Me.MdiChildr

28、en(i).Name = name Then '存在名為name的子窗體，是子窗體獲得焦點并返回True Me.MdiChildren(i).Focus() Return True End If Next '不存在名為Name的子窗體False Return False End Function Private Sub mnClass_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles mnClass.Click If GetInstanceState("frmClass&

29、quot;) Then Exit Sub End If Dim childFrm As frmClass = New frmClass childFrm.MdiParent = Me childFrm.Show() End Sub Private Sub mnStudent_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles mnStudent.Click If GetInstanceState("frmStudent") Then Exit Sub End If Dim chi

30、ldFrm As frmStudent = New frmStudent childFrm.MdiParent = Me childFrm.Show() End Sub Private Sub mnSubject_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles mnSubject.Click If GetInstanceState("frmSubject") Then Exit Sub End If Dim childFrm As frmSubject = New frmSu

31、bject childFrm.MdiParent = Me childFrm.Show() End Sub Private Sub mnSelect_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles mnSelect.Click If GetInstanceState("frmSelect") Then Exit Sub End If Dim childFrm As frmSelect = New frmSelect childFrm.MdiParent = Me childF

32、rm.Show() End Sub Private Sub mnCourse_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles mnCourse.Click If GetInstanceState("frmCourse") Then Exit Sub End If Dim childFrm As frmCourse = New frmCourse childFrm.MdiParent = Me childFrm.Show() End Sub Private Sub mnResu

33、lt_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles mnResult.Click If GetInstanceState("frmScore") Then Exit Sub End If Dim childFrm As frmScore = New frmScore childFrm.MdiParent = Me childFrm.Show() End Sub Private Sub mnReport_Click(ByVal sender As System.Object,

34、 ByVal e As System.EventArgs) Handles mnReport.Click If GetInstanceState("frmReport") Then Exit Sub End If Dim childFrm As frmReport = New frmReport childFrm.MdiParent = Me childFrm.Show() End Sub Private Sub mnExit_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles

35、mnExit.Click End SubEnd Class5. 基礎維護：5.1 班級信息維護實現的功能包括： 查看首記錄 ：表中首個班級記錄，上記錄， 下記錄， 查尾記錄，新增，修改，刪除等可實現模糊搜索功能 即：輸入班級編號可查詢相關班級信息如下所示： Public Class frmBase Inherits Protected bmData As BindingManagerBase Protected dtData As DataTable 'bAdd = true 為新增 'bAdd = false 為修改 Protected bAdd As Boolean Pri

36、vate Sub frmBase_Load(ByVal sender As Object, _ ByVal e As System.EventArgs) Handles MyBase.Load Prepare() SetDataGrid() SetTextBoxState(True) End Sub Private Sub ToolBar1_ButtonClick(ByVal sender As Object, _ ByVal e As ToolBarButtonClickEventArgs) _ Handles ToolBar1.ButtonClick Select Case Case &q

37、uot;首記錄" '返回首記錄 bmData.Position = 0 Case "上記錄" If bmData.Position <> 0 Then bmData.Position -= 1 End If Case "下記錄" If bmData.Position <> bmData.Count Then bmData.Position += 1 End If Case "尾記錄" '返回尾記錄 bmData.Position = bmData.Count Case "新增

38、" Me.dgdList.Enabled = False SetTextBoxState(False) SetToolBarState(False) bAdd = True Clear() Case "修改" Me.dgdList.Enabled = False SetTextBoxState(False) SetToolBarState(False) bAdd = False Case "刪除" '彈出詢問對話框 Dim dlgResult As DialogResult = _ MessageBox.Show("你確認刪除

39、此數據？", _ "刪除", MessageBoxButtons.OKCancel) If dlgResult = DialogResult.OK Then DeleteData() End If Case "保存" SetToolBarState(True) SetTextBoxState(True) If bAdd = True Then '為新增數據保存 SaveForAdd() Else '為更新數據保存 SaveForUpdate() End If Me.dgdList.Enabled = True Case &quo

40、t;取消" SetTextBoxState(True) SetToolBarState(True) Me.dgdList.Enabled = True SearchResult() Case "退出" '關閉本窗體 Me.Close() End Select Try Me.dgdList.CurrentRowIndex = bmData.Position SetData() Catch ex As Exception End Try End Sub Private Sub btnSearch_Click(ByVal sender As System.Obj

41、ect, _ ByVal e As System.EventArgs) Handles btnSearch.Click SearchResult() End Sub Private Sub dgdList_CurrentCellChanged(ByVal sender As Object, _ ByVal e As System.EventArgs) Handles dgdList.CurrentCellChanged Try '判斷bmData是否為Nothing If bmData Is Nothing Then Exit Sub End If If bmData.Position

42、 <> dgdList.CurrentCell.RowNumber Then SetData() End If Catch ex As Exception MessageBox.Show(ex.ToString) End Try End Sub Private Sub SetToolBarState(ByVal bState As Boolean) '設置Button的是否能夠單擊 ToolBar1.Buttons(0).Enabled = bState ToolBar1.Buttons(1).Enabled = bState ToolBar1.Buttons(2).Ena

43、bled = bState ToolBar1.Buttons(3).Enabled = bState ToolBar1.Buttons(4).Enabled = bState ToolBar1.Buttons(5).Enabled = bState ToolBar1.Buttons(6).Enabled = bState ToolBar1.Buttons(7).Enabled = Not bState ToolBar1.Buttons(8).Enabled = Not bState End Sub Public Overridable Sub Prepare() End Sub '設置DataGrid控件 Public Overridable Sub SetDataGrid() End Sub '查詢函數 Public Overridable Sub SearchResult() SetDataGrid() ' dgdL