《學生信息管理系統(tǒng)畢業(yè)論文3》由會員分享，可在線閱讀，更多相關《學生信息管理系統(tǒng)畢業(yè)論文3（25頁珍藏版）》請在裝配圖網(wǎng)上搜索。

1、 上海xx大學 畢業(yè)設計（論文、作業(yè)） 畢業(yè)設計（論文、作業(yè)）題目： 學生信息管理系統(tǒng) 分校（站、點）： XX 年級、專業(yè)： 2011秋計算機實用技術 教育層次： 學生姓名： XX 學 號： XXXX

2、XXXXXX 指導教師： XXX 完成日期： 2013年X月1X號 II 目錄 內容摘要 I 一、序言 1 二、需求分析 1 三、總體設計 2 （一）系統(tǒng)開發(fā)工具及其介紹 2 1.VB.NET 2 2.SQLServer2005 2 （二）系統(tǒng)模塊及功能 2 （三）系統(tǒng)流程圖 3 （四）系統(tǒng)結構圖 4 四、 數(shù)據(jù)庫設計 4 （一）數(shù)據(jù)庫表結構的詳細設計 4 （二） 數(shù)據(jù)庫表之間的關系 6 五 、系統(tǒng)功能代碼

3、實現(xiàn) 7 （一）主窗體設置 7 （二）登錄 7 （三）基礎資料管理 8 1.用戶注冊 8 2.用戶管理 9 （四）學生資料管理 10 1.輸入學生資料 10 2.修改學生資料 12 3.查詢學生資料 13 4.刪除學生資料 14 （五）學生成績管理 15 1.輸入學生成績 15 2.查詢學生成績 16 3.修改學生成績 17 4刪除學生成績 18 （六）班級管理 19 1.學科管理 19 2.班級管理 19 （七）密碼修改 19 六 、小結 20 參考文獻： 20 致謝 21 內容摘要 信息社會的高科技，商品經(jīng)濟化的高效益，使計算機的應用

4、已普及到經(jīng)濟和社會生活的各個領域。計算機已經(jīng)成為我們學習和工作的得力助手。學生信息管理系統(tǒng)是學校教務管理中的一個極為重要的環(huán)節(jié)，它是整個學校管理的核心和基礎。 本文介紹了學生信息管理系統(tǒng)的開發(fā)整個過程，闡述了數(shù)據(jù)庫設計、系統(tǒng)設計和系統(tǒng)實施的全部過程。采用VisualS2005作為開放工具，SQL Server Management Studio作為后臺數(shù)據(jù)庫。本系統(tǒng)具有基本資料管理（用戶注冊、用戶管理兩個模塊功能）、學生信息管理、學生成績管理、班級管理、密碼修改等模塊，可分別完成學生基本信息和學生成績管理的輸入、修改、查詢、刪除等功能。通過學生信息管理系統(tǒng)，可以做到學生信息、成績的規(guī)范管理、

5、科學統(tǒng)計和快速的查詢，從而減少管理方便的工作量。 關鍵詞： VB.NET 數(shù)據(jù)庫 信息管理 學生信息 I 學生信息管理系統(tǒng) 一、序言 隨著科學技術的不斷進步，計算機科學日漸成熟，其強大的功能已為人們深刻認識，它已進入人類社會的各個領域并發(fā)揮著越來越重要的作用。作為計算機應用的一個重要部分，信息管理系統(tǒng)是一個由用戶和計算機組成的進行信息管理、信息收集、存儲處理、傳遞使用和維護的軟件系統(tǒng)。學生信息管理系統(tǒng)是學校地方管理工作過程中不可缺少的部分，對學生信息管理工作，具有著手工管理所無法比擬的優(yōu)點，檢索迅速、查找方便、可靠性高、存儲量大等。這些優(yōu)點能夠極大

