學生管理信息系統(tǒng) 《軟件工程課程設計》報告

《學生管理信息系統(tǒng) 《軟件工程課程設計》報告》由會員分享，可在線閱讀，更多相關《學生管理信息系統(tǒng) 《軟件工程課程設計》報告（45頁珍藏版）》請在裝配圖網(wǎng)上搜索。

1、 華科學院計算機科學與技術系計算機專業(yè) 《軟件工程課程設計》報告 （2010/2011學年 第一學期） 學生姓名： 強海榮 學生班級： 計算機072202H 學生學號： 200722030217 指導教師： 趙旭俊 2010年12月27日 目錄 第一章 系統(tǒng)概述 1 1.1 系統(tǒng)開發(fā)的背景 1 1.2 系統(tǒng)開發(fā)的意義 1 1.3 系統(tǒng)開發(fā)的目標 1 第二章 需求分析 2 2.1 綜合要求 2 2.1.1 功能要求 2 2.1.2 性能需求 2 2.2 數(shù)據(jù)流圖 2 2.3 數(shù)據(jù)字典 5 2.4 系統(tǒng) E-R 圖 9 第三章

2、 概要設計 11 3.1 合理方案設計 11 3.2 系統(tǒng)功能模塊設計 11 3.3 數(shù)據(jù)庫設計 12 第四章 詳細設計 14 4.1 數(shù)據(jù)庫及表創(chuàng)建 14 4.1.1 新建表 14 4.1.2 設計表 16 4.2 結構程序設計 17 4.2.1 添加信息程序流程圖 17 4.2.2 修改信息程序流程圖 17 4.2.3 刪除信息程序流程圖 18 4.2.4 查詢信息程序流程圖 19 4.2.5 系統(tǒng)程序流程圖 19 4.3 人機界面設計 21 第五章 系統(tǒng)編碼與實現(xiàn) 21 5.1 創(chuàng)建工程項目 21 5.2 工程主窗體

3、21 5.3 用戶登陸窗體 22 5.4 學生信息窗體 23 5.4.1 學生信息添加窗體 23 5.4.2 學生信息刪改（刪除、修改）窗體 27 5.4.3 學生信息查詢窗體 31 第六章 系統(tǒng)測試 33 6.1 測試方法 33 6.2 測試用例 33 6.2.1 用戶登陸 33 6.2.2 學生信息 33 結束語 錯誤！未定義書簽。 參考文獻 38 第一章 系統(tǒng)概述 1.1 系統(tǒng)開發(fā)的背景 隨著學校規(guī)模的不斷擴大，專業(yè)、班級、學生的數(shù)量急劇增加，有關學生各門課程 的成績的各種信息量也成倍增長， 而目前許多高校的學生信息管理仍停留在復

4、雜的人工 操作上，重復工作較多，工作量大，效率低，因此，迫切需要開發(fā)學生管理信息系統(tǒng)來 提高管理工作的效率。 1.2 系統(tǒng)開發(fā)的意義 學生管理信息系統(tǒng)，在學生信息的規(guī)范管理、科學統(tǒng)計和快速查詢方面具有較大的 實用意義。它提高了信息的開放性，大大地改善了學生、教師對其最新信息查詢的準確 性。 為了能夠學以致用，通過對學生管理信息系統(tǒng)的簡單開發(fā)，不僅可以鞏固書本上所 學知識，從而能夠對所學內(nèi)容加以深化，拓寬自己的知識面。通過學習與實踐相結合， 提高自己的編程能力，為今后的畢業(yè)設計和以后的軟件開發(fā)奠定了基礎。 1.3 系統(tǒng)開發(fā)的目標 學生管理信息系統(tǒng)是面向教育部門的學生管理系統(tǒng)

5、，包括學生基本信息管理，學生 成績管理等工作， 是利用計算機進行集中管理而開發(fā)的系統(tǒng)。 該系統(tǒng)是以 Visual Basic 6.0 為開發(fā)環(huán)境，以 SQL 2000 為后臺數(shù)據(jù)庫進行開發(fā)的管理系統(tǒng)，力求與實際相結合具有 查詢、 管理等功能， 使教育的管理趨于計算機化， 使之更加方便、 快捷以提高工作效率。 根據(jù)學生管理的需求和特點，該系統(tǒng)實施后，應達到以下目標： 1. 靈活地運用表格輸入數(shù)據(jù)，使信息傳遞更快捷； 2. 系統(tǒng)采用人機對話方式，界面美觀友好、數(shù)據(jù)存儲安全可靠； 3. 鍵盤操作，快速響應； 4. 實現(xiàn)各種信息的添加、刪除、修改、查詢等； 5. 系統(tǒng)運行穩(wěn)定、安全可

