【正文】 167。 5 班級(jí)管理模塊 班級(jí)管理模塊實(shí)現(xiàn)班級(jí)添加、刪除以及班級(jí)信息瀏覽、修改等功能。 判斷當(dāng)前是添加狀態(tài)還是修改狀態(tài)可以通過 txtDepartID控件的 Locked屬性確定 （ 參考 “ 數(shù)據(jù)修改功能的實(shí)現(xiàn) ” ） 。 ， 如果用戶沒有給非空字段輸入數(shù)據(jù) ，則提示用戶必須輸入該字段 ， 并通過控件的 SetFocus方法直接將焦點(diǎn)定位到該相關(guān)控件 ， 便于用戶的操作 。 這個(gè)步驟很重要 ， 必須確保用戶輸入的數(shù)據(jù)是有效的 。 保存數(shù)據(jù)前必須對(duì)數(shù)據(jù)進(jìn)行有效性驗(yàn)證 。 Visual Basic 數(shù)據(jù)庫編程教程 學(xué)生信息管理系統(tǒng) 167。 Department數(shù)據(jù)表中的院系編號(hào) ， 而 Class數(shù)據(jù)表中相關(guān)班級(jí)的院系編號(hào)不作修改 ， 數(shù)據(jù)庫的完整性就會(huì)遭到破壞 ， 這里采用“ 拒絕修改 ” 的辦法 ， 通過設(shè)置 = True， 使用戶不能修改院系的編號(hào) 。 Visual Basic 數(shù)據(jù)庫編程教程 學(xué)生信息管理系統(tǒng) 167。 dataValid的 RecordSource屬性以后，必須調(diào)用 Refresh方法才能刷新數(shù)據(jù)集里的數(shù)據(jù)。 SQL語句 SELECT * FROM Class WHERE DepartID=’院系編號(hào) ’ 用于從班級(jí)數(shù)據(jù)表 Class中選擇屬于指定院系編號(hào)的班級(jí)的信息 。為了保證數(shù)據(jù)庫的完整性，在刪除院系設(shè)置記錄前應(yīng)確保數(shù)據(jù)庫中沒有屬于該院系的班級(jí)。 切換模式 End Sub Visual Basic 數(shù)據(jù)庫編程教程 學(xué)生信息管理系統(tǒng) 167。 添加記錄 InEditMode = True 39。為了在操作完成以后數(shù)據(jù)控件能回到添加前的記錄位置，需要設(shè)置數(shù)據(jù)控件的書簽。 Visual Basic 數(shù)據(jù)庫編程教程 學(xué)生信息管理系統(tǒng) 167。 \ = False InEditMode = False ToggleEditMode End Sub 其中 ，本系統(tǒng)中將數(shù)據(jù)庫文件和應(yīng)用程序的可執(zhí)行文件放在同一個(gè)文件夾下。代碼如下： Private Sub Form_Load( ) = amp。首先，為了保證應(yīng)用程序在任何路徑下都可以訪問到數(shù)據(jù)庫，必須修改數(shù)據(jù)控件的 DatabaseName屬性，使其能自動(dòng)定位到應(yīng)用程序所在的路徑。 Dim BookMK Dim InEditMode As Boolean Visual Basic 數(shù)據(jù)庫編程教程 學(xué)生信息管理系統(tǒng) 167。 另外還需要定義一個(gè)模塊級(jí)變量 BookMK用于表示數(shù)據(jù)控件的書簽 。 4 院系設(shè)置模塊 四、 模塊功能的實(shí)現(xiàn) ? 通用變量、通用模塊定義 本模塊在同一個(gè)用戶界面上實(shí)現(xiàn)數(shù)據(jù)的瀏覽、添加、刪除、修改等功能，為了避免用戶操作不當(dāng)而錯(cuò)誤修改數(shù)據(jù)，在瀏覽數(shù)據(jù)時(shí)應(yīng)禁止數(shù)據(jù)的修改；在添加、修改數(shù)據(jù)時(shí)允許用戶輸入數(shù)據(jù)并禁止移動(dòng)記錄集指針，可以設(shè)置一個(gè)通用過程來實(shí)現(xiàn)界面的切換。 Visual Basic 數(shù)據(jù)庫編程教程 學(xué)生信息管理系統(tǒng) 167。去掉 AllowUpdate選項(xiàng)的目的是禁止用戶通過數(shù)據(jù)表格直接修改數(shù)據(jù)，從而通過程序代碼更好地控制數(shù)據(jù)的有效性和數(shù)據(jù)庫的完整性。 【 Edit】 菜單項(xiàng)，可以設(shè)置數(shù)據(jù)表格每列的寬度以及行的高度。再次單擊右鍵，選擇 【 Properties】 菜單項(xiàng)，打開屬性對(duì)話框，對(duì)數(shù)據(jù)表格的各項(xiàng)屬性進(jìn)行設(shè)置。 4 院系設(shè)置模塊 三、 模塊用戶界面的設(shè)計(jì) 其中 dbgDepart是數(shù)據(jù)表格控件，如果看不到該控件，請(qǐng)參考相關(guān)操作。 院系設(shè)置模塊 三、 模塊用戶界面的設(shè)計(jì) 在窗體上添加若干標(biāo)簽、文本框、按鈕，并添加一個(gè)數(shù)據(jù)表格控件、兩個(gè)數(shù)據(jù)控件。 4 院系設(shè)置模塊 二、 主窗體的設(shè)計(jì) 在 Visual Basic中單擊 【 工程 】 → 【 添加窗體 】 （或者工具欄的 “ 添加窗體 ” 按鈕），給工程添加一個(gè)新窗體，將窗體保存為 。 4 院系設(shè)置模塊 一、模塊功能分析 ? 實(shí)現(xiàn)步驟 ?添加、保存窗體，設(shè)置窗體屬性； ?添加控件，設(shè)置控件屬性，構(gòu)造窗體界面； ?編寫代碼，實(shí)現(xiàn)相應(yīng)功能； ?和主窗體連接，測試模塊功能。 完整性。 保持?jǐn)?shù)據(jù)庫的完整性，在添加、刪除、修改數(shù)據(jù)時(shí)必須對(duì)數(shù)據(jù)進(jìn)行驗(yàn)證， 可以在窗體上再添加一個(gè)數(shù)據(jù)控件，通過它查詢相關(guān)數(shù)據(jù)表來驗(yàn)證數(shù)據(jù)。為了便于用戶直觀瀏覽院系設(shè)置信息，本系統(tǒng)采用數(shù)據(jù)表格的形式顯示數(shù)據(jù)。 Visual Basic 數(shù)據(jù)庫編程教程 學(xué)生信息管理系統(tǒng) 167。 4 院系設(shè)置模塊 院系設(shè)置模塊是學(xué)生信息管理系統(tǒng)的輔助功能模塊，實(shí)現(xiàn)院系添加、刪除以及院系信息瀏覽、修改等功能。單擊主窗體的 “ 退出系統(tǒng) ” 菜單項(xiàng)，系統(tǒng)自動(dòng)生成相應(yīng)事件過程框架，并切換到代碼窗口，添加退出過程代碼如下： Private Sub mntSysQuit_Click() End End Sub 主窗體中其它菜單項(xiàng)功能的實(shí)現(xiàn)在后面介紹。P) mntEduPunish 二級(jí)菜單項(xiàng) Visual Basic 數(shù)據(jù)庫編程教程 學(xué)生信息管理系統(tǒng) 167。C) mntEduChange 二級(jí)菜單項(xiàng) 獎(jiǎng)勵(lì)情況 (amp。Q) mntStuQuery 二級(jí)菜單項(xiàng) 教務(wù)管理 (amp。t) mntStudent 一級(jí)菜單 學(xué)生管理 (amp。C) mntSysClass 二級(jí)菜單項(xiàng) mntSysSP 二級(jí)菜單項(xiàng)，分隔線 退出系統(tǒng) (amp。S) mntSystem 一級(jí)菜單（ mnt是 MenuItem的縮寫） 院系設(shè)置 (amp。在給控件命名時(shí)，每個(gè)控件名稱前面加上該控件的縮寫，一般取 2~4個(gè)字母，采用小寫，縮寫時(shí)取控件名的主要輔音，以元音開頭的控件可以取第一個(gè)元音字母。 在系統(tǒng)開發(fā)時(shí)，應(yīng)該養(yǎng)成良好的命名習(xí)慣。 3 系統(tǒng)主窗體的創(chuàng)建 三、 主菜單的設(shè)計(jì) 單擊 【 工具 】 → 【 菜單編輯器 】 菜單項(xiàng)，打開菜單編輯器設(shè)計(jì)窗體的主菜單。H8000000Camp。 3 系統(tǒng)主窗體的創(chuàng)建 二、 主窗體的設(shè)計(jì) 在設(shè)計(jì)復(fù)雜的應(yīng)用程序時(shí)，為了方便用戶的操作，往往要考慮系統(tǒng)的界面框架結(jié)構(gòu)，打開主窗體（文件名為 FormMain），設(shè)置窗體的有關(guān)屬性。相應(yīng)的控件就會(huì)被添加到工具箱上。 3 系統(tǒng)主窗體的創(chuàng)建 一、 創(chuàng)建工程文件 為了構(gòu)造便于用戶操作的程序界面，需要在工程中添加相應(yīng)的部件。根據(jù) Visual Basic配置的不同，有時(shí)會(huì)出現(xiàn)不同的運(yùn)行界面，系統(tǒng)會(huì)直接創(chuàng)建新的工程文件。 Visual Basic 數(shù)據(jù)庫編程教程 學(xué)生信息管理系統(tǒng) 167。 3 系統(tǒng)主窗體的創(chuàng)建 數(shù)據(jù)設(shè)計(jì)完成后，下一步的工作就是使用某種程序開發(fā)語言實(shí)現(xiàn)系統(tǒng)的具體功能，本系統(tǒng)采用的語言為微軟公司的中文版 Visual Basic 語言。 數(shù)據(jù)庫創(chuàng)建完畢以后，還需要對(duì)數(shù)據(jù)庫的性能進(jìn)行一些測試，以確保數(shù)據(jù)庫設(shè)計(jì)的合理性，避免在系統(tǒng)軟件開發(fā)過程中發(fā)現(xiàn)數(shù)據(jù)庫不合理而修改數(shù)據(jù)庫。在完成數(shù)據(jù)庫的創(chuàng)建以后，便可以在 DBMS中錄入初始數(shù)據(jù)。 Visual Basic 數(shù)據(jù)庫編程教程 學(xué)生信息管理系統(tǒng) 167。 2 數(shù)據(jù)庫設(shè)計(jì) 四、數(shù)據(jù)庫結(jié)構(gòu)的實(shí)現(xiàn) 數(shù)據(jù)庫邏輯結(jié)構(gòu)設(shè)計(jì)完成以后，就可以在 DBMS上創(chuàng)建數(shù)據(jù)庫和數(shù)據(jù)表了。 2 數(shù)據(jù)庫設(shè)計(jì) 三、數(shù)據(jù)庫邏輯結(jié)構(gòu)設(shè)計(jì) 表 5 獎(jiǎng)勵(lì)記錄表（ Reward） 字段名 數(shù)據(jù)類型 (長度 ) 必添字段 說 明 RID 自動(dòng)編號(hào) 是 記錄號(hào)（主關(guān)鍵字） StudentID 文本（ 8） 是 學(xué)號(hào) Reward 文本（ 20） 是 獎(jiǎng)勵(lì)類型 RecDate 短日期 是 記錄日期 Description 備注 否 獎(jiǎng)勵(lì)具體說明 Visual Basic 數(shù)據(jù)庫編程教程 學(xué)生信息管理系統(tǒng) 167。 2 數(shù)據(jù)庫設(shè)計(jì) 三、數(shù)據(jù)庫邏輯結(jié)構(gòu)設(shè)計(jì) 表 3 學(xué)生基本信息表（ Student） 字段名 數(shù)據(jù)類型 (長度 ) 必添字段 說 明 StudentID 文本（ 8） 是 學(xué)號(hào)（主關(guān)鍵字） Name 文本（ 8） 是 姓名 Sex 文本（ 2） 是 性別 ClassID 文本（ 6） 是 班級(jí)編號(hào) Birthday 短日期 否 出生日期 Native 文本（ 16） 否 籍貫 Visual Basic 數(shù)據(jù)庫編程教程 學(xué)生信息管理系統(tǒng) 167。 2 數(shù)據(jù)庫設(shè)計(jì) 三、數(shù)據(jù)庫邏輯結(jié)構(gòu)設(shè)計(jì) 表 1 院系設(shè)置信息表（ Department） 字段名 數(shù)據(jù)類型(長度 ) 必添字段 說 明 DepartID 文本（ 2） 是 院系編號(hào)（主關(guān)鍵字） DepartName 文本（ 20） 是 院系名稱 DepartHead 文本（ 8） 否 院系領(lǐng)導(dǎo) Telephone 文本（ 13） 否 領(lǐng)導(dǎo)聯(lián)系電話 Description 備注 否 院系描述 Visual Basic 數(shù)據(jù)庫編程教程 學(xué)生信息管理系統(tǒng) 167。 6個(gè)數(shù)據(jù)表的結(jié)構(gòu)如表所示 。 ER圖 ， 通過簡單的優(yōu)化 ， 可以設(shè)計(jì) 6個(gè)關(guān)系模式 （ 即數(shù)據(jù)表 ） 來存儲(chǔ)所有的信息 。 Visual Basic 數(shù)據(jù)庫編程教程 學(xué)生信息管理系統(tǒng) 167。 多方的實(shí)體的關(guān)鍵字是該關(guān)系模式的關(guān)鍵字； ? 每個(gè) m： n的聯(lián)系轉(zhuǎn)換成一個(gè)關(guān)系模式 。 本系統(tǒng)采用關(guān)系模型 ， 轉(zhuǎn)換的原則是： ? 每個(gè)實(shí)體轉(zhuǎn)化成一個(gè)關(guān)系模式 （ 即數(shù)據(jù)表 ） ， 實(shí)體的屬性就是關(guān)系的屬性 ， 實(shí)體的關(guān)鍵字就是關(guān)系的關(guān)鍵字； ? 每個(gè) 1： 1的聯(lián)系轉(zhuǎn)換成一個(gè)關(guān)系模式 。 數(shù)據(jù)庫邏輯設(shè)計(jì)的任務(wù)是將概念結(jié)構(gòu)轉(zhuǎn)換成特定 DBMS所支持的數(shù)據(jù)庫模型 。 學(xué) 籍 變 更 記 錄 獎(jiǎng) 勵(lì) 記 錄學(xué) 生班 級(jí)處 罰 記 錄院 系 從 屬獎(jiǎng) 勵(lì)變 更 處 罰從 屬1nnn nn11 1 1班 級(jí) 編 號(hào)班 級(jí) 名