6、地提高日常查詢的效率。因此，設計一個功能完整、操作簡便、界面友好的學生信息管理系統(tǒng)已經(jīng)勢在必行。本系統(tǒng)開發(fā)的目的是提高學校管理工作的效率，保證信息的準確和規(guī)范，減少相關人員的工作量，使學校的教務管理工作真正做到科學、合理的規(guī)劃，系統(tǒng)、高效的實施。數(shù)據(jù)庫技術是一種計算機輔助管理數(shù)據(jù)的方法，它研究如何組織和存儲數(shù)據(jù)，如何高效地獲取和處理數(shù)據(jù)。 本文介紹了學生管理系統(tǒng)的設計開發(fā)，主要是基于這樣一種體系，前臺使用VB.NET設計開發(fā)，通過ADO.NET來實現(xiàn)對后臺SQL Server數(shù)據(jù)庫設計管理。從功能上來說，該系統(tǒng)實現(xiàn)課程管理、學生信息管理、成績管理和系統(tǒng)管理功能，基本滿足了用戶在教務管理方面的

7、要求，同時又能解決實際問題，簡化用戶的操作。 二、需求分析 為什么需要學生信息管理系統(tǒng)，以往的手工記錄耗時、耗力，不但浪費了大量的資源，并且得不到充分的信息數(shù)據(jù)保護，所以需要一個既能保護數(shù)據(jù)又能省時省力的管理軟件來進行管理。從而開發(fā)出一款學生信息管理系統(tǒng)，此系統(tǒng)必須具備能夠管理基礎資料信息、學生資料、學生成績、班級管理、密碼修改以及用戶登錄模塊，既然是一款管理軟件，那必然需要管理人員來管理，所以在系統(tǒng)中必須要有對用戶的管理，以方便管理人員對用戶進行管理。系統(tǒng)中的登錄管理模塊可以限制用戶的登錄權限，不同的用戶登陸有著不同的管理權限，如果沒有登陸模塊，那么所有用戶就可以隨便的進入系統(tǒng)，擁有同樣

8、的權限，那樣整個系統(tǒng)就會亂掉，所以需要登陸模塊來限制登陸用戶的權限從而開發(fā)出登陸模塊?；A資料管理模塊可以對用戶進行注冊、修改和刪除，此功能只有管理員才具備，在一個管理軟件中，必須要有一個管理員對系統(tǒng)中所有的用戶進行添加、修改和刪除，從而更好的有效的管理好這款軟件，所以開發(fā)出來了基礎資料管理模塊。對學生的資料管理比較復雜，所以需要對學生的信息進行統(tǒng)一的有序的管理，因為在一個學校中，學生成千上萬，學生的資料數(shù)據(jù)也比較的雜亂，所以需要能夠有序統(tǒng)一的來管理學生信息，學生資料管理模塊是統(tǒng)一的對學生的基本信息進行的添加、刪除、查詢和修改，從而開發(fā)出了學生資料管理模塊。對學生的成績管理也是要有序的管理，學

9、生成績管理模塊是對學生的學生成績輸入、學生成績查詢、學生成績刪除和對成績的修改，手工輸入成績那是避免不了的，但是查看方式比以往的查看成績信息方便多了，一目了然，所以開發(fā)出了學生成績管理模塊。班級管理是對學生所在的班級進行的修改、添加和刪除，因為學生所在的班級一定要規(guī)劃好，才能更好的管理學生，開發(fā)班級模塊只是能夠對更好方便的管理學生，所以開發(fā)出了班級管理模塊。學科管理對學生在某一學期所有課程的管理，對課程的添加、修改和刪除，所以開發(fā)出了課程管理。成績管理模塊是用戶對成績進行查詢使用的，該模塊中用戶可以按班級、學號和課程對學生成績進行查詢，成績查詢模塊只是為了讓用戶更方便的查看成績信息，所以開發(fā)了

10、成績管理模塊。該系統(tǒng)實現(xiàn)課程管理、學生資料管理、學生成績管理、班級管理、成績查詢和系統(tǒng)管理功能，基本滿足了用戶在教務管理方面的要求，并具有良好的可擴充性。 三、總體設計 （一）系統(tǒng)開發(fā)工具及其介紹 1.VB.NET Visual Basic.NET是基于微軟。NETFramework之上的面向對象的中間解釋性語言，可以看作是Visual Basic在。Net Framework平臺上的升級版本，增強了對面向對象的支持。但由于改動太大，導致VB.net對VB的向后兼容性不好，在業(yè)界引起不小的爭議。 大多的VB.Net程序員使用Visual Studio .Net作為IDE（integr

