【正文】 datasource.CommandType = adCmdTable.RecordSource = “yx”.RefreshEnd With五、課程設(shè)計(jì)時(shí)間：2012年5月10日至2012年7月1日六、課程設(shè)計(jì)進(jìn)行地點(diǎn)：學(xué)校機(jī)房七、書(shū)寫(xiě)設(shè)計(jì)報(bào)告的要求：設(shè)計(jì)報(bào)告中包含以下幾個(gè)方面：①劃分功能模塊②確定各模塊的算法，并加以必要的注釋?zhuān)泻问斋@及心得體會(huì)八、課程設(shè)計(jì)的考核方式及評(píng)分方法402課程設(shè)計(jì)結(jié)束時(shí)，學(xué)生要提交課程設(shè)計(jì)報(bào)告（A4紙打?。?，并將電子文檔和源程序上傳至課程設(shè)計(jì)服務(wù)器中：ftp://找到自已指導(dǎo)教師的文件夾后，進(jìn)入班級(jí)文件夾，再找到自己的文件夾，然后將文檔復(fù)制到該文件夾中即可。 “。 amp?！霸合怠北碇斜４嬖合荡?hào)和名稱(chēng)；“專(zhuān)業(yè)”表中保存專(zhuān)業(yè)代號(hào)和名稱(chēng)，以及所屬院系的代號(hào)；“成績(jī)”表中保存學(xué)生姓名、院系代號(hào)、專(zhuān)業(yè)代號(hào)、年級(jí)和各科成績(jī)。④ 其他界面自行設(shè)計(jì)，滿(mǎn)足基本功能要求即可。② 利用ADO控件與數(shù)據(jù)庫(kù)連接。（7）“圖表繪制”：分別以二維條形圖、二維圓餅圖和三維條形圖的形式顯示學(xué)生成績(jī)中優(yōu)、良、中、及格和不及格的分布情況。（5）“刪除”：可以刪除學(xué)生信息，刪除前進(jìn)行確認(rèn)。（3）“添加”：其中院系、專(zhuān)業(yè)和年級(jí)使用組合框進(jìn)行選擇。三、設(shè)計(jì)方法和基本原理：：設(shè)計(jì)一個(gè)“學(xué)生成績(jī)管理系統(tǒng)”程序，實(shí)現(xiàn)對(duì)學(xué)生成績(jī)的添加、修改、刪除、查詢(xún)和圖表繪制，具體如下：（1）運(yùn)行程序先進(jìn)入“登錄”界面，要求輸入數(shù)據(jù)庫(kù)密碼，如果密碼錯(cuò)誤，給出提示。（3）可以按院系、專(zhuān)業(yè)和年級(jí)計(jì)算平均成績(jī)并繪制圖表。④ 程序界面美觀，運(yùn)行無(wú)差錯(cuò)：在基本要求達(dá)到后，進(jìn)行創(chuàng)新設(shè)計(jì)：（1）允許更改密碼。② 使用ADO控件實(shí)現(xiàn)與數(shù)據(jù)庫(kù)的連接。判斷學(xué)號(hào)是否存在 rs(”ID“)= rs(”name“)= rs(”sex“)= rs(”age“)= rs(”pro“)= MsgBox(”添加成功！“)Unload MeElseMsgBox(”學(xué)號(hào)已存在!)End If End If End Sub第五篇：VB學(xué)生成績(jī)管理系統(tǒng)任務(wù)書(shū)河北聯(lián)合大學(xué)《軟件設(shè)計(jì)基礎(chǔ)VB》課程設(shè)計(jì)任務(wù)書(shū)學(xué)院班級(jí)設(shè)計(jì)人成績(jī)一、題目：學(xué)生成績(jī)管理系統(tǒng)二、目的與要求：：，主要培養(yǎng)學(xué)生使用ACCESS數(shù)據(jù)庫(kù)和ADO控件設(shè)計(jì)信息管理類(lèi)軟件。 ”39。“ amp?！?sql, conn, adOpenDynamic, adLockOptimisticIf Not Then39。 amp。 and =“ = adUseClient sql, conn, adOpenDynamic, adLockOptimistic, adCmdTextSet = rssum1 = 0sum2 = 0n = 0Do While Not sum1 = sum1 + Val(rs(”score“))sum2 = sum2 + Val(rs(”credit“))n = n + 1Loop = Format(sum1 / n, ”“) = sum2 End If End Sub 返回Private Sub cmdReturn_Click() Unload Me End Sub修改學(xué)生信息返回Private Sub cmdReturn_Click() Unload Me End Sub 提交Private Sub cmdSubmit_Click()If = ”“ ThenMsgBox(”學(xué)號(hào)不能為空！“) ElseIf = ”“ ThenMsgBox(”姓名不能為空！“) ElseIf = ”“ ThenMsgBox(”學(xué)分不能為空！“) ElseIf = ”“ ThenMsgBox(”年齡不能為空！“) ElseDim sql As StringSet conn = New Set rs = New Call openconnsql = ”select * from stuInfo where ID=39。 amp。listbox控件利用循環(huán)讀取課程表中的課程名 rs(”name“)Loop End Sub查詢(xún)確定Private Sub cmdOK_Click()If txtID = ”“ ThenMsgBox(”學(xué)號(hào)不能為空！“) ElseDim sql As StringDim sum1, sum2 As SingleDim n As IntegerSet conn = New Set rs = New Call openconnsql = ”select , , from score , course where =39。 ” 39。“ amp。 ”39?！?amp。 ”39。“ amp。 and =“39。 amp。datagrid綁定數(shù)據(jù)源 End Sub成績(jī)查詢(xún)返回 Private Sub cmdReturn_Click() Unload Me End Sub 確定Private Sub Command1_Click() = Trim()+ ”課程成績(jī)“Dim sql1 As StringSet rs1 = New sql1 = ”select , from score, course where name=39。39?！?= adUseClient sql2, conn, adOpenDynamic, adLockOptimistic, adCmdTextIf ThenMsgBox(”查不到相關(guān)信息“)ElseSet = rs2End IfEnd If End If End Sub 返回Private Sub cmdReturn_Click() Unload Me End Sub 輸出窗口Private Sub DataGrid1_RowColChange(LastRow As Variant, ByVal LastCol As Integer)39。 amp?！?= adUseClient sql1, conn, adOpenDynamic, adLockOptimistic, adCmdTextIf ThenMsgBox(”查不到相關(guān)信息“)ElseSet = rs1End IfEnd If ElseIf = ”“ ThenMsgBox(”姓名輸入不能為空!“)ElseDim sql2 As StringSet rs2 = New sql2 = ”select * from stuInfo where name=39。 amp。查詢(xún)功能 If = ”學(xué)號(hào)“ ThenIf = ”“ ThenMsgBox(”學(xué)號(hào)輸入不能為空!“)ElseDim sql1 As StringSet rs1 = New sql1 = ”select * from stuInfo where ID=39。 ”39?！?amp。 ”39?！?amp。參考文獻(xiàn)[1] 宗大華，200461 [2] ,2007，1，14 [3] ，2005427 [4] ，2002,01,01 [5] 于華, Basic．NET應(yīng)用程序的性能[J].計(jì)算機(jī)系統(tǒng)應(yīng)用,2004,10 [6] Basic數(shù)據(jù)庫(kù)開(kāi)發(fā)技術(shù)的探討.[J].丹東紡專(zhuān)學(xué)報(bào),2004,11,4 [7] Picture圖形方法的使用 CAJ原文下載[J]., 1999,04 [8] 譚浩強(qiáng).《C程序設(shè)計(jì)題解與上機(jī)指導(dǎo)（第3版）》.清華大學(xué)出版社,2005,7 [9] 聶雪軍,賀軍/譯.[美]Harvey , Paul /著.《C程序設(shè)計(jì)經(jīng)典教程(第4版)》，清華大學(xué)出版社,2006,3 [10] 李春葆,張植民,肖忠付.《C語(yǔ)言程序設(shè)計(jì)題典》.清華大學(xué)出版社 ,2002,7 [11] 張小潘/譯，[美]科漢/著.《C語(yǔ)言編程（第3版）》.電子工業(yè)出版社 ,2006,3[12] 徐寶文 李志/譯，[美]Brian , Dennis /著.《C程序設(shè)計(jì)語(yǔ)言(第2版使我自身的能力得到了不少的提高，這對(duì)于我以后的工作和學(xué)習(xí)都有一種巨大的幫助。通過(guò)老師和同學(xué)的幫助, 一一化解了困難，并從中學(xué)到了很多編程方面的知識(shí)。結(jié)語(yǔ)及致謝通過(guò)這次的設(shè)計(jì)，讓我對(duì)VB的使用有了進(jìn)一步的了解。此外，數(shù)據(jù)的備份與恢復(fù)，都是數(shù)據(jù)維護(hù)的工作內(nèi)容。系統(tǒng)維護(hù)的目的是保證管理信息系統(tǒng)正常而可靠地運(yùn)行，并能使系統(tǒng)不斷地得到改善和提高，以充分發(fā)揮作用。第五章 軟件維護(hù)在軟件運(yùn)行維護(hù)階段對(duì)軟件產(chǎn)品所進(jìn)行的修改就是維護(hù)。 score表此表是記錄學(xué)生成績(jī)信息表。第四章 數(shù)據(jù)庫(kù)的分析 yonghu表主要是登陸用戶(hù)所用的表。 ”“ Set = conn With (”select * from yonghu“).MoveFirst End With = (0)Do While Not ((0)) Loop = ” End Sub 信息查詢(xún)主要是對(duì)學(xué)生的基本信息和學(xué)生的成績(jī)進(jìn)行查詢(xún)。提示信息，確定 End End If End Sub Private Sub Form_Load()Set conn = New = ”“ = ”Data Source=“ amp。第三章 前臺(tái)界面分析 登陸界面主要代碼Option Explicit Dim m As IntegerDim conn As New Dim rs As New Private rsmc As Public username As String Private Sub cmdOk_Click()Dim ee As String If m 3 Then If Trim()= “ Or = ”“ Then MsgBox ”用戶(hù)名或密碼不能為空！請(qǐng)重新輸入！“, vbInformation, ”登錄信息“ Exit Sub End If Do While Not If (0)= And (1)= Then MsgBox ”歡迎你進(jìn)入學(xué)生成績(jī)管理系統(tǒng),“ Unload Me Exit Sub End If Loop m = m + 1 ee = MsgBox(”用戶(hù)名或密碼錯(cuò)誤！請(qǐng)重新輸入！“, vbCritical + vbRetryCancel, ”登錄信息“)39。在技術(shù)難度方面，由于有指導(dǎo)老師的指導(dǎo)和相關(guān)參考文獻(xiàn)，特別是網(wǎng)上資料，特別是參考其它程序的功能，因此完全可以實(shí)現(xiàn)。因此，比較適合于采用數(shù)據(jù)庫(kù)管理。⑸ 在相應(yīng)的權(quán)限下，刪除數(shù)據(jù)方便簡(jiǎn)單，數(shù)據(jù)穩(wěn)定性好； ⑹ 數(shù)據(jù)計(jì)算自動(dòng)完成，盡量減少人工干預(yù)。⑵ 由于該系統(tǒng)的使用對(duì)象多,要求有較好的權(quán)限管理。第二章 系統(tǒng)的概述本學(xué)生成績(jī)管理系統(tǒng)可以說(shuō)是一個(gè)綜合性的學(xué)校學(xué)生成績(jī)管理系統(tǒng)，這它集成了多種功能，因而具有較強(qiáng)的實(shí)用性和先進(jìn)性。C語(yǔ)言程序設(shè)計(jì)及相應(yīng)的開(kāi)發(fā)環(huán)境。第二章 系統(tǒng)設(shè)計(jì)的目的與要求 系統(tǒng)設(shè)計(jì)的目的本課程設(shè)計(jì)是計(jì)算機(jī)科學(xué)與技術(shù)專(zhuān)業(yè)重要的實(shí)踐性環(huán)節(jié)之一，是在學(xué)生學(xué)習(xí)完《程序設(shè)計(jì)語(yǔ)言(C)》課程后進(jìn)行的一次全面的綜合練習(xí)。學(xué)生成績(jī)管理系統(tǒng)軟件應(yīng)用的好壞直接影響到學(xué)校以及學(xué)校今后發(fā)展。隨著計(jì)算機(jī)技術(shù)不斷發(fā)展、完善，如何開(kāi)發(fā)、應(yīng)用高效率計(jì)算機(jī)軟件、信息系統(tǒng)一直是開(kāi)發(fā)人員在試圖解決的難題。Keywords: visual basic，Student result management the system，database, enquiries第一章 引言在高科技不斷發(fā)展的今天，計(jì)算機(jī)技術(shù)己經(jīng)廣泛應(yīng)用到社會(huì)的各個(gè)領(lǐng)域。s result, the design, database of interface of design etc.。本文對(duì)Visual ，利用其提供的各種面向?qū)ο蟮拈_(kāi)發(fā)工具,尤其是數(shù)據(jù)窗口這一能方便而簡(jiǎn)潔操縱數(shù)據(jù)庫(kù)的智能化對(duì)象，主要完成了對(duì)學(xué)生成績(jī)管理系統(tǒng)的系統(tǒng)分析部分，界面的設(shè)計(jì)、數(shù)據(jù)庫(kù)的設(shè)計(jì)等；系統(tǒng)設(shè)計(jì)部分主要介紹了系統(tǒng)功能設(shè)計(jì)和數(shù)據(jù)庫(kù)設(shè)計(jì)及代碼設(shè)計(jì)；關(guān)鍵詞：visual basic，學(xué)生成績(jī)管理系統(tǒng)，數(shù)據(jù)庫(kù)，查詢(xún)Abstract:Along with science technique is on the management more and more thorough but extensive application, manage information system of technique already gradually result management the system is a new academics which develops continuously, the whichever school wants to exist to want a develop