【正文】
Spc(5)。Spc(7)。Spc(9)。Spc(5)。Spc(5)。Spc(5)。Spc(5)。Spc(0)。grade(i).xh。Spc(5)。Spc(5)。Spc(6)。Spc(5)。Spc(6)。Spc(4)。Spc(6)。Spc(8)。Spc(6)。Spc(5)。Spc(8)。Spc(3)。Spc(3)。Spc(3)。Spc(3)。Tab(21)。Tab(13)?!懊巍盕or i = 1 To UBound(grade)t = 0For j = 1 To UBound(prog)If grade(i).score(j)= 95 Thent = t + 1End IfNext jIf grade(i).aver = 90 Or grade(i).rank = 85)ThenPrint Tab(3)。“平均成績”?!皩I(yè)概論”?!拔锢怼薄!癡B”?!皵?shù)學(xué)”?!坝⒄Z”?!靶彰?。“學(xué)號”。Spc(4)。Tab(38)。Tab(25)。grade(i).xh。Spc(2)。Tab(38)?!俺煽儭?For i = 1 To UBound(grade)t = 0For j = 1 To UBound(prog)If grade(i).score(j) 60 Thent = t + 1End IfIf t 1 And grade(i).score(j) 60 ThenPrint Tab(25)。“學(xué)分”?!安患案裾n程”?!靶彰?。“學(xué)號”。Spc(1)。Spc(10)。Spc(10)。Spc(10)。Spc(4)。Spc(2)。Spc(8)。Spc(8)。Spc(5)。grade(i).score(1)。grade(i).xm。 “加權(quán)平均分” amp。prog(i).xf Next i End SubPrivate Sub paiming_Click()39。prog(i).name。在窗口輸出課程的內(nèi)容 Cls Dim i% Print str2 For i = LBound(prog)To UBound(prog)Print prog(i).bh。Spc(4)。Spc(8)。Spc(8)。Spc(5)。grade(i).score(1)。grade(i).xm。}第五篇:簡易學(xué)生成績管理系統(tǒng)Option Explicit Option Base 1 Dim st()As String Dim grade()As chengji, str1$, str2$, prog()As kechengPrivate Sub chengji_Click()39。print_class(class_gishui)。}void main(){struct student class_gishui[N]。for(i=0。}printf(“排序后學(xué)生成績?yōu)椋簄”)。flag=1。class_gishui[j]=class_gishui[j+1]。for(j=0。for(i=0。}void paixu(struct student *class_gishui){int i,j,flag。for(i=0。}printf(“學(xué)生信息表如下:n”)。for(i=0。class_gishui[i].math)。class_gishui[i].english,amp。class_gishui[i].no,amp。i{printf(“第%d個學(xué)生”,i+1)。printf(“請輸入%d個學(xué)生的學(xué)號 姓名 英語 計算機 數(shù)學(xué)n”,N)。}。float math。float english。四、課后作業(yè)制作市場計劃演示文稿第四篇:學(xué)生成績管理系統(tǒng)//*學(xué)生成績管理系統(tǒng)*//includedefine N 3struct student{int no。進行組內(nèi)評價、組間評價,欣賞各小組評價出的優(yōu)秀作品。知識目標(biāo)(1)掌握需求分析的方法(2)概念設(shè)計方法(3)邏輯設(shè)計方法及相關(guān)概念(4)物理設(shè)計方法及相關(guān)概念二、預(yù)備知識預(yù)習(xí)P182P187,了解本次課的授課任務(wù)理解以下概念:數(shù)據(jù)流圖、數(shù)據(jù)字典、ER圖、需求分析(可以借助互聯(lián)網(wǎng)絡(luò)搜集資料加深對概念的理解)了解概念設(shè)計、邏輯設(shè)計方法三、授課過程回答老師根據(jù)預(yù)備知識的要求所提的問題參照課本內(nèi)容通過分小組進行任務(wù)分析,設(shè)計出本小組想要制作的演示文稿的風(fēng)格及主題。學(xué)習(xí)就是在不斷地完善中進步的嘛。但是限于目前知識水平有限、時間比較緊,只能先這樣提交。所以,雖然過程比較艱辛,但是還是蠻開心的。我覺得實習(xí)的意義就在于在犯錯和解決錯誤的過程中成長。后來我通過上網(wǎng)查資料、和同學(xué)探討等方式,終于明白原來是機房的電腦配置中出了點問題。比如,在剛開始使用VB ,我一直無法實現(xiàn)和數(shù)據(jù)庫關(guān)聯(lián)。在前臺方面,第一次使用VB ,雖然具體設(shè)計和代碼大多都是參考書上的講解,但是,我還是學(xué)會了很多東西,特別是前臺設(shè)計的思路。在oracle數(shù)據(jù)庫方面,我又復(fù)習(xí)鞏固了數(shù)據(jù)庫創(chuàng)建、表格創(chuàng)建、視圖、觸發(fā)器、儲存過程、完整性約束等方面知識。查詢到學(xué)號為10110課程名為離散數(shù)學(xué)的學(xué)生成績,在成績文本框更改成績,點擊更新后數(shù)據(jù)庫里的成績就隨之更改了,相應(yīng)的總學(xué)分也會通過儲存過程更改。在成績文本框中輸入新成績或修改舊成績,單擊“更新”按鈕則調(diào)用存儲過程CJ_Data向CJB表中插入一行新成績或修改原來的成績。如果未選該課程則成績?yōu)榭铡O炔樵兊綄W(xué)號為101101的學(xué)生信息,然后載入圖片,點擊更新后數(shù)據(jù)庫的信息就隨之更新了。單擊“刪除”按鈕可以刪除相應(yīng)的學(xué)生記錄。 學(xué)生信息管理窗體頁面設(shè)計:功能展示:通過輸入學(xué)生學(xué)號后單機“查詢”按鈕可以在窗口中的各個控件中顯示當(dāng)前學(xué)生的具體信息。在查詢的結(jié)果中,鼠標(biāo)單擊一行記錄時,可以查看此學(xué)生的備注和照片。 前臺功能實現(xiàn) 主窗體實現(xiàn)代碼:Private Sub search_Click() 0 End Sub Private Sub manage_Click() 0 End Sub Private Sub insert_Click(