11、ated development environment). SharpDevelop是另一種可用的開源的IDE。VB.Net需要在。Net Framework平臺上才能執(zhí)行。 2.SQLServer2005 SQL Server 2005 是一個全面的數(shù)據(jù)庫平臺，使用集成的商業(yè)智能 (BI) 工具提供了企業(yè)級的數(shù)據(jù)管理。SQL Server 2005 數(shù)據(jù)庫引擎為關系型數(shù)據(jù)和結構化數(shù)據(jù)提供了更安全可靠的存儲功能，使您可以構建和管理用于業(yè)務的高可用和高性能的數(shù)據(jù)應用程序。 SQL Server 2005 數(shù)據(jù)引擎是本企業(yè)數(shù)據(jù)管理解決方案的核心。此外 SQL Server 2005 結合

12、了分析、報表、集成和通知功能。這使您的企業(yè)可以構建和部署經(jīng)濟有效的 BI 解決方案，幫助您的團隊通過記分卡、Dashboard、Web services 和移動設備將數(shù)據(jù)應用推向業(yè)務的各個領域。 與 Microsoft Visual Studio、Microsoft Office System 以及新的開發(fā)工具包（包括 Business Intelligence Development Studio）的緊密集成使 SQL Server 2005 與眾不同。無論您是開發(fā)人員、數(shù)據(jù)庫管理員、信息工作者還是決策者，SQL Server 2005 都可以為您提供創(chuàng)新的解決方案，幫助您從數(shù)據(jù)中更多地獲

13、益。 （二）系統(tǒng)模塊及功能 系統(tǒng)模塊劃分如下所示： 登陸管理模塊：為了系統(tǒng)的安全性，根據(jù)不同權限給出不同服務。 基礎資料模塊：僅系統(tǒng)管理員可用，對這個系統(tǒng)的所有用戶進行管理和新用戶的注冊。 學生資料模塊：僅教務可用，對學生資料的管理，輸入、修改、查詢、刪除等操作。 學生成績模塊：僅今教師可用，對學生成績的管理，輸入、修改、查詢、刪除等操作。 班級管理模塊：對學生班級課程添加、刪除的管理，這是教務教師管理員都有的權限。 密碼修改模塊：對登陸用戶的密碼修改。只限修改登陸號的秘密。 （三）系統(tǒng)流程圖 系統(tǒng)登錄分登陸成功和失敗，失敗則重新登陸或退出，成功則進入相應的權限模塊，基本資

14、料管理模塊、學生資料管理模塊、學生成績管理模塊和班級管理模塊等，基本資料管理模塊主要是對系統(tǒng)中用戶的管理，對用戶進行的添加、修改和刪除。 圖 1 系統(tǒng)流程 （四）系統(tǒng)結構圖 在學生信息管理系統(tǒng)中分為登陸、修改密碼、學生資料管理、學生成績管理、基本資料管理和班級管理，登陸和基本資料管理在系統(tǒng)流程中已作解釋，下面對學生資料管理、學生成績管理和班級管理。學生資料管理中分為輸入學生資料、修改學生資料、查詢學生資料和刪除學生資料。學生成績管理中分為輸入學生成績、修改學生成績、查詢學生成績和刪除學生成績，手工輸入成績那是避免不了的，但是查看方式比以往的查看成績信息方便多了，一目了然。學生成

15、績查詢的開發(fā)是能讓用戶更詳細的查詢到某一個學生、班級、課程的所有信息。班級管理分為班級管理、學科管理，對班級和學科進行添加、修改和刪除的管理，相對以往的手工管理方便的很多。 圖 2 系統(tǒng)結構 四、 數(shù)據(jù)庫設計 （一）數(shù)據(jù)庫表結構的詳細設計 本系統(tǒng)采用SQL Server 2000數(shù)據(jù)庫系統(tǒng)，在該系統(tǒng)中新建一個數(shù)據(jù)庫，將其命名為xsxx，然后再在該數(shù)據(jù)庫中創(chuàng)建5個數(shù)據(jù)表： 用戶表其中姓名是用戶表的用戶名,它是用來用戶登錄用戶表,其字段都不為空,姓名設為主鍵。如下圖3所示： 圖3 用戶表 成績表是來存放科目成績的，其中ID為主鍵而且序號是自增長（也就是標識為是），除ID以外其它字

