【正文】 = For lngI = 1 To = lngI39。填充表格數據 = 1 = For lngI = 1 To = lngI39。在沒有做課程設計以前覺得課程設計好難，我可能做不了，但是通過這次做課程設計發(fā)現自己錯了。通過這次課程設計使我明白了自己原來知識還比較欠缺，自己要學習的東西還太多，以前上課沒怎么認真聽，現在知道它重要了，幸好為時不晚，我以后要更加的努力學好vb。此外，還得出一個結論：世上無難事，只怕有心人。在整個設計中我懂得了許多東西，也培養(yǎng)了我獨立工作的能力，樹立了對自己工作能力的信心，相信會對今后的學習工作生活有非常重要的影響。雖然這個設計做的也不太好，但是在設計過程中所學到的東西是這次課程設計的最大收獲和財富，使我終身受益。學生成績管理系統是一個不斷發(fā)展的新型學科，任何一個學校要生存要發(fā)展，要高效率地把內部活動有機地組織起來，因為管理這些龐大的體系是非常困難的，要想有機地組織起來，就必須建立與自身特點相適應的成績管理系統。s this ability is convenient and simple and direct to manipulate a database to turn object particularly, mainly pleted to manage the analysis part of the system of system to student39。The system design part mainly introduced design and database design of the system function and code design。從六十年代中期爆發(fā)了著名的軟件危機開始，計算機界就一直在探索軟件開發(fā)理論和方法，以確保計算機技術能夠高效地應用于各領域。盡管開發(fā)人員已經提供了很多解決的方法，但是現在開發(fā)、應用管理信息系統軟件的過程中，仍會碰到以下的情形。只有確定出簡單、安全、高效的開發(fā)設計方法并應用于學生成績管理系統的開發(fā)設計中，才能使先進的計算機工具為個人發(fā)展提供高效的服務:才能開發(fā)出完整靈活的學生成績管理系統，具有良好的可擴充性、適應性，系統安全性能高，具有友好的用戶界面并且操作簡便，因此，學生成績管理系統開發(fā)設計方法的應用研究具有積極的現實意義。本課程設計的目的和任務： 系統設計的實驗環(huán)境硬件要求能運行Windows 2000/XP操作系統的微機系統。 系統設計的預備知識熟悉C語言及C語言開發(fā)工C語言與Access。通過調查,要求系統需要有以下功能: ⑴ 由于操作人員的計算機知識普遍較差,要求有良好的人機界面。⑶ 原始數據修改簡單方便,支持多條件修改 ⑷ 方便的數據查詢，支持多條件查詢。由于本系統管理的對象單一,都是在校學生，且每個數據內容具有較強的關聯性，涉及的計算過程不是很復雜。且學校用于學生管理的微機都是PIII以上的機器，在存儲量、速度方面都能滿足數據庫運行的要求。本系統的設計是在Windows XP中文版操作系統環(huán)境下，使用Visual Basic 。重試/取消 = ”“ If ee = vbNo Then Unload Me Else = ”“ End If Else MsgBox ”對不起，您的輸入次數已達到最大限度！請退出！“, vbExclamation, ”提示信息“ 39。 amp。在查詢的過程你可以利用學號、課程號、專業(yè)名等進行查詢。 student 表學生的各種信息都來源于這個表。 course表此表是記錄學生課程的表。系統維護就是為了保證系統中的各個要素隨著環(huán)境的變化始終處于最新的，正確的工作狀態(tài)。本系統的維護是面向系統中各種構成要素的，根據維護對象的不同，系統維護的內容可分為以下幾類： 本系統對數據的需求是不斷發(fā)生變化的，系統中查詢題目中數據要定期正常更新，或隨環(huán)境及需要的變化而進行調整。隨著系統應用范圍的擴大，應用環(huán)境的變化，系統中的各種代碼都需要進行一定程度的增加、修改、刪除，以及設置新的代碼。在我做設計的過程遇到了許多的困難。在本次畢業(yè)設計中，我要向我的指導老師致以深深的謝意，感謝指導老師在這段時間里在學習上和生活上所給予的悉心的教誨和無微不至的幫助，在我感覺到自己知識有所貧乏的時候給了我細心的指導和技術上的支持。感謝指導老師的耐心輔導。新版)》.機械工業(yè)出版社,2004,1 [13] 魯沐浴.《C語言最新編程技巧200例》.電子工業(yè)出版社,1997，1[14] 梁翎，李愛齊.《C語言程序設計實用技巧與程序實例》.上?？破粘霭嫔?1996，5 [15] 陳國章.《Turbo C程序設計技巧與應用實例》.天津科學技術出版社,1995，5 [16] 王士元.《C高級實用程序設計》.清華大學出版社,1996，6第四篇：學生成績管理系統VB程序登陸登陸Private Sub cmdLogin_Click()If = “ ThenMsgBox(”請輸入用戶名!“) Else Call openconn sql = ”select * from login where username=39。 Trim()amp。 and password=39。 Trim()amp?！? sql, conn, adOpenDynamic, adLockOptimistic If ThenMsgBox ”用戶不存在！“ElseUnload Me End If End If End Sub退出Private Sub cmdRegister_Click()Unload Me End Sub功能選擇選課管理Private Sub cmdChoice_Click() Unload Me End Sub 退出Private Sub cmdExit_Click()End End Sub 查詢Private Sub cmdFind_Click() Unload Me End Sub 成績管理Private Sub cmdGrade_Click() Unload Me End Sub 學生管理Private Sub cmdStu_Click() Unload Me End Sub學生管理添加Private Sub cmdAdd_Click() Unload Me End Sub 刪除Private Sub cmdDel_Click() MsgBox(”刪除成功！“)End Sub 編輯Private Sub cmdEdit_Click() Unload Me End Sub 查找Private Sub cmdFind_Click()39。“ amp。 ”39?！?amp。 ”39。 = (4)39。獲取選中行的第5列數據End Sub 窗體Private Sub Form_Load()Dim sql As StringSet conn = New Set rs = New Call openconnsql = ”select * from stuInfo“ = adUseClient sql, conn, adOpenDynamic, adLockOptimistic, adCmdTextSet = rs 39?！?amp。 ”39。sql1 = ”select * from course“ = adUseClient sql1, conn, adOpenDynamic, adLockOptimistic, adCmdTextSet = rs1 End Sub 窗體Private Sub Form_Load()Dim sql As StringSet conn = New Set rs = New Call openconnsql = ”select * from course“ sql, conn, adOpenDynamic, adLockOptimisticDo Until rs(”name“)Loop End Sub選課管理返回Private Sub cmdReturn_Click() Unload Me End Sub 提交Private Sub cmdSubmit_Click()If txtID = ”“ ThenMsgBox(”請輸入學號！“) ElseIf = ”“ ThenMsgBox(”請選擇課程！“)ElseDim sql1 As StringDim sql2, name As StringSet rs2 = New Set rs1 = New sql1 = ”select , from score , course where ID=39。 amp。 and name=39。 amp。 and =“name = sql2 = ”select Num from course where name=39。 name amp。“ sql1, conn, adOpenDynamic, adLockOptimistic sql2, conn, adOpenDynamic, adLockOptimisticIf Thenrs1(”ID“)= rs1(”Num“)= rs2(”Num“)MsgBox(”選課成功！“)ElseMsgBox(”已選過該課！“)End If End If End Sub 窗體Private Sub Form_Load()Dim sql As StringSet conn = New Set rs = New sql = ”select * from course“Call openconn sql, conn, adOpenDynamic, adLockOptimisticDo Until 39?！?amp。 ”39?！?amp。 ”39。判斷學號是否存在 rs(”name“)= rs(”sex“)= rs(”age“)= rs(”pro“)= MsgBox(”修改成功！“)ElseMsgBox(”學號不存在!“)End If End If End Sub 窗體Private Sub Form_Load()txtID = rs(”ID“)txtName = rs(”name“)txtSex = rs(”sex“)txtAge = rs(”age“) = rs(”pro“)End Sub添加學生返回Private Sub cmdReset_Click() Unload Me End Sub 提交Private Sub cmdSubmit_Click()If = ”“ ThenMsgBox(”學號不能為空！“) ElseIf = ”“ ThenMsgBox(”請輸入姓名！“) ElseIf = ”“ ThenMsgBox(”請輸入性別！“) ElseIf = ”“ ThenMsgBox(”年齡不能為空！“) ElseDim sql As StringSet conn = New Set rs = New Call openconnsql = ”select * from stuInfo where ID=39。 amp?！?sql, conn, adOpenDynamic, adLockOptimisticIf Then39。：① 要求用ACCESS搭建數據庫。③ 使用MSChart圖表控件繪制各種類型的圖表；使用MSFlexGrid表格控件顯示數據信息。（2）增加排名次的功能。（4）用戶可以添加新的院系和專業(yè)名稱。（2）經過密碼檢驗后，顯示主界面，以表格形式顯示數據庫中所有學生的成績信息。（4）“修改”：只允許修改學生成績，不允許修改姓名、院系、專業(yè)和年級。（6）“查詢”：可以根據院系、專業(yè)和年級進行查詢。：401根據問題描述，可以將問題解決分為以下幾個方面：① 進行需求分析確定數據庫的結構，建立相應的數據表。③ 設計主界面，要求有菜單、工具欄和狀態(tài)欄，具體內容按功能要求自行設計。四、難點與提示：（1）本題目中數據庫文件的設計是關鍵，可按如下方法：，包含三個數據表：院系、專業(yè)和成績。（2）ADO控件和數據庫的連接代碼：provider = “provider=”datasource = “data source=” amp。 “”With Adodc1.Mode = adModeReadWrite.ConnectionString = provider amp。” amp。2．評分方法（1）出勤率（2）課程設計準備工作（3）課程設計期間紀律（4）課程設計運行結果（5）課程設計報告（6）答辯情況指導教師： 系主任簽字：日期：403 年月日