【正文】 美觀方面當然是提高審美觀點，盡可能做到界面美觀，可視化并且要方便管理人員使用；功能方面要擴大此系統(tǒng)的功能，以前沒有時間實現(xiàn)的現(xiàn)在要實現(xiàn)出來并且進行功能的擴充；技術方面的改進表現(xiàn)在系統(tǒng)雖然基本上實現(xiàn)了功能要求，但很多方面還沒有考慮仔細，像實現(xiàn)某一功能可以用多個控件，到底用哪個控件最好、最合適、速度最快還是需要重點考慮的，數(shù)據(jù)庫的關系模式可以進一步規(guī)范化，減少冗余現(xiàn)象還有許多不足的地方也要盡可能的找出來。 amp。*********添加學生信息 select * from studentInfo , , adOpenDynamic, adLockPessimistic With rst .AddNew .Fields(stu_no).Value = Trim(Text1) .Fields(name).Value = Trim(Text2) .Fields(sex).Value = sex .Fields(birthdate).Value = Trim(Text3) .Fields(class_no).Value = Trim(Combo1(1)) .Fields(nianzhi).Value = Trim(Combo2(0)) .Fields(tel_no).Value = Trim(Text4) .Fields(address).Value = Trim(Text5) .Fields(memo).Value = Trim(Text6(6)) .Update MsgBox 添加學生信息成功！ , vbOKOnly + vbExclamation, 添加學生信息 End With End Sub 查詢修改學籍信息模塊的界面如圖 所示： 圖 查詢修改學籍信息界面 核心代碼如下： Private Sub Command1_Click() Dim txtSQL As String 39。**********修改密碼 select * from userinfo where user_name=39。 UserName amp。server=(local) UserName = Trim() mysql = select * from userinfo where user_name=39。 Microsoft SQL Server 是一個高性能的關系型數(shù)據(jù)庫管理系統(tǒng)，它具有客戶機 /服務器體系結構，能夠滿足大規(guī)模分布式計算環(huán)境的需要。 (2)開發(fā)系統(tǒng)中，數(shù)據(jù)庫則是用 SQL Server2021 開發(fā)，綜合開發(fā)整個系統(tǒng)都是為了適應學生管理的需要。 本課題的實現(xiàn)途徑 本課題應用軟件工程原則，嚴格按照項目計劃、需求分析、概念設計、邏輯設計、物理設計、編碼、實現(xiàn)與維護等步驟進行。提高了學校的管理能力，為此，用計算機來管理學校的信息，是非常必要的。而對龐大的信息量，需要有學生管理系統(tǒng)來提高學生管理工作的效率。這些優(yōu)點能夠極大地提高工作的效率 ,也是教育的科學化、正規(guī)化管理與世界接軌的重要條件。 客戶 /服務器 (Client/Server)是近年來迅速發(fā)展的分布式信息處理體系結構。 課程設置模塊的主要功能是課程信息的錄入，查詢和刪除。 SQL Server 2021 是 Microsoft 公司開發(fā)的企業(yè)級數(shù)據(jù)庫軟件， SQL Server 2021 beta 的開發(fā)充分利用了 64 位硬件平臺的增強性能。Persist Security Info=False。server=(local) 39。 amp。 stu_no amp。 Trim() amp。力求與實際相結合具有查詢、管理等功能，旨在達到使對學生信息的管理和運營趨于計算機化，使之更加方便、快捷以提高工作效率。 致 謝 值畢業(yè)論文結束，畢業(yè)設計完成之際，我謹向在我畢業(yè)設計過程給予我很多幫助的各位老師和同學表示感謝。 End If End If End If 39。 amp。 MsgBox 恭喜您已成功修改密碼！ , vbOKOnly + vbExclamation, 修改密碼 = = = = End With End If End Sub 第 5 章 學籍信息管理模塊 學籍管理模塊詳細設計 學生信息的增加，查詢，修改的界面如圖 所示： 圖 添加學籍信息界面 核心代碼如下： Private Sub Command1_Click() 39。***********************添加用戶 select * from userinfo , , adOpenDynamic, adLockPessimistic With rst .AddNew .Fields(user_name).Value = Trim(Text1) .Fields(password).Value = Trim(Text2) .Update MsgBox 添加新用戶成功！ , vbOKOnly + vbExclamation, 添加新用戶 End With End Sub 修 改密碼界面如下： 圖 修改密碼界面 核心代碼如下： Private Sub Command1_Click() Dim As New Dim rst As New If Trim() = Then MsgBox 請輸入用戶名！ , vbExclamation + vbOKOnly, 警告 Exit Sub End If If Trim() = Then MsgBox 請輸入您的原始密碼！ , vbExclamation + vbOKOnly, 警告 Exit Sub End If If Trim() = Then MsgBox 請輸入新密碼！ , vbExclamation + vbOKOnly, 警告 Exit Sub End If If Trim() = Then MsgBox 請確認新密碼！ , vbExclamation + vbOKOnly, 警告 Exit Sub End If If (Trim() Trim()) Then MsgBox 您輸入的第二次密碼不正確，請重新輸入！ , vbExclamation + vbOKOnly, 警告 = Exit Sub End If = Provider=。 39。此外，對其它軟件幾乎沒有依賴性，程序健壯性較好。 (4)為了方便領導對信息的查詢，引入