16、段都為空。如圖4所示： 圖4 成績表 科目表存放著科目信息字段有科目編號、科目名稱，科目編號設為主鍵，兩個字段都不允許為空，如圖5所示： 圖5 科目表 學生基本信息表存放了學生的基本信息，其中電話、住址和相片的字段允許為空其余的不允許為空，學號設為主鍵如下圖6所示： 圖6 學生基本信息表 班級表存放著班級信息字段有班號、班級其字段都不為空，班號設為主鍵。如圖7所示： 圖7 班級表 （二） 數(shù)據(jù)庫表之間的關系 數(shù)據(jù)庫表之間的關系如圖8所示。 圖8數(shù)據(jù)庫表之間的關系 五 、系統(tǒng)功能代碼實現(xiàn) （一）主窗體設置 前面已

17、經(jīng)介紹了本系統(tǒng)的模塊劃分，每個子模塊就代表一個窗體。主窗體有三個界面都是一樣的。主窗體就是將各個子窗體通過菜單項結合在一起，方便調用。不同的用戶擁有不同的權限，管理員在主窗體里只能進入基礎資料管理和修改自己的登錄密碼和班級管理，教師在主窗體除了對學生成績管理和班級管理進行操作外，也可以對自己的登錄密碼進行修改。教務的權限是對學生資料管理、班級管理的操作和對自己登錄密碼的修改。 主窗體界面： 圖9主窗體 功能代碼如下： Dim frl As New 登錄 frl.Show() 用來跳轉界面的，定義新的窗體，在主窗體當用戶單擊這個事件的時候跳轉到這個界面。其它跳轉界面的代

18、碼與此一樣，就此省略。 （二）登錄 程序運行時進入的是主界面，然后要進入登陸界面，在登陸中輸入正確用戶、密碼后才能進入所相對權限的管理，登陸界面有分用戶權限，不同用戶進入后具備的功能不同。 功能代碼如下： For i As Integer = 0 To Me.XsxxDataSet.用戶.Count - 1 If TextBox1.Text.Trim = Me.XsxxDataSet.用戶(i).姓名.Trim And TextBox2.Text.Trim = Me.XsxxDataSet.用戶(i).密碼.Trim Then Form1.Timer1.Tag = Me.

19、XsxxDataSet.用戶(i).權限 Form1.Timer1.Enabled = True Me.Close() Exit Sub End If Next MsgBox("姓名或密碼輸入錯誤!") End Sub 首先進行判斷用戶名和密碼是否為空，如果為空就會報錯。如果在文本框中輸入用戶名和密碼，和數(shù)據(jù)庫中的用戶名密碼進行比對，失敗則系統(tǒng)提示登陸失敗，密碼或用戶名。并判斷用戶類型也就是用戶的權限，給出相應的功能。 登陸界面： 圖10登錄界面 （三）基礎資料管理 基礎資料管理有2個界面。分別是用戶注冊界面，用戶管理界面。 1.用戶注冊

20、 用戶的姓名和密碼不能為空，已經(jīng)注冊過的用戶不能重復注冊，用戶權限采用選擇輸入法。用戶注冊界面只有管理員可以進行注冊，其他用戶不開放。 功能代碼如下： For i As Integer = 0 To Me.XsxxDataSet.用戶.Count - 1 If Me.Text.Trim = Me.XsxxDataSet.用戶(i).姓名.Trim Then MsgBox("該用戶已經(jīng)存在！") Exit Sub End If Next

21、 If TextBox1.Text = "" Or TextBox2.Text = "" Then MsgBox("姓名和密碼不能為空！") Else Me.XsxxDataSet.用戶.Add用戶Row(TextBox1.Text, TextBox2.Text, ComboBox1.SelectedIndex.ToString) Me.用戶TableAdapter.Update(Me.XsxxDataSet.用戶) Me.XsxxDataSet.用戶.AcceptC

22、hanges() MsgBox("注冊成功！") 用戶注冊界面： 圖11用戶注冊 2.用戶管理 用戶管理是對用戶進行刪除和權限修改，窗體使用了DataGridView控件用來顯示用戶表的信息，該窗體只有管理員能進行操作。 Me.用戶TableAdapter.Fill(Me.XsxxDataSet.用戶)’拖拉到界面上自動生成的代碼 Me.DataGridView1.DataSource = Me.用戶BindingSource’這是DataGridView與用戶表綁定 下面的代碼是打在DataGridView的單擊事件下，使單擊DataGridView里