6、靠。 2.1 綜合要求 2.1.1 功能要求 在學生管理信息系統(tǒng)中，主要有用戶登陸、學生信息管理、班級信息管理、學生成 績管理、課程信息管理、用戶信息管理等功能。 1. 用戶登陸 管理員登陸，普通用戶對信息的查詢登陸，管理員和普通用戶必須在登陸頁面輸入 第二章 系統(tǒng)需求分析 用戶名及密碼，只有驗證通過方可進入其它操作。 學生信息修改、 班級信息修改、 學生成績修改、 2. 學生信息管理 包括 4 個功能模塊： 學生信息添加、 3. 班級信息管理 包括 4 個功能模塊： 班級信息添加、 4. 學生成績管理 包括 4 個功能模塊： 學生成績添加、 5. 課程信息管理

7、 包括 4 個功能模塊： 課程信息添加、 6. 用戶信息管理 包括 2 個功能模塊：用戶信息添加和用戶密碼修改。 2.1.2 性能需求 要求該系統(tǒng)易操作、可維護、具有開放性，時刻保持數(shù)據(jù)的有效性與安全性，并且 學生信息刪除和學生信息查詢。 班級信息刪除和班級信息查詢。 學生成績刪除和學生成績查詢。 課程信息修改、 課程信息刪除和課程信息查詢。 用戶信息添加和用戶密碼修改。 可維護、具有開放性，時刻保持數(shù)據(jù)的有效性與安全性，并且 只有管理員才能對數(shù)據(jù)進行修改。 開發(fā)環(huán)境： Visual Basic 6.0. 數(shù)據(jù)庫： SQL Server2000. 操作系統(tǒng)： Wi

8、ndows XP. 2.2 數(shù)據(jù)流圖 分析學生管理信息系統(tǒng)的數(shù)據(jù)來源和去向，繪制出數(shù)據(jù)流圖的頂層數(shù)據(jù)流圖，如圖 所示。 2-1 圖2-1學生管理信息系統(tǒng)的頂層

9、數(shù)據(jù)流圖 0層數(shù)據(jù)流圖, 按自頂向下、逐層分解的方法對頂層數(shù)據(jù)流圖進一步細化，繪制出 如圖2.2所示。 圖2.2學生管理信息系統(tǒng)的 0層數(shù)據(jù)流圖 2.3數(shù)據(jù)字典 該學生信息管理系統(tǒng)的數(shù)據(jù)字典如下： (1)、數(shù)據(jù)名稱：學生信息 數(shù)據(jù)流數(shù)據(jù)字典 數(shù)據(jù)名： 錄入學生的基本信息 來源： 管理員 數(shù)據(jù)結構：學號+姓名+性別+出生日期+班級編號+入學時間+住

10、址+備注 簡要說明：該學生信息管理系統(tǒng)的主要結構，定義了一個學生的基本信息 數(shù)據(jù)項數(shù)據(jù)字典 數(shù)據(jù)名： 學號 存儲處： 學生信息表 數(shù)據(jù)元素：類型：字符型 長度：50 含義：學生的唯一標識 簡要說明：在學生信息表中可以唯一的標識每一位學生 數(shù)據(jù)名： 入學時間 存儲處： 學生信息表 數(shù)據(jù)元素：類型：datetime 長度：8 含義：學生的入學時間信息 簡要說明：記錄每一位學生的入學時間 數(shù)據(jù)加工數(shù)據(jù)字典 項目名： 添加學生信息 輸入： 學生信息 輸出： 簡要說明：可以添加學生信息 項目名： 修改學生信息 輸入： 學生信息 (2)、數(shù)據(jù)名稱：班級信息 數(shù)

11、據(jù)流數(shù)據(jù)字典 數(shù)據(jù)名： 錄入班級的基本信息 來源： 管理員 數(shù)據(jù)結構：班級編號+班級名稱+輔導員+系名稱+班主任 簡要說明：該學生信息管理系統(tǒng)的主要結構之一，定義了一個班級的基本信息 數(shù)據(jù)項數(shù)據(jù)字典 數(shù)據(jù)名： 班級編號 存儲處： 班級信息表 數(shù)據(jù)元素：類型：字符型 長度：50 含義：班級的唯一標識 簡要說明：在班級信息表中可以唯一的標識每一門課程 數(shù)據(jù)名： 班主任 存儲處： 班級信息表 數(shù)據(jù)元素：類型：字符 長度：50 含義：該課程的負責人 簡要說明：記錄每一個班級的班主任 數(shù)據(jù)加工數(shù)據(jù)字典 項目名： 添加班級信息 輸入： 班級信息 輸出： 簡要說明

