【正文】 查詢 查詢條件 查詢結(jié)果 P7 查詢 查詢條件 查詢結(jié)果 P8 選課 D5 教師檔案 選課表 選課信息 P9 教師選課 D7 教師檔案 教師選課表 選課信息 D1 第 20 頁 共 36 頁 實(shí)體 ER圖分析 實(shí)體的 ER圖： 實(shí)體有：學(xué)生實(shí)體、課程實(shí)體 、獎(jiǎng)學(xué)金實(shí)體、成績(jī)實(shí)體、教師實(shí)體 。 圖 學(xué)生管理系統(tǒng)主窗體 scholarship_table sno rank pass_table sno password stu_info sno sname sex teleno dorno addr ment data postatus teacher tno teacher_ID stu_score o sno score score_avg score_sum tea_info tno tname sex tzy txl postatus tbz stu_course o ame credit caddr tea_kc tno o 第 25 頁 共 36 頁 用戶登錄窗體的創(chuàng)建 用戶登錄窗體的創(chuàng)建 窗體界面如下： 圖 用戶登錄窗體 系統(tǒng)啟動(dòng)后，將出現(xiàn)上圖界面， 用戶首先選擇登錄身份，之后再輸入用戶名和密碼。既可以在下拉菜單中選擇已存在的學(xué)號(hào)和姓名，也可以手工輸入學(xué)號(hào)或姓名查詢。 “取消”按鈕使查看的幾個(gè)按鈕有效，使修改的幾個(gè)按鈕無效。 第 30 頁 共 36 頁 圖 學(xué)生權(quán)限的成績(jī)查詢窗體 圖 管理員權(quán)限的成績(jī)查詢窗體 主要的代碼如下： Sub message() If Then MsgBox 沒有您要查詢的記錄 !, 64, 提示 Exit Sub End If End Sub Private Sub Command1_Click() b=select ,sname,ame,credit,score fromstu_info,stu_score,stu_course where = and = If = And = Then a = 0 ElseIf = Then a = 1 ElseIf = Then 第 31 頁 共 36 頁 a = 2 Else a = 3 End If Select Case a Case 0 MsgBox 請(qǐng)輸入部分或全部查詢條件 !, 48, 注意 Exit Sub Case 1 = b + and =39。 order by score desc Call message Case 2 = b + and =39。order by score desc Call message Case 3 = b + and =39。and =39。order by score desc Call message End Select End Sub Private Sub Command2_Click() Unload Me End Sub Private Sub DataCombo1_Click(Area As Integer) If Area = 2 Then = select sno,sname from stu_info where sno=39。 Label3 = (1) End If End Sub Private Sub DataCombo2_Click(Area As Integer) If Area = 2 Then = select o,ame from stu_course where o=39。 Label4 = (1) End If End Sub Private Sub Form_Load() = False = False = False = False = False = = = = End Sub 第 33 頁 共 36 頁 結(jié) 論 通過對(duì)學(xué)生管理系統(tǒng)的開發(fā)，我在 XXXX 老師的幫助下進(jìn)一步學(xué)習(xí)了 VISUAL BASIC 的基本原理和使用方法 ，對(duì)數(shù)據(jù)庫的設(shè)計(jì)也 進(jìn)一步的 掌握 。 在本系統(tǒng)的設(shè)計(jì)與實(shí) 現(xiàn)的 過程中，由于本人是初次開發(fā)軟件，在知識(shí)、經(jīng)驗(yàn)方面都存在著不足。雖然網(wǎng)絡(luò)在本學(xué)生管。因此，該系統(tǒng)必然會(huì)存在一些缺陷和不足。更重要的是，學(xué)會(huì)了如何將自已所學(xué)的知識(shí)運(yùn)用到實(shí)際中去，這對(duì)于即將走向社會(huì)的我來說是受益非淺。 amp。 第 32 頁 共 36 頁 amp。 amp。 amp。 amp。 amp。 課程信息查詢窗體 圖 學(xué)生課程信息查詢窗體 通過本窗體，可選用學(xué)號(hào)或姓名中任意查詢條件對(duì)學(xué)生所選課程進(jìn)行查詢，在學(xué)號(hào)或姓名的 Listbox 顯示相應(yīng)的學(xué)生姓名或?qū)W號(hào)，便于查詢。下面以學(xué)生信息添加窗體為例做簡(jiǎn)要說明： ① 學(xué)生信息添加窗體界面： 第 27 頁 共 36 頁 圖 學(xué)生信息添加窗體 Private Sub Command1_Click() On Error GoTo warn If Text1 = Or Text2 = Or Text4 = Or Text5 = Or Text6 = Or Text7 = Then MsgBox 請(qǐng)輸入完的數(shù)據(jù) !, 48, 警告 Exit Sub End If With Data1 . .Recordset(sno) = Text1 .Recordset(sname) = Text2 .Recordset(sex) = optsex .Recordset(teleno) = Text4 .Recordset(dorno) = Text5 .Recordset(addr) = Text6 .Recordset(ment) = Text7 . End With 第 28 頁 共 36 頁 MsgBox 記錄已經(jīng)被保存 !, 64, 提示 Text1 = : Text2 = :: Text4 = : Text5 = : Text6 = : Text7 = : Exit Sub warn: MsgBox 失敗 !您的輸入有誤 ,請(qǐng)重新輸入 , 48, 注意數(shù)據(jù)的有效性 Text1 = Text2 = Option1(0).Value = True Text4 = Text5 = Text6 = Text7 = Exit Sub End Sub Private Sub Command2_Click() Unload Me End Sub Private Sub Form_Load() Option1(0).Value = True = False End Sub Private Sub Option1_Click(Index As Integer) Select Case Index Case 0 optsex = Option1(0).Caption Case 1 optsex = Option1(1).Caption End Select End Sub 說明：本窗體實(shí)現(xiàn)了對(duì)新入學(xué)學(xué)生信息的添加，在應(yīng)用時(shí)只需按各輸入項(xiàng)要求填入信息，點(diǎn)擊“更新”即可。 主要思想流程：輸入，判斷用戶名是否空，空則從新輸入，查詢用戶是否存在，不存在則從新輸入，判斷密碼，若不正確則判斷輸入次數(shù)是否超過 3 次，沒超過從新輸入，超過退出。 數(shù)據(jù)庫 邏輯設(shè)計(jì) 表 學(xué)生信息表 Stu_course(學(xué)生課程表 ) 字段名稱 類型 長(zhǎng)度 備注 Cno(課程號(hào) ) Text 2 主鍵 Cname(課程名稱 ) Text 20 Tno(教師號(hào) ) Text 10 Credit（學(xué)分） Text 2 0 至 4 分 Caddr(上課地點(diǎn) ) Text 20 表 學(xué)生成績(jī)表 Stu score(成績(jī)表 ) 字段名稱 類型 長(zhǎng)度 備注 Cno(課程號(hào) ) Text 2 主鍵，輸入兩位 Sno(學(xué)號(hào) ) Text 3 主鍵，輸入三位 Score(分?jǐn)?shù) ) single 50 Stu_info(學(xué)生信息表 ) 字段名稱 類型 長(zhǎng)度 備注 Sno(學(xué)號(hào) ) Text 3 主鍵，輸入三位 Sname(學(xué)生 姓名 ) Text 10 Sex(姓別 ) Text 2 Teleno(電話號(hào)碼 ) Text 13 Dorno(寢室號(hào) ) Text 3 Addr(住址 ) Text 50 Comment(備注 ) Text 50 Data（出生日期） Dtm 8 Postatus（ 政治面貌 ） Text 10 第 23 頁 共 36 頁 表 獎(jiǎng)學(xué)金表 Scholarship_table(獎(jiǎng)學(xué)金表 ) 字段名稱 類型 長(zhǎng)度 備注 Sno（學(xué)號(hào)） Text 3 主鍵 Rank(等 級(jí) ) Text 15 一等至四等 表 教師信息表 Tea_info(教師信息表 ) 字段名稱 類型 長(zhǎng)度 備注 Tno（教師號(hào)） Text 10 主鍵 Tname（教師姓名） Text 10 Sex（性別） Text 4 Tzy（專業(yè)） Text 20 Txl（學(xué)歷） Text 10 Postatus（ 政治面貌 ） Text 50 Tbz（備注） Text 50 表 教師課程表 Tea_kc (教師課程表 ) 字段名稱 類型 長(zhǎng)度 備注 Cno（課程號(hào)） Text 10 主鍵 Tno（教師號(hào)） Text 10 數(shù)據(jù)表間關(guān)系 表 間關(guān)系的說明： 學(xué)生信息表（ stu_info）與學(xué)生密碼表（ pass_table）、獎(jiǎng)學(xué)金表（ Scholarship_table）之間通過主鍵學(xué)號(hào)（ Sno）相聯(lián)系，學(xué)生信息表（ stu_info）與學(xué)生成績(jī)表（ stu_score）也是通過主鍵學(xué)號(hào)（ Sno）相聯(lián)系；學(xué)生成績(jī)表（ stu_score）與學(xué)生課程表（ stu_course）、教師課程表（ tea_kc）通過主鍵課程號(hào)（ o）相聯(lián)系；教師信息表（ tea_info） 與教師課程表（ tea_kc）、教師密碼表（ teacher）相聯(lián)系，特別說明在系統(tǒng)以教師身份登錄時(shí)，以(teacher_ID)作為密碼。另外還有成績(jī)高級(jí)查詢的功能，可以對(duì)學(xué)生的成績(jī)按課程名稱、學(xué)生學(xué)號(hào)、分?jǐn)?shù)段進(jìn)行復(fù)合查詢；成績(jī)更新子模塊是針對(duì)教師與管理員設(shè)計(jì)的，該模塊中實(shí)現(xiàn)的是對(duì)學(xué)生成績(jī)的添加、修改與刪除功能。 (2)課程管理模塊：該模塊的主要任務(wù)是對(duì)學(xué)生所學(xué)課程相關(guān)信息的查詢和課程信息的添加與修改。 (4)便于擴(kuò)充及維護(hù)。 (9)界面顯示，美觀大方，操作簡(jiǎn)便。 (5)實(shí)現(xiàn)成績(jī)以多種方式顯示，如以數(shù)據(jù)表方式顯示等。 通過對(duì)學(xué)校學(xué)生日常業(yè)務(wù)工作內(nèi)容和信息的分析，確定學(xué)生信息與成績(jī)綜合管理系統(tǒng)的主要功能如下 : (1)實(shí)現(xiàn)基本的數(shù)據(jù)庫操作（包括增加、修改、刪除和查詢）。 用戶需求分析 及系統(tǒng)性能需求分析 學(xué)校管理工作是一個(gè)十分繁重的工作，學(xué)校學(xué)生的管理同樣十分繁重。模型可以幫助分析人員更好的理解軟件系統(tǒng)的信息、功能、和行為，這些模型也是軟件設(shè)計(jì)的基礎(chǔ)。需求分析是指開發(fā)人員要準(zhǔn)確理解用戶的要求，進(jìn)行細(xì)致的調(diào)查分析，將用戶非形式的需求陳述轉(zhuǎn)化為完成的需求定義，再由需求定義轉(zhuǎn)換到相應(yīng)的形式功能規(guī)約 (需求規(guī)格說明 )的過程。 In 和 Not In用來指定某值在和不在某區(qū)間或者集合； All 表示集合中的全部，而 Some 和 Any 則表示集合中的一部分。因此， Top 關(guān)鍵詞經(jīng)常和 Order by 子句一起出現(xiàn)。 1 Group by 子句 Group by 子句的作用是將查詢結(jié)果中的數(shù)據(jù)按指定字段分組， Group by 子句常與統(tǒng)計(jì)函數(shù)一起使用，以對(duì)查詢數(shù)據(jù)實(shí)現(xiàn)分組統(tǒng)計(jì)。 AVG(field)：計(jì)算某個(gè)數(shù)值型字段的平均值。在 SQL語言中查詢是通過 Select 語 句實(shí)現(xiàn)的，最簡(jiǎn)單的 SQL 語句結(jié)構(gòu)如下： Select 字段列表 From 表名 條件查詢 Select 語句除了可以對(duì)字段進(jìn)行篩選以外，還可以對(duì)記錄進(jìn)行篩選和操作，此時(shí)，要用到 Where 字句。所謂的更新是指數(shù)據(jù)已經(jīng)存在于數(shù)據(jù)表，但需要對(duì)其中的數(shù)據(jù)進(jìn)行修改，此時(shí)可以使用 UPDATE 語句實(shí)現(xiàn)。 索引定義語句 索引是加速數(shù)據(jù)查詢的重要手段，索引一旦被建立起