23、的條信息進行修改： TextBox1.Text = Me.XsxxDataSet.用戶(Me.用戶DataGridView.CurrentRow.Index).密碼 If Me.XsxxDataSet.用戶(Me.用戶DataGridView.CurrentRow.Index).權限 = "0" Then ComboBox1.Text = "管理員" ComboBox1.SelectedIndex = 0 End If If Me.XsxxDataSet.用戶(Me.用戶DataGridVi

24、ew.CurrentRow.Index).權限 = "1`" Then ComboBox1.Text = "教師" ComboBox1.SelectedIndex = 1 End If If Me.XsxxDataSet.用戶(Me.用戶DataGridView.CurrentRow.Index).權限 = "2" Then ComboBox1.Text = "教務" ComboBox1.SelectedIndex = 2 End If

25、 權限修改代碼如下： Me.XsxxDataSet.用戶(Me.用戶DataGridView.CurrentRow.Index).密碼 = TextBox1.Text Me.XsxxDataSet.用戶(Me.用戶DataGridView.CurrentRow.Index).權限 = ComboBox1.SelectedIndex.ToString Me.用戶TableAdapter.Update(Me.XsxxDataSet.用戶) Me.XsxxDataSet.用戶.AcceptChanges() MsgBox(

26、"修改成功") 刪除代碼如下： If MsgBox("確定刪除嗎?", MsgBoxStyle.OkCancel) = MsgBoxResult.Ok Then Me.XsxxDataSet.用戶(Me.用戶DataGridView.CurrentRow.Index).Delete() Me.用戶TableAdapter.Update(Me.XsxxDataSet.用戶) Me.XsxxDataSet.用戶.AcceptChanges() 用戶管理界面： 圖12 用戶管理 （四）學生資料管理

27、1.輸入學生資料 按班級逐個輸入新生資料：新生的學號由系統(tǒng)自動生成；用打開文件對話框和圖片對話框控件完成學生相片文件的導入和顯示。 輸入學生資料界面： 圖13輸入學生資料 功能代碼如下： If Me.OpenFileDialog1.ShowDialog = Windows.Forms.DialogResult.OK Then Try Me.PictureBox1.Image = Image.FromFile(Me.OpenFileDialog1.FileName) zx = Tex

28、tBox1.Text + _ Me.OpenFileDialog1.FileName.Substring(Me.OpenFileDialog1.FileName.LastIndexOf(".")) Catch ex As Exception zx = "無.jpg" End Try Else zx = "無.jpg" End If Button3.Enabled = True 以上這段代碼是導入

29、照片功能，只有導入照片后，存入資料按鈕才能有用。在保存新生資料時對輸入項作必要驗證，把新生的相片文件改名為其學號+文件后綴后存放到項目的debug/pc文件夾內。如果沒有正常導入相片文件，則暫時用”無.jif ”相片名稱。 Sub bh() If Me.XsxxDataSet.學生基本信息.Count = 0 Then TextBox1.Text = Me.班級ComboBox.SelectedValue + "1" Exit Sub End If Dim cl As String =

30、 XsxxDataSet.學生基本信息(XsxxDataSet.學生基本信息.Count - 1).學號.Substring(6, 2) If cl.Substring(1, 1) = "9" Then TextBox1.Text = Trim(Me.班級ComboBox.SelectedValue) + "0" + (Val(cl.Substring(0, 1)) + 1).ToString + "0" Else TextBox1.Text = Trim(Me.班級ComboBox.SelectedVal

31、ue) + "0" + cl.Substring(0, 1) + (Val(cl.Substring(1, 1)) + 1).ToString 在輸入學生資料窗體中，有三處代碼要實現(xiàn)學號的自動生成功能，為此，以上編寫一個用戶自定義過程bh（）來實現(xiàn)學號自動生成功能。 If TextBox2.Text = "" Then MsgBox("必須輸入姓名!") Exit Sub End If If zx <> "無.jpg" Then Me.PictureBox1.Image.Sa

32、ve(Application.StartupPath + "/pc/" + zx) End If 以上是存入資料事件過程的代碼。 2.修改學生資料 按班級顯示學生資料，選擇要修改的學生，顯示該學生的所有信息（包括相片圖像），再修改，替換該學生資料額相片后予以保存。 修改學生資料管理界面： 圖14 修改學生資料 這個窗體在運行時不但在班級下拉列表，學生資料數(shù)據(jù)表格里出現(xiàn)了第一個班級名稱和這個班級的學生資料，在修改學生資料的框內，也已經(jīng)顯示了該班第一個學生的資料以待修改。 存入資料按鈕代碼功能代碼如下： Dim n As Integer = Me.學生基