12、：可以添加班級信息 項目名： 修改班級信息 輸入： 班級信息 輸出： (3)、數(shù)據(jù)名稱：學生成績信息 數(shù)據(jù)流數(shù)據(jù)字典 數(shù)據(jù)名： 錄入學生成績信息 來源： 管理員 數(shù)據(jù)結構：學號+課程編號+成績 簡要說明：該學生信息管理系統(tǒng)的主要結構之一 數(shù)據(jù)項數(shù)據(jù)字典 數(shù)據(jù)名： 學號 存儲處： 成績信息表 數(shù)據(jù)元素：類型：字符型 長度：50 含義：學生的唯一標識 簡要說明：在成績信息表中可以唯一的標識每一位學生 數(shù)據(jù)名： 成績 存儲處： 成績信息表 數(shù)據(jù)元素：類型：numeric 長度：9 含義：學生的成績信息 簡要說明：記錄每一位學生的成績信息 數(shù)據(jù)加工數(shù)據(jù)字典

13、 項目名： 添加成績信息 輸入： 成績信息 輸出： 簡要說明：可以添加成績信息 項目名： 查詢成績信息 輸入： 輸出： 成績信息 簡要說明：可以查詢每一位學生的成績信息 (4)、數(shù)據(jù)名稱：課程信息表 數(shù)據(jù)流數(shù)據(jù)字典 數(shù)據(jù)名： 錄入課程的基本信息 來源： 管理員 數(shù)據(jù)結構：課程編號+課程名稱+課程類型+開課時間+學時+學分 簡要說明：該學生信息管理系統(tǒng)的主要結構之一 數(shù)據(jù)項數(shù)據(jù)字典 數(shù)據(jù)名： 課程編號 存儲處： 課程信息表 數(shù)據(jù)元素：類型：字符型 長度：50 含義：課程的唯一標識 簡要說明：在課程信息表中可以唯一的標識每一門課程 數(shù)據(jù)名： 開課時間

14、 存儲處： 課程信息表 數(shù)據(jù)元素：類型：datetime 長度：8 含義：學生的開課時間信息 簡要說明：記錄每一門的課程的開課時間 數(shù)據(jù)加工數(shù)據(jù)字典 項目名： 添加課程信息 輸入： 課程信息 輸出： 簡要說明：可以添加課程信息 項目名： 修改課程信息 輸入： 課程信息 輸出： 2.4系統(tǒng)E-R圖 繪制學生管理信息系統(tǒng)的E-R圖，如圖2-3所示 圖2.3學生管理信息系統(tǒng)的 E-R圖 圖2.4學生實體圖 圖2.5班級實體圖 圖2.6課程實體圖 圖2.7成績實體圖

15、 第三章系統(tǒng)概要設計 3.1 合理方案設計 在需求分析的基礎上，尋找實現(xiàn)學生管理信息系統(tǒng)的各種不同的方案，并選取若干 個合理方案，經(jīng)分析比較，從中選出一個最佳方案。 本方案是在Visual Basic 6.0、SQL Server2000的環(huán)境下，實現(xiàn)對學生管理信息系統(tǒng) 的用戶登陸、學生信息管理、班級信息管理、學生成績管理、課程信息管理、用戶信息 管理等功能。 3.2 系統(tǒng)功能模塊設計 學生管理信息系統(tǒng)功能包括可視化窗口，對各種信息的添加、修改、刪除和查詢等 具體功能如圖3-1所示。 學生管理信息系統(tǒng) 用戶信息管理 學生

16、信息管理 班級信息管理 課程信息管理 學生成績管理 用戶信息添加 學生成績查詢 用戶密碼修改 圖3.1學生管理信息系統(tǒng)功能模塊 3.3 數(shù)據(jù)庫設計 在需求分析階段所確定的學生管理信息系統(tǒng)數(shù)據(jù)需求的基礎上，進一步設計數(shù)據(jù) 庫。 1 .系統(tǒng)用戶數(shù)據(jù)表（用戶信息表）記錄系統(tǒng)所有用戶名和密碼信息，表中的各個字 段以及各個字段的說明如表3-1所示： 表3-1用戶信息表結構 歹U名 數(shù)據(jù)類型 長度 說明 用戶名 varchar 50 允許空 密碼 varchar 50 允許空 用戶類型 char 10 允許空 2 .學生信息

17、表記錄學生學號、姓名等基本信息，表中的各個字段以及各個字段的說 明如表3-2所示： 表3-2學生信息表結構 歹U名 數(shù)據(jù)類型 長度 說明 學號 varchar 50 主鍵 姓名 varchar 50 允許空 性別 varchar 10 允許空 出生日期 datetime 8 允許空 班級編號 varchar 50 允許空 電話號碼 varchar 50 允許空 入學時間 datetime 8 允許空 住址 varchar 100 允許空 備注 varchar 200 允許空 3 .班級信息表記錄班級編號、班級名

