【正文】 5. = 6. End Sub 2. 定義過程 ControltoField，用于實現(xiàn)窗體控件內(nèi)容的保存，其中過程的參數(shù)類型為記錄集類型。 3. 定義過程 FieldtoControl，用于實現(xiàn)在窗體控件中顯示記錄集各字段內(nèi)容，其中過程的參數(shù)類型為記錄集類型。 4. 窗體激活事件過程，根據(jù) TechAppoint表生成記錄集，并顯示在窗體各控件中，也可以看成對窗體的初始化。 第 13章 教學(xué)信息管理系統(tǒng) 用戶信息管理模塊 模塊功能 界面設(shè)計 編寫模塊代碼 用戶信息管理模塊 模塊功能 用戶信息管理模塊主要完成用戶信息管理的功能，內(nèi)容包括用戶名、用戶密碼、用戶權(quán)限、姓名、聯(lián)系電話等，本模塊實現(xiàn)對用戶信息的添加、刪除、修改等操作。 用戶信息管理模塊 界面設(shè)計 根據(jù)上述模塊功能要求，按表 “用戶信息管理”窗體，并添加控件，控件的屬性設(shè)置參見表，設(shè)計完成后的窗體界面如圖 。 控件 名稱 屬性設(shè)置或功能說明 Label Label1 Caption屬性為“用戶名” Label Label2 Caption屬性為“用戶密碼” Label Label3 Caption屬性為“權(quán)限” Label Label4 Caption屬性為“姓名” Label Label5 Caption屬性為“聯(lián)系電話” Label Label6 Caption屬性為“備注” TextBox txtUserName 用于錄入或編輯用戶名 TextBox txtUserPassword 用于錄入或編輯教師所在系（二級單位） ComboBox cboUserPurview 用于選擇用戶權(quán)限， List屬性為“學(xué)生 教師 教務(wù)員” TextBox txtUserRealName 用于錄入或編輯用戶姓名 TextBox txtUserTel 用于錄入或編輯用戶聯(lián)系電話 用戶信息管理模塊 編寫模塊代碼 窗體的屬性設(shè)置：名稱為 frmUserInfo， BorderStyle為 3Fixed Dialog，Caption屬性為“用戶信息管理”。并在窗體的通用聲明段添加如下代碼，用于指定當(dāng)前編輯模式。 Dim AddMode As Boolean 定義過程 clearcontrol，用于實現(xiàn)窗體控件內(nèi)容的清空。 Sub clearcontrol() = = = = = End Sub 定義過程 ControltoField，用于實現(xiàn)窗體控件內(nèi)容的保存，其中過程的參數(shù)類型為記錄集類型。 Sub ControltoField(rss As ) rss!UserName = Trim() rss!UserRealName = Trim() rss!UserPassword = Trim() rss!UserPurview = rss!UserTel = End Sub 第 13章 教學(xué)信息管理系統(tǒng) 學(xué)生基本信息管理模塊 模塊功能 界面設(shè)計 編寫模塊代碼 學(xué)生基本信息管理模塊 模塊功能 學(xué)生基本信息管理模塊主要完成學(xué)生基本信息管理的功能，內(nèi)容包括學(xué)號、姓名、性別、出生日期、所在班級、來源、聯(lián)系電話、備注、照片、照片大小等，本模塊實現(xiàn)對學(xué)生基本信息的添加、刪除、修改等操作。 運行時學(xué)生基本信息窗體界面 學(xué)生基本信息管理模塊 界面設(shè)計 根據(jù)上述模塊功能要求，窗體中需使用通用對話框控件、 MSHFlexGrid控件和狀態(tài)欄控件，因些選擇菜單中的“工程” /“部件”，在出現(xiàn)的對話框中選擇“ Microsoft Common Dialog Control ”、“ Microsoft Hierarchical FlexGrid Control (OLEDB)”和“ Microsoft Windows Common ”，單擊“確定”按鈕，向工具箱中增加該控件的類。如圖 。 選擇部件對話框 學(xué)生基本信息管理模塊 編寫模塊代碼 1. 窗體的屬性設(shè)置：名稱為 frmStuInfo，BorderStyle為 3Fixed Dialog， Caption屬性為“學(xué)生基本信息管理”。 2. 定義過程 clearcontrol，用于實現(xiàn)窗體控件內(nèi)容的清空。 3. 定義過程 Add_Photo，用于實現(xiàn)將圖片或稱照片文件錄入到數(shù)據(jù)庫 OLE字段 . 第 13章 教學(xué)信息管理系統(tǒng) 教師課程表查詢模塊 模塊功能 界面設(shè)計 編寫模塊代碼 教師課程表查詢模塊 模塊功能 教師課程表查詢模塊主要實現(xiàn)教師任課信息的查詢操作，通過輸入的教師工號，作簡單查詢。并以常見的課程表形式呈現(xiàn)出來。 運行時教師課程表窗體界面 教師課程表查詢模塊 界面設(shè)計 根據(jù)上述模塊功能要求，按表 設(shè)計“教師課程表”窗體，并添加控件，控件的屬性設(shè)置參見表 ，設(shè)計完成后的窗體界面參見圖 。 教師課程表窗體主要控件的屬性設(shè)置及其功能說明表 控件 名稱 屬性設(shè)置或功能說明 Label Label1 Caption屬性為“教師工號” TextBox txtTechID 用于輸入教師工號 CommanButton cmdQuery Caption屬性為“查詢” MSHFlexGrid MSHFlexGrid1 用于以常見課程表形式顯示教師任課查詢結(jié)果 教師課程表查詢模塊 編寫模塊代碼 1. 窗體的屬性設(shè)置：名稱為 frmQueryTechAppoint，BorderStyle為 3Fixed Dialog， Caption屬性為“教師課程表”。 2. 定義過程 initMSHFlexGrid，用于實現(xiàn)在窗體MSHFlexGrid控件顯示課程表的框架。 3. 窗體的裝載過程，調(diào)用過程 initMSHFlexGrid，實現(xiàn) MSHFlexGrid控件的初始化。 4. txtTechID文件框獲得焦點的事件過程，實現(xiàn)當(dāng)txtTechID文件框獲得焦點時，選中文件框中已有的內(nèi)容，方便再次查詢時的輸入。 5. 查詢按鈕 cmdQuery的單擊事件過程，實現(xiàn)從TechAppoint、 CourInfo二個表中進行任課教師任課信息的查詢。 第 13章 教學(xué)信息管理系統(tǒng) 學(xué)生成績綜合查詢模塊 模塊功能 界面設(shè)計 編寫模塊代碼 學(xué)生成績綜合查詢模塊 模塊功能 學(xué)生成績綜合查詢模塊主要實現(xiàn)學(xué)生成績多種條件的組合查詢，通過勾選各查詢選項，可以實現(xiàn)多條件精確查詢或模糊查詢，查詢結(jié)構(gòu)以列表形式顯示出來。 運行時學(xué)生成績綜合查詢窗體界面 學(xué)生成績綜合查詢模塊 界面設(shè)計 根據(jù)上述模塊功能要求，按表 “學(xué)生成績綜合查詢”窗體，并添加控件，控件的屬性設(shè)置參見表，設(shè)計完成后的窗體界面參見圖 。 控件 名稱 屬性設(shè)置或功能說明 Frame Frame1 Caption屬性為“查詢選項” CheckBox chkStuID Caption屬性為“學(xué)號”，用于勾選查詢選項含學(xué)號 TextBox txtFindStuID 用于輸入學(xué)號 CheckBox chkStuName Caption屬性為“姓名”，用于勾選查詢選項含姓名 TextBox txtFindStuName 用于輸入姓名 CheckBox chkStuClass Caption屬性為“班級”，用于勾選查詢選項含班級 TextBox txtFindStuClass 用于輸入班級 CheckBox chkStuSex Caption屬性為“性別”，用于勾選查詢選項含性別 學(xué)生成績綜合查詢模塊 編寫模塊代碼 窗體的屬性設(shè)置：名稱為 frmQueryStuScore， BorderStyle為 3Fixed Dialog， Caption屬性為“學(xué)生成績綜合查詢”。并在窗體的通用聲明段添加如下代碼，用于存儲查詢命令行。 Dim strSql As String 定義過程 FillMSHFlexGrid1，用于實現(xiàn)在窗體MSHFlexGrid控件顯示成績查詢結(jié)果。 為窗體的激活事件過程編寫代碼，實現(xiàn)成績表的顯示，其中調(diào)用了上述定義的 FillMSHFlexGrid1過程。 為查詢按鈕 cmdSearch單擊事件過程編寫代碼，實現(xiàn)成績多條件綜合查詢，其中調(diào)用了上述定義的 FillMSHFlexGrid1過程。 為查詢按鈕 cmdAll單擊事件過程編寫代碼，實現(xiàn)成績?nèi)匡@示，恢復(fù)至查詢前的顯示，其中調(diào)用了上述定義的FillMSHFlexGrid1過程。 小結(jié)和習(xí)題 小結(jié) 本章通過一個具體的示例 ——高校教學(xué)信息管理系統(tǒng)，完整地介紹了數(shù)據(jù)庫應(yīng)用系統(tǒng)的開發(fā)方法和過程，通過本章，將本書前面的各章節(jié)的知識加以綜合的運用，以解決實際問題。例中的分析設(shè)計方法及源代碼對讀者解決實際問題有一定的參考價值，尤其是例中 SQL語句的書寫，讀者可以借此加深對 SQL語法的理解。 需要說明的是，本章的示例從功能上來講，并不完善或者說還較少，希望讀者能夠作進一步的擴充成具有實用價值的教學(xué)信息管理系統(tǒng)。 習(xí)題 （ P 習(xí)題 ） 第 14章 網(wǎng)絡(luò)考試系統(tǒng) 第 14章 網(wǎng)絡(luò)考試系統(tǒng) 系統(tǒng)分析與設(shè)計 創(chuàng)建數(shù)據(jù)庫及數(shù)據(jù)表 創(chuàng)建工程 考生登錄模塊 創(chuàng)建主窗體 選擇題考試模塊 填空題考試模塊 是非題考試模塊 綜合題考試模塊 小 結(jié) 系統(tǒng)分析與設(shè)計 需求分析 模塊設(shè)計 系統(tǒng)分析與設(shè)計 網(wǎng)絡(luò)考試系統(tǒng)需要滿足以下需求： 對考試試題進行管理，其中包括試題的錄入、編輯、刪除。 提供豐富的題型。 能夠隨機抽取試題，要求同一考生所考試題不能有重復(fù)試題。 對學(xué)生抽取的試題應(yīng)能保留，供教師閱卷時參考。 系統(tǒng)分析與設(shè)計 對于客觀題要求能自動閱卷，主觀題則能夠提供方便快捷的閱卷界面。 對于選擇題要求選擇項 A、 B、 C、 D能夠變更原有順序，提高試題的隨機性，以增加考生作弊難度。 考試機客戶端軟件操作界面簡捷方便，不應(yīng)對考生考試成績造成影響。 系統(tǒng)分析與設(shè)計 從實際應(yīng)用角度考試，考試機客戶端應(yīng)具有下列幾個功能模塊： 1．考生登錄模塊 正式考試前，考生首先要登錄到本考試系統(tǒng)，也可以稱為注冊，向系統(tǒng)提交考生的學(xué)號、姓名、所在學(xué)院、所在班級以及登錄時間。 2．選擇題考試模塊 此部分功能是從選擇題題庫中為考生隨機抽取試題，同 時將選擇項 A、 B、 C、 D重新排列后，將試題顯示在選擇題考試窗口，考生答題時，將考生選擇的答案加以保存。 系統(tǒng)分析與設(shè)計 填空題考試模塊 此部分功能是從填空題題庫中為考生隨機抽取試題，將試題顯示在填空題考試窗口，考生答題時，將考生選擇的答案加以保存。 是非題考試模塊 此部分功能是從是非題題庫中為考生隨機抽取試題，將試題顯示在是非題考試窗口，考生答題時，將考生選擇的答案加以保存。 綜合題考試模塊 此部分功能是從是綜合題庫中為考生隨機抽取試題，將試題顯示在綜合題考試窗口，同時提示考生，綜合題所需素材文件在考生的考號文件夾，并要求考生將操作結(jié)果保存在該文件夾中。 創(chuàng)建數(shù)據(jù)庫及數(shù)據(jù)表 創(chuàng)建數(shù)據(jù)庫及數(shù)據(jù)表 根據(jù)模塊的設(shè)計，以及根據(jù)規(guī)范化設(shè)計要求，該系統(tǒng)的數(shù)據(jù)庫表設(shè)計如下列表 ： 表 表 表 表 表 . 創(chuàng)建數(shù)據(jù)庫及數(shù)據(jù)表 字段名稱 字段類型 字段大小 字段含義 是否必填 索引 是否主鍵 ColNumber 文本 10 學(xué)號 是 有（無重復(fù)） 是 ColName 文本 20 姓名 否 無 ColCollege 文本 20 所在學(xué)院 否 無 ColClass 文本 20 所在班級 否 無 ColLogonTime 日期 /時間 登錄時間 是 無 表 考生信息表（ tbExaminee） 創(chuàng)建數(shù)據(jù)庫及數(shù)據(jù)表 字段名稱 字段類型 字段大小 字段含義 是否必填 索引 是否主鍵 Col_SubjectID 數(shù)字 長整型 試題號 是 有（無重復(fù)） 是 Col_Designer 文本 10 設(shè)計人 是 無 Col_SubjectContent 文本 220 題干 是 無 Col_SubjectSelectA 文本 220 選項 A 是 無 Col_SubjectSelectB 文本 220 選項 B 是 無 Col_SubjectSelectC 文本 220 選項 C 是 無 Col_SubjectSelectD 文本 220 選項 D 是 無 Col_A