33、本信息DataGridView.CurrentRow.Index Me.XsxxDataSet.學生基本信息(n).姓名 = TextBox2.Text Me.XsxxDataSet.學生基本信息(n).電話 = TextBox3.Text Me.XsxxDataSet.學生基本信息(n).住址 = TextBox4.Text Me.XsxxDataSet.學生基本信息(n).出生日期 = Me.DateTimePicker1.Value Me.XsxxDataSet.學生基本信息(n).性別 = Me.

34、ComboBox2.Text Me.XsxxDataSet.學生基本信息(n).相片 = zx Me.學生基本信息TableAdapter.Update(Me.XsxxDataSet.學生基本信息) Me.XsxxDataSet.學生基本信息.AcceptChanges() 學生基本信息DataGridView_Click事件過程中的代碼如下： Try Dim n As Integer = Me.學生基本信息DataGridView.CurrentRow.Index TextBox1

35、.Text = Me.XsxxDataSet.學生基本信息(n).學號 TextBox2.Text = Me.XsxxDataSet.學生基本信息(n).姓名 TextBox3.Text = Me.XsxxDataSet.學生基本信息(n).電話 TextBox4.Text = Me.XsxxDataSet.學生基本信息(n).住址 Me.DateTimePicker1.Value = Me.XsxxDataSet.學生基本信息(n).出生日期 ComboBox2.

36、Text = Me.XsxxDataSet.學生基本信息(n).性別 zx = Me.XsxxDataSet.學生基本信息(n).相片.Trim Me.PictureBox1.Image = Image.FromFile("./pc/" + zx) Catch ex As Exception End Try 3.查詢學生資料 查詢學生資料可以按照學號和姓名進行詳細查詢，也可以根據(jù)班級索引進行查詢，對查詢學生的基本信息十分便捷。既可以按班級顯示該學生姓名，再選定要查詢的學生完成查詢，也可以按學生的學號或姓

37、名進行模糊查找來完成查詢。 查詢學生資料界面： 圖15 查詢學生資料 查詢功能代碼如下： Try Dim n As Integer = Me.學生基本信息ListBox.SelectedIndex TextBox2.Text = Me.XsxxDataSet.學生基本信息(n).班號 TextBox3.Text = Me.XsxxDataSet.學生基本信息(n).班級 TextBox4.Text = Me.XsxxDataSet.學生基本信息(n).學號

38、 TextBox5.Text = Me.XsxxDataSet.學生基本信息(n).姓名 TextBox6.Text = Me.XsxxDataSet.學生基本信息(n).性別 TextBox7.Text = Me.XsxxDataSet.學生基本信息(n).出生日期 TextBox8.Text = Me.XsxxDataSet.學生基本信息(n).電話 TextBox9.Text = Me.XsxxDataSet.學生基本信息(n).住址 Me.Picture

39、Box1.Image = Image.FromFile("./pc/" + Me.XsxxDataSet.學生基本信息(n).相片) Catch ex As Exception End Try 以上是學生基本信息ListBox_Click的代碼。 If RadioButton1.Checked Then cl = "select * from 學生基本信息 where 學號 like %" + TextBox1.Text.Trim + "%" Else cl = "select

40、 * from 學生基本信息 where 姓名 like %" + TextBox1.Text.Trim + "%" End If Dim ad As New SqlClient.SqlDataAdapter(cl, 學生基本信息TableAdapter.Connection) Me.XsxxDataSet.學生基本信息.Clear() ad.Fill(Me.XsxxDataSet.學生基本信息) 學生基本信息ListBox_Click(sender, e) 以上是“確定”按鈕Button1_Clic

41、k事件過程的代碼。 4.刪除學生資料 刪除學生資料是對錯誤的學生信息、多余的進行刪除，設計簡單，這里就不多做說明了。 刪除學生資料界面： 圖16刪除學生資料 主要功能代碼如下： If MsgBox("確定刪除嗎?", MsgBoxStyle.OkCancel) = MsgBoxResult.Ok Then End If Me.XsxxDataSet.學生基本信息(Me.學生基本信息DataGridView.CurrentRow.Index).Delete() Me.學生基本信息TableAdapter.Up