18、稱及相關的信息，表中各個字段以及各個字段 的說明如表3-3所示： 表3-3班級信息表結構 歹U名 數(shù)據(jù)類型 長度 說明 班級編號 varchar 50 主鍵 班級名稱 varchar 50 允許空 輔導員 varchar 50 允許空 系名稱 varchar 50 允許空 班主任 varchar 50 允許空 4 .課程信息表記錄課程編號、課程名稱等相關信息，表中各個字段以及各個字段 的說明如表3-4所示： 表3-4課程信息表結構 歹U名 數(shù)據(jù)類型 長度 說明 課程編號 varchar 50 主鍵 課程名稱 va

19、rchar 50 允許空 課程類型 varchar 50 允許空 開課時間 carhar 10 允許空 課時 int 4 允許空 學分 int 4 允許空 5 .學生成績表記錄學生學號、課程編號及相關的成績，表中各個字段以及各個字段 的說明如表3-5所示： 表3-5學生成績表結構 歹U名 數(shù)據(jù)類型 長度 說明 學號 varchar 50 主鍵 課程編號 varchar 50 主鍵 成績 numeric 9 允許空 第四章系統(tǒng)詳細設計 4.1 數(shù)據(jù)庫及表創(chuàng)建 啟動SQL2000 Server,右擊“數(shù)據(jù)庫”點擊“新

20、建數(shù)據(jù)庫”，在彈出的“數(shù)據(jù)庫屬 性”對話框中可鍵入數(shù)據(jù)庫名及其它信息，如圖 4-1所示： 圖4.1新建數(shù)據(jù)庫 4.1.1 新建表 數(shù)據(jù)庫創(chuàng)建完畢后，點擊可打開。右擊“表”選擇“新建表” ，可以進行表的創(chuàng)建 以及進行相關的表屬性設置。 1 .用戶信息表如圖4-2所示： 列名 數(shù)據(jù)類型 長度 允許空 目則總 var ehar 50 爐 code yarchar 50 y raiige char 10 爐 圖4.2新建用戶信息表 2 .學生信息表如圖4-3所示: 列名 數(shù)據(jù)類型 長度 允許空| 隔

21、 學號 varchar 50 姓名 var char 50 V 性別 var rtiar 10 出生日期 8 V 班級編號 varchir 50 7 電話號碼 var char SO V 入學時間 datetime 8 / 住址 varchar 100 備注 var char 200 圖4.3新建學生信息表 3 .班級信息表如圖4-4所示: 列名 數(shù)據(jù)類型 長度 允許空I 鬧 班級編號 y.uhw 50 班皴名稱 var

22、char 50 V 輔導員 var char 50 系名稱 varchar 50 V 班主任 var char 50 圖4.4新建班級信息表 4 .課程信息表如圖4-5所示: 列名 數(shù)據(jù)莞型 長度 允許空| 課程編號 var char 50 課程名稱 var char 50 饃程類型 var char 50 V 開課時間 10 課時 int 4 V 學分 ini 4 7 圖4.5新建課程信息表 5 .學成

23、成績表如圖4-6所示: 列名 數(shù)據(jù)類型 長度 允許空I 學號 ver char so 課程編號 vai- char 50 成績 numeric 9 圖4.6新建學生成績表 4.1.2設計表 創(chuàng)建完表后右擊對應表名一一“打開表”一一“返回所有行” ，可對表進行添加、 修改、插入、刪除等相應編輯操作 1 .設計用戶信息表如圖4-7所示: code range admin admin 營理員 lijing lijiftg 普通用戶 圖4.7

24、設計用戶信息表 2 .設計學生信息表如圖4-8所示： 學號 I姓名 I性別I出生日期 斑圾編號 電話號碼 入學時間 住址 蓄汪 200722030101 2D0T22CJ301QZ 200722030115 白蔡李 日蒲靖 宏森 男女女 1987-05-15 07220301 1364360 20QT-Q9-01 山西省大同市 1989-05-14 OT2203D1 1380343 200T-09-01 山西省永濟市 1938-10-06 07220301 15 8 3405 200T-09-01 山西省女同市 好好好 良良良 圖4.8設計學生信息表

25、 3 .設計班級信息表如圖4-9所示: 班級編號 班級名稱 輔導員 系名稱 班主任 07220301 討算機。叫201H 劉故曜 討算機科學與技術系 武研 OT2203U2 討算機5rzz02H 劉戰(zhàn)續(xù) 計算機科學與技術系 司城南 ? 圖4.9設計班級信息表 4 .設計課程信息表如圖4-10所示： I課程編號I課程名稱 I課程類型I開課時間I課時 —[￥芬 pigr“ 一 課謨課課課課 出出出出出出 3H 5 i 5 M- 基基基基專專 3232&4S4X54 0001 馬克思主義原理 0002 中國近現(xiàn)代史綱要

26、 0003 大學英語 0004 大學物理 0005 數(shù)據(jù)結構 0006 俎成原理 圖4.10設計課程信息表 5 .設計學生成績表如圖4-11所示: 學號 課程編號 成最 200722030115 0001 78 20C722030115 000￡ 80 200722030115 0003 95 200722030115 0004 93 200722030115 0005 的 200TZ2030115 0006 07 圖4.11設計學生成績表 4.2結構程序設計 4.2.1 添加信息

27、程序流程圖 繪制添加信息流程圖，如圖4-12所示 圖4.12添加信息 4.2.2 修改信息程序流程圖 繪制修改信息流程圖如圖4-13所示。 圖4.13修改信息 4.2.3刪除信息程序流程圖 繪制刪除信息流程圖如圖4-14所示。 圖4.14刪除信息 4.2.4 查詢信息程序流程圖 繪制查詢信息流程圖如圖 4-15所示 圖4.

28、15查詢信息 4.2.5 系統(tǒng)程序流程圖 3種基本控制 采用自頂向下、逐步求精的程序設計方法，使用順序、選擇和循環(huán)這 結構進行連接，并且每個代碼塊只有一個入口和出口。 4.3人機界面設計 4個問題。 然后根據(jù) 認真處理好系統(tǒng)響應時間、用戶幫助設施、出錯信息處理和命令交互這 先創(chuàng)建設計模型，接下來用原型實現(xiàn)這個設計模型并由用戶調(diào)試和評估原型, 用戶意見修改原型。 1 .系統(tǒng)響應時間：穩(wěn)定在1秒。 2 .用戶幫助設施：選擇附加的幫助設施。 3

29、.出錯信息處理： 1）當輸入用戶名不存在時，給出提示； 2）當輸入密碼不正確時，給出提示； 3）當查詢信息不存在時，給出提示； 4）其他出錯提示 4 . 命令交互： 用戶既可以從菜單中選擇軟件功能， 也可以通過鍵盤命令序列調(diào)用軟 件功能 第五章系統(tǒng)編碼與實現(xiàn) 5.1創(chuàng)建工程項目 圖5.1 VB 6.0界面 1 .啟動VB 6.0,出現(xiàn)VB 6.0運行界面，如圖5-1所示: 2 .點擊“文件”一一“保存工程”保存當前工程文件 5.2 工程主窗體 在VB程序設計中，主界面負責應用程序的主界面，由它調(diào)用其它模塊。因此，主 界面應該具有操作性好、界面清晰、

30、使用戶能夠很方便地找到所需功能的特點。本系統(tǒng) 的主界面部在相應的系統(tǒng)菜單組成，用戶只需要點擊相應的菜單使可調(diào)出對應的系統(tǒng)模 塊。工程主窗體如圖5-2所示。 圖5.2工程主窗體  5.3 用戶登陸窗體 本模塊用于用戶登陸窗體主要由文本框及命令按鈕組成，利用 ADODC控件及 DataGrid控件實現(xiàn)程序代碼與SQL數(shù)據(jù)的連接（如圖5-3所示） 圖5.3用戶登陸窗體 對應代碼如下： Option Explicit Private Sub Command1_Click() Dim cn As New ADODB.Connection Dim rs As New A

31、DODB.Recordset Dim cn_str As String Dim rs_str As String cn_str = "driver={sql server};server=.;uid=sa;pwd=;database=XSXX" cn.Open cn_str rs_str = "select * from mima where name='" & Trim(Text1.Text) & ""' rs.Open rs_str, cn, adOpenKeyset, adLockOptimistic If Text1.Text <> "" And Text2.Text <> "

32、" Then If rs.RecordCount > 0 Then If Text2.Text = Trim(rs.Fields("code")) Then 'MsgBox " 成功登錄！ ", 64," 提示" MDIfrm_main.Show Unload Me 'Me.Hide Else MsgBox 輸入的密碼不對，請重新輸入！ ", 64," 提示" Text2.SetFocus Text2.SelStart = 0 Text2.SelLength = Len(Text2.Text) End If Else MsgBox " 沒有該操作員！ ", 64

33、, " 提示 " End If Else If Text1.Text = "" And Text2.Text <> "" Then MsgBox " 請輸入操作員 !", 64, " 提示 " Text1.SetFocus ElseIf Text1.Text <> "" And Text2.Text = "" Then MsgBox " 請輸入密碼！ ", 64, " 提示 " Text2.SetFocus ElseIf Text1.Text = "" And Text2.Text = "" Then MsgBox " 請輸入操作員和密碼！ ", 64, " 提示 " T

34、ext1.SetFocus End If End If End Sub Private Sub Command2_Click() Unload Me End Sub Private Sub Form_Load() Text1.Text = "" Text2.Text = "" Me.Icon = LoadPicture("") Label5.Caption = Year(Date) End Sub Private Sub Text1_Change() End Sub 5.4 學生信息窗體 本窗體通過 ADODC 控件連接數(shù)據(jù)庫的學生表， 可以實現(xiàn)對學生信息的添加

35、、 修改 刪除和查詢。 5.4.1 學生信息添加窗體 學生信息的添加窗體，如圖 5-4 所示。 立添加學生信息 工叵I區(qū) 學生信息 + 口 - X 添加 保存 取消 退出 圖5.4學生信息添加窗體 對應代碼如下： Option Explicit Dim s, y, i, j Dim rs As New ADODB.Recordset Private Sub Form_Load() MSI.Rows = 2 MS1.Cols = 10 y = Array(" 序號","學號(*)"," 姓名","性別","出生日期","班級編號","電話號碼","入學

36、時間","住址","備注") For i = 0 To MS1.Cols - 1 MS1.TextMatrix(0, i) = y(i) MS1.FixedAlignment(i) = 4 MS1.ColAlignment(i) = 4 Next MS1.FixedRows = 1: MS1.FixedCols = 1 MS1.TextMatrix(1,0) = 1 MS1.ColWidth(0) = 450 Toolbar1.Buttons(8).Enabled = False Toolbar1.Buttons(10).Enabled = False MS1.Enabl

37、ed = False Text1.Text = "" End Sub Private Sub Form_QueryUnload(Cancel As Integer, UnloadMode As Integer) Unload Me MDIfrm_main.Picture1.Visible = True End Sub Private Sub Form_Resize() MS1.Width = Me.Width - 200 MS1.Height = Me.Height For i = 1 To MS1.Cols - 1 MS1.ColWidth(i) = MS1.Width

38、 / 9.3 Next End Sub Private Sub MS1_Click() If MS1.Row >= 1 And MS1.TextMatrix(MS1.Row - 1, MS1.Cols - 1) <> "" Then Text1.Visible = True Text1.SetFocus End If End Sub Private Sub MS1_EnterCell() Module1.entercell MS1, Text1 End Sub Private Sub MS1_RowColChange() For i = 1 To MS1.Rows -

39、 1 MS1.TextMatrix(i, 0) = i Next End Sub Private Sub Text1_Change() MS1.Text = Text1.Text End Sub Private Sub Text1_KeyDown(KeyCode As Integer, Shift As Integer) If KeyCode = vbKeyUp Then Module1.moveup MS1, Text1 End If If KeyCode = vbKeyRight Or KeyCode = vbKeyReturn Then Module1.moveri

40、ght MS1, Text1 End If If KeyCode = vbKeyDown Then Module1.movedown MS1, Text1 End If If KeyCode = vbKeyLeft Then Module1.moveleft MS1, Text1 End If End Sub Private Sub MS1_Scroll() Text1.Width = MS1.CellWidth: Text1.Height = MS1.CellHeight Text1.Left = MS1.Left + MS1.CellLeft: Text1.Top = M

41、S1.CellTop + MS1.Top End Sub Private Sub Toolbar1_ButtonClick(ByVal Button As MSComctlLib.Button) Select Case Button.Key Case "add" Toolbar1.Buttons(8).Enabled = True Toolbar1.Buttons(10).Enabled = True Text1.Visible = True: Text1.Text = "" MS1.Enabled = True Text1.SetFocus Text1.Width = MS

42、1.CellWidth: Text1.Height = MS1.CellHeight Text1.Left = MS1.CellLeft + MS1.Left: Text1.Top = MS1.CellTop + MS1.Top Case "save" For i = 1 To MS1.Rows - 1 If MS1.TextMatrix(i, 1) <> "" Then rs.Open "select * from student_info", cnn, adOpenKeyset, adLockOptimistic rs.AddNew For j = 1 To MS1.Col

43、s - 1 If MS1.TextMatrix(i, j) <> "" Then rs.Fields(j - 1) = Trim(MS1.TextMatrix(i, j)) Next j rs.Update rs.Close End If Next MsgBox " 添加成功！ ", 64, " 提示 " For i = 1 To MS1.Rows - 1 For j = 1 To MS1.Cols - 1 MS1.TextMatrix(i, j) = "" Next j Next i MS1.Rows = 2 Text1.Visible = False MS1

44、.Enabled = False Toolbar1.Buttons(8).Enabled = False Toolbar1.Buttons(10).Enabled = False Case "cancel" For i = 1 To MS1.Rows - 1 For j = 1 To MS1.Cols - 1 MS1.TextMatrix(i, j) = "" Next j Next i MS1.Rows = 2 Text1.Visible = False MS1.Enabled = False Toolbar1.Buttons(8).Enabled = False

45、Toolbar1.Buttons(10).Enabled = False Case "close" Unload Me MDIfrm_main.Picture1.Visible = True End Select End Sub 5.4.2 學生信息刪改(刪除、修改)窗體 學生信息的刪改窗體，如圖 5-5 所示。 圖5.5學生信息刪改窗體 對應代碼如下： Option Explicit Dim i As Integer Private Sub Command1_Click() AdodcI.RecordSource = "select * from stude

46、nt_info where student_info." & Combo1.Text & like + '" & Text1.Text & "' + '%'" Adodc1.Refresh End Sub Private Sub Command2_Click() If Not Adodc1.Recordset.BOF Then Adodc1.Recordset.MoveFirst End Sub Private Sub Command3_Click() If Adodc1.Recordset.RecordCount <> 0 Then If Adodc1.Recordset.B

47、OF = False Then Adodc1.Recordset.MovePrevious If Adodc1.Recordset.BOF = True Then Adodc1.Recordset.MoveFirst End If End Sub Private Sub Command4_Click() If Adodc1.Recordset.RecordCount <> 0 Then If Adodc1.Recordset.EOF = False Then Adodc1.Recordset.MoveNext If Adodc1.Recordset.EOF = True Then

48、 Adodc1.Recordset.MoveLast End If End Sub Private Sub Command5_Click() If Not Adodc1.Recordset.EOF Then Adodc1.Recordset.MoveLast End Sub Private Sub Command6_Click() DataGrid1.AllowUpdate = True Command9.Enabled = True End Sub Private Sub Command7_Click() 'DataGrid1.AllowDelete = True D

49、im i On Error Resume Next i = MsgBox(" 是否確定刪除該記錄？ ", 64, " 提示 ") If i = vbOK Then Adodc1.Recordset.Delete Adodc1.Refresh End If End Sub Private Sub Command8_Click() MDIfrm_main.Picture1.Visible = True Unload Me End Sub Private Sub Command9_Click() DataGrid1.AllowUpdate = False DataGrid

50、1.AllowDelete = False DataGrid1.Refresh MsgBox "操作成功！ ", 64, " 提示 " Command9.Enabled = False End Sub Private Sub Form_Activate() Combo1.AddItem " 學號 " Combo1.AddItem " 姓名 " Combol.ListIndex = 0 Textl.Text ="" Command9.Enabled = False End Sub Private Sub Form_QueryUnload(Cancel As Integer

51、, UnloadMode As Integer) MDIfrm_main.Picture1.Visible = True End Sub Private Sub Form_Resize() Frame1.Width = Me.Width - 300 DataGrid1.Width = Me.Width - 300 DataGrid1.Height = Me.Height Fori = 0 To 8 DataGrid1.Columns(i).Width = (DataGrid1.Width - 450) / 9 Next End Sub Private Sub Text1_Ke

52、yDown(KeyCode As Integer, Shift As Integer) If KeyCode = vbKeyReturn Then Command1.SetFocus End Sub 5.4.3 學生信息查詢窗體 學生信息的查詢窗體，如圖5-6所示。 5.6 學生信息查詢窗體 對應代碼如下： Option Explicit Dim i As Integer Private Sub Command1_Click() Select Case Combo2.Text Case Is = "like" Adodc1.RecordSource = "select

53、 * from student_info where student_info." & Combo1.Text & " like '%' + '" & Text1.Text & "' + '%' " Adodc1.Refresh Case Is = "=" Adodc1.RecordSource = "select * from student_info where student_info." & Combo1.Text & " = '" & Text1.Text & "'" Adodc1.Refresh End Select End Sub Private Sub Com

54、mand2_Click() Unload Me MDIfrm_main.Picture1.Visible = True End Sub Private Sub Form_Activate() Combo1.AddItem (" 學號 ") Combo1.AddItem (" 姓名 ") Combo1.AddItem (" 班級編號 ") Combo1.ListIndex = 0 Combo2.AddItem ("like") Combo2.AddItem ("=") Combo2.ListIndex = 1 Text1.Text = "" End Sub Priva

55、te Sub Form_QueryUnload(Cancel As Integer, UnloadMode As Integer) MDIfrm_main.Picture1.Visible = True End Sub Private Sub Form_Resize() Shape1.Width = Me.Width - 300 DataGrid1.Width = Me.Width - 300 DataGrid1.Height = Me.Height For i = 0 To 8 DataGrid1.Columns(i).Width = (DataGrid1.Width - 4

56、50) / 9 Next End Sub 第六章系統(tǒng)測試 6.1 測試方法 進行系統(tǒng)測試主要有兩種方法：靜態(tài)測試和動態(tài)測試，我們主要采用動態(tài)測試的方 法。動態(tài)測試是通過運行程序來檢驗軟件的動態(tài)特性和運行結果的正確性，并根據(jù)程序 的運行過程對程序進行評價的過程。動態(tài)測試包括運行、解釋和模擬。具體的測試方法 有： 黑盒子測試。一種以需求和功能規(guī)范及界面為基礎的測試方法。它無需了解軟件的 內(nèi)容結構。 白盒子測試。一種以程序為基礎的或以程序和需求相結合為基礎的測試方法。它必 須了解程序的結構而不考慮程序的功能。 灰盒子測試。上述兩種測試方法的結合。通常先用黑盒子方法設計測試案例，然后

57、盡可能多地用白盒子方法完成測試。 采用以下數(shù)據(jù)測試軟件，對于測試過程中發(fā)現(xiàn)的問題，包括語法錯誤、邏輯錯誤等, 通過分析，都進行了一一的排除。最后系統(tǒng)能夠正確運行。 6.2 測試用例 6.2.1 用戶登陸 用戶登陸界面如圖6-1所示： 登錄 區(qū) 學生信息管理系統(tǒng) 用戶名：? 密碼二 確定 退出 CopyRi ght ： 2010 — 2010 圖6.1登陸界面 6.2.2學生信息 管理員可以對學生信息進行添加、修改、刪除、查詢等操作，而普通用戶只能實現(xiàn) 學生信息的查詢功能。 當管理員進行添加學生信息時，首先點擊添加，然后輸入信息，當點擊保存時，如 果系統(tǒng)判斷輸入

58、無誤，則顯示添加成功！如圖 6-2所示: 學生信息 所-U

59、也使我學會了利用結構化程序設計思想開發(fā)管理信息系 統(tǒng)，并用模塊化方法加以實現(xiàn)。 雖然以前也曾經(jīng)參與過其他項目的系統(tǒng)開發(fā)，但畢竟只是接觸，而沒有像這次畢業(yè) 設計那樣非常系統(tǒng)地去完成，也沒有系統(tǒng)開發(fā)設計的經(jīng)驗，而且畢業(yè)設計的時間有限， 這些都使得本系統(tǒng)在某些方面表現(xiàn)得并不是非常的完善。但是，通過這次系統(tǒng)開發(fā)，將 學習的理論與實踐相結合，使我對學生檔案管理系統(tǒng)和數(shù)據(jù)庫的設計與開發(fā)有了更真 實、具體的體會，使我得到了一次很有價值的實踐。 通過對該信息系統(tǒng)的分析，雖說具有相對完善的功能應用，但也存在一些缺陷。該 信息系統(tǒng)的不足主要有以下幾點： 1 、信息內(nèi)容和形式過于單一 2 、信息

60、的流向基本是由下向上單項流動。 3 、信息系統(tǒng)仍多為模擬手工系統(tǒng)的數(shù)據(jù)處理流程。 4 、信息系統(tǒng)應用缺乏彈性 雖說存在一些問題，但在系統(tǒng)設計過程中，從用戶的角度出發(fā)，在系統(tǒng)的可用性 和易用性上做了很多功夫，力求能達到最好的效果。由于我的編程實現(xiàn)能力和畢業(yè)設計 的時間都有限，我對學生信息管理這一系列工作的具體內(nèi)容也不是特別地了解，所以目 前我還不能把學生檔案管理這個系統(tǒng)較為完善地實現(xiàn)出來， 希望以后有機會能夠彌補這 個遺憾。 在系統(tǒng)開發(fā)過程中，問題不斷的出現(xiàn)，又不斷的得到解決，一步一步地前進，隨 著系統(tǒng)的逐步完善，我對以前所學知識的領悟程度得到了提升，編程能力得到了提高， 所學的知識得到了綜合運用。通過這次系統(tǒng)的開發(fā)，我對專業(yè)知識的運用得到了一次升 華。 參考文獻 [1] 薩師煊，王珊 . 數(shù)據(jù)庫系統(tǒng)概論（第 4 版） . 北京：高等教育出版社， 2006 年 . [2] 張海藩 . 軟件工程導論（第 5 版） . 北京：清華大學出版社， 2008 年 . [3] 劉志銘，高春燕 . 數(shù)據(jù)庫開發(fā)實例解析 VB. 北京：機械工業(yè)出版社， 1999年. [4] 龔沛曾 ,陸慰民 .VB 程序設計簡明教程（第二版） .北京：高等教育出版社， 2003年. [5]夏邦貴，劉凡馨.SQL Server數(shù)據(jù)庫開發(fā)經(jīng)典實例精解.北京：機器工業(yè)出版社，2006