42、date(Me.XsxxDataSet.學生基本信息) Me.XsxxDataSet.學生基本信息.AcceptChanges() （五）學生成績管理 1.輸入學生成績 按班級逐個輸入學生一門學科成績，一個班級的這門學科成績如果已經(jīng)輸入完畢，就會顯示相應提示，如果這個班級的魔門學科成績輸入到退出了操作，下次進入同一個班級同一門學科成績輸入時，會自動從上次沒有輸入成績的第一個學生開始提示輸入。這樣既符合用戶的工作習慣，提高系統(tǒng)效率，又不會重復某個輸入某個學生的單科成績。 輸入學生成績管理界面： 圖17 輸入學生成績 存入按鈕功能代碼如下： Me.Xsx

43、xDataSet.成績.Add成績Row(Me.XsxxDataSet.學生基本信息(n).學號, Me.科目ComboBox.SelectedValue, TextBox2.Text, Me.班級ComboBox.Text, Me.班級ComboBox.SelectedValue) Me.Validate() Me.成績BindingSource.EndEdit() Me.成績TableAdapter.Update(Me.XsxxDataSet.成績) n += 1 If n < Me.XsxxData

44、Set.學生基本信息.Count Then TextBox1.Text = Me.XsxxDataSet.學生基本信息(n).姓名 TextBox2.Text = 0 Else MsgBox("該班級本門學科成績輸入完畢!") Button1.Enabled = False 班級ComboBox_SelectedIndexChanged事件過程代碼如下： Try Me.成績TableAdapter.FillBy(Me.XsxxDataSet.

45、成績, Me.班級ComboBox.SelectedValue, Me.科目ComboBox.SelectedValue) Me.學生基本信息TableAdapter.FillBy(Me.XsxxDataSet.學生基本信息, Me.班級ComboBox.SelectedValue) n = Me.XsxxDataSet.成績.Count If n < Me.XsxxDataSet.學生基本信息.Count Then TextBox1.Text = Me.XsxxDataSet.學生

46、基本信息(n).姓名 TextBox2.Text = 0 Button1.Enabled = True Else MsgBox("該班級部門學科成績輸入完畢!") Button1.Enabled = False End If Catch ex As Exception End Try 2.查詢學生成績 查詢學生成績既可以按班級和學科顯示該班學生這門學科的成

47、績，也可以按學號或姓名模糊查詢一個學生全部學科的成績。 查詢學生成績界面： 圖18查詢學生成績 班級ComboBox_SelectedIndexChanged事件過程代碼如下： Try Me.成績TableAdapter.FillBy(Me.XsxxDataSet.成績, Me.班級ComboBox.SelectedValue, Me.科目名稱ComboBox.SelectedValue) Me.學生基本信息TableAdapter.FillBy(Me.XsxxDataSet.學生基本信息, Me.班級ComboBox

48、.SelectedValue) Catch ex As Exception End Try Try 確定按鈕過程代碼如下： Me.XsxxDataSet.學生基本信息.Clear() If RadioButton1.Checked Then cl = "select * from 學生基本信息 where 學號 like %" + TextBox1.Text.Trim + "%" Else cl = "select * from 學生基本信息 where 姓

49、名 like %" + TextBox1.Text.Trim + "%" End If Dim ad As New SqlClient.SqlDataAdapter(cl, Me.學生基本信息TableAdapter.Connection) ad.Fill(Me.XsxxDataSet.學生基本信息) ListBox1_Click(sender, e) 3.修改學生成績 修改學生成績，按班級和學科顯示學生成績，選擇要修改的學生，顯示該學生的這門學科成績以待修改，修改后可保存修改結果并在DataGridView

50、.上顯示修改結果。 修改學生成績界面： 圖19修改學生成績 成績DataGridView_Click功能代碼如下： Dim cl As String = XsxxDataSet.成績(成績DataGridView.CurrentRow.Index).學號 TextBox1.Text = XsxxDataSet.學生基本信息.FindBy學號(cl).姓名 TextBox2.Text = XsxxDataSet.成績(成績DataGridView.CurrentRow.Index).科目成績 班級ComboBox_SelectedIn

51、dexChanged事件過程代碼如下： Try Me.成績TableAdapter.FillBy(Me.XsxxDataSet.成績, Me.班級ComboBox.SelectedValue, Me.科目ComboBox.SelectedValue) Me.學生基本信息TableAdapter.FillBy(Me.XsxxDataSet.學生基本信息, Me.班級ComboBox.SelectedValue) 成績DataGridView_Click(sender, e) Catch ex As

52、 Exception End Try 存入代碼事件過程代碼如下： XsxxDataSet.成績(成績DataGridView.CurrentRow.Index).科目成績 = TextBox2.Text Me.成績TableAdapter.Update(Me.XsxxDataSet.成績) Me.XsxxDataSet.成績.AcceptChanges() 4刪除學生成績 刪除學生成績是對錯誤的學生信息、多余的進行刪除，設計簡單，跟刪除學生資料功能一樣，這里也就不多做說明了。 刪除學生成績界面： 圖20刪除學生成績 主要

53、功能代碼如下： If MsgBox("確定刪除嗎?", MsgBoxStyle.OkCancel) = MsgBoxResult.Ok Then End If Me.XsxxDataSet.成績(Me.成績DataGridView.CurrentRow.Index).Delete() Me.成績TableAdapter.Update(Me.XsxxDataSet.成績) Me.XsxxDataSet.成績.AcceptChanges() End Sub （六）班級管理 這兩個比較簡單，不用輸入代碼，只用連

54、接到數(shù)據(jù)源添加到頁面，再與對應的TextBox控件進行綁定就可以了。 1.學科管理 界面如下： 圖21 學科管理 2.班級管理 圖22 班級管理 （七）密碼修改 修改密碼要判斷用戶和密碼控件是否為空外，還要進行比較也就是說兩次確認密碼，其他的功能就不用一一介紹，因為大多和前面界面的代碼基本相識。 密碼修改界面： 圖23修改密碼 功能代碼如下： 用戶登錄自己的賬號后，能對自己的密碼進行修改。 Dim n As Integer = Val(Form1.Tag) Private Sub Button1_Click(ByVal sen

55、der As System.Object, ByVal e As System.EventArgs) Handles Button1.Click If Me.TextBox2.Text.Trim = "" Or TextBox2.Text <> TextBox3.Text Then MsgBox("密碼不能為空，兩次輸入密碼必須一樣!") Exit Sub End If Me.XsxxDataSet.用戶(n).密碼 = TextBox2.Text Me.用戶TableA

56、dapter.Update(Me.XsxxDataSet.用戶) Me.XsxxDataSet.用戶.AcceptChanges() MsgBox("修改密碼成功！") 六 、小結 一個完整的學生管理系統(tǒng)已經(jīng)創(chuàng)建完成。在學生信息管理系統(tǒng)中，首先進行了詳細的需求分析，劃分了課程管理、學籍管理、班級管理、課表管理、成績管理、系別管理和查詢成績模塊，然后進行了數(shù)據(jù)庫的分析與設計，創(chuàng)建數(shù)據(jù)表以及表關聯(lián)，最后通過VB.NET進行了應用程序的開發(fā)，實現(xiàn)了系統(tǒng)中的一些基本功能。 參考文獻： [1]、陳偉平 ，《程序設計應用試驗指導》， 上海高教電子音像出版

57、社 [2]、顧曉梅 ，《數(shù)據(jù)庫應用技術教程》 ，上海XX大學教材 [3]、陳海建 ，《程序設計基礎實驗指導》， 上海XX大學教材 致謝 首先，我要感謝我的指導老師XX，從選題、畢業(yè)設計的制作過程中她給予我悉心指導.XX老師嚴謹?shù)闹螌W態(tài)度，誨人不倦的敬業(yè)精神深深感染著我。 其次，我要感謝我的家人和朋友，尤其是我的家人，雖然你們并不懂我做的課題研究，但是你們給予了我前進的動力和永不放棄的精神； 最后，感謝上海開放大學計算機應用技術（網(wǎng)絡管理）的各位老師的日常教導和培養(yǎng)，你們是良師也是益友，給予我很多幫助。 感謝上海XX大學計算機應用技術（網(wǎng)絡管理）的全體同學給我的真摯幫助。 感謝我的朋友們在生活中陪我走過的每一天。 22