【文章內(nèi)容簡介】 n2_Click()kc = “math” End Sub Private Sub Option3_Click()kc = “English” End Sub該界面代碼如下：Dim kc_條件 As String Dim kc As String Private Sub Command1_Click()kc_條件 = = “select * from stu where ” + kc + “=39?！?+ kc_條件 + “39?！? End SubPrivate Sub Form_Load()kc = “name” End Sub該界面代碼如下： Dim kc_條件 As String Dim kc As String Private Sub Command1_Click()kc_條件 = = “select * from stu where ” + kc + “=39?！?+ kc_條件 + “39?！? End SubPrivate Sub Form_Load()kc = “class” End Sub該界面代碼如下：Private Sub Command1_Click()Dim vb_A As IntegerDim vb_B As IntegerDim vb_C As IntegerDim vb_D As IntegerDim vb_E As IntegerDim Math_A As IntegerDim Math_B As IntegerDim Math_C As IntegerDim Math_D As IntegerDim Math_E As IntegerDim English_A As IntegerDim English_B As IntegerDim English_C As IntegerDim English_D As IntegerDim English_E As Integer = “select * from stu where vb=90”vb_A = = vb_A = “select * from stu where vb=80 and vbvb_B = = vb_B = “select * from stu where vb=70 and vbvb_C = = vb_C = “select * from stu where vb=60”vb_D = = vb_D = “select * from stu where vbvb_B = = vb_E = “select * from stu where math=90”Math_A = = Math_A = “select * from stu where math=80 and mathMath_B = = Math_B = “select * from stu where math=70 and mathMath_C = = Math_C = “select * from stu where math=60 ”Math_D = = Math_D = “select * from stu where mathMath_E = = Math_E = “select * from stu where english=90”English_A = = English_A = “select * from stu where english=80 and englishEnglish_B = = English_B = “select * from stu where english=70 and englishEnglish_C = = English_C = “select * from stu where english=60”English_D = = English_D = “select * from stu where englishEnglish_E = = English_E End SubPrivate Sub Form_Load() = “ = ”“ = ”“ = ”“ = ”“ = ”“ = ”“ = ”“ = ”“ = ”“ = ”“ = ”“ = ”“ = ”“ End Sub該界面代碼如下：Private Sub Command1_Click() = ”select * from stu order by total desc“ For i = 1 To (”mc“).Value = iNext i End SubPrivate Sub Command2_Click() For i = 1 To (”mc“).Value = Null Next i End Sub該界面代碼如下：Private Sub Command1_Click()39。填充表格數(shù)據(jù) = 1 = For lngI = 1 To = lngI39。用Data屬性向MSChart數(shù)據(jù)網(wǎng)格填充數(shù)據(jù) = Val((”vb“).Value) = (”name“).ValueNext lngI = ”VB成績直方圖“ End SubPrivate Sub Command2_Click()39。填充表格數(shù)據(jù) = 1 = For lngI = 1 To = lngI39。用Data屬性向MSChart數(shù)據(jù)網(wǎng)格填充數(shù)據(jù) = Val((”math“).Value) = (”name“).ValueNext lngI = ”Math成績直方圖“ End Sub該界面代碼如下Private Sub Command1_Click()Dim vb As Integer Dim math As Integer Dim english As Integer = ”select * from stu where((math+english+vb)/3=90)or((math+english+vb)/3=85 and(math=100 or english=100 or vb=100))or((vb+english+math)/3=85 and((vb=95 and english =95)or(english=95 and math=95)or(math=95 and vb=95)))and(mc=60 and english=60 and math=60) End Sub五、總結(jié)和體會(huì)想來，當(dāng)時(shí)那會(huì)兒聽說要搞vb課程設(shè)計(jì)的時(shí)候，我可是相當(dāng)激動(dòng)啊，心想，學(xué)的東西終于可以用一用了。并且這次的Vb課程設(shè)計(jì)要持續(xù)兩周的時(shí)間，主要是用vb+access相關(guān)的知識(shí)來實(shí)現(xiàn)學(xué)生成績和信息的管理。這對(duì)于我們這種初次接觸這種東西的人來說，還真是有難度，如果不是老師給了我們足夠的模板和樣例，我想我還真一時(shí)半會(huì)兒，不知道從哪里下手，好在功夫不負(fù)有心人，經(jīng)過幾天時(shí)間的摸索和操作，這個(gè)學(xué)生成績管理系統(tǒng)的雛形終于是出現(xiàn)了，雖說功能不太完善，但還是能滿足基本要求，這讓我很是欣慰。兩周的時(shí)間并不長，一晃就到了，課程設(shè)計(jì)也要畫上句號(hào)了。在這一段時(shí)間里里，不能說我的vb編程能力有了多么大的提高，多么大的飛躍，但我敢說我對(duì)vb和數(shù)據(jù)庫相關(guān)的知識(shí)有了更加深刻的了解和體會(huì)，總結(jié)起來主要有以下幾點(diǎn)：想要用vb做出好的東西來，一定要勤動(dòng)手，不能光看，因?yàn)楹枚噱e(cuò)誤憑看是看不出來的，只有通過自己不斷的操作和修改，才能對(duì)vb的語法結(jié)構(gòu)和流程有自己獨(dú)到的理解；在編程和調(diào)試的過程中，總會(huì)出現(xiàn)一些意想不到的問題。我發(fā)現(xiàn)并不是每一個(gè)問題都能從資料中得到解決方法，有些問題是無法預(yù)料的，這個(gè)時(shí)候就得靠自己去分析了，你必須得非常的細(xì)心，一步一步的進(jìn)行調(diào)試和修改，而且不能急，往往有的錯(cuò)誤就是在你急躁的時(shí)候從你眼皮底下溜過去的，這樣又得重新檢查，到頭來，既費(fèi)時(shí)又費(fèi)力，實(shí)在不行，還可以和同學(xué)一起進(jìn)行討論；在寫代碼的時(shí)候，一定要養(yǎng)成良好的語法習(xí)慣，對(duì)窗體和控件的name屬性和caption屬性，要盡量習(xí)慣用相對(duì)應(yīng)的英文單詞的縮寫或簡寫，因?yàn)檫@樣便于自己的查找和修改，還有就是在寫代碼的時(shí)候，不要圖簡單，一些語法結(jié)構(gòu)總是不寫全，老是用最簡單的形式，如果你對(duì)vb語法結(jié)構(gòu)很熟的話，這沒問題，但對(duì)于我們這樣的初學(xué)者來說，一定不要這樣，因?yàn)闀r(shí)間長了的話，對(duì)一些復(fù)雜一點(diǎn)的程序理解起來會(huì)很吃力的，而且對(duì)其的運(yùn)行過程的了解不能達(dá)到透徹；在數(shù)據(jù)庫的操作部分，一定檢驗(yàn)一下數(shù)據(jù)源的連接成功與否，還有就是在控件與數(shù)據(jù)庫連接的時(shí)候，不要忘了每個(gè)控件的datasource屬性和datafield屬性，要確保其于數(shù)據(jù)庫的成功連接。經(jīng)過本次的vb課程設(shè)計(jì)，讓我對(duì)vb的軟件開發(fā)流程，整體籌劃發(fā)面有了一定的了解和提高，雖說我的專業(yè)并不是計(jì)算機(jī)或者軟件工程相關(guān)的專業(yè)，但我對(duì)vb編程的熱情絲毫不弱，我相信有了這次的經(jīng)歷，對(duì)我以后vb的學(xué)習(xí)有很大的幫助，并祝我在vb或者其他類型的計(jì)算機(jī)語言的編程道路上走得更遠(yuǎn)。第三篇：vb學(xué)生成績管理系統(tǒng)論文目 錄摘要……………………………………………………………………………………….2 第一章 引言...........................................................3 第二章 系統(tǒng)設(shè)計(jì)的目的與要求...........................................3 ....................................................3 ................................................4 ................................................3 ....................................................4第三章 系統(tǒng)的概述.....................................................3 ........................................................3 ........................................................4 第四章 前臺(tái)界面分析...................................................4 登陸界面..........................................................4 ..........................................................6 第五章 數(shù)據(jù)庫的分析...................................................6 YONGHU表...........................................................7 STUDENT 表.........................................................7 SCORE表...........................................................7 COURSE表...........................................................8 第六章 軟件維護(hù).......................................................8 ..........................................................9 ..........................................................9 結(jié)語及致謝............................................................9 參考文獻(xiàn)..............................................................9VB學(xué)生成績管理系統(tǒng)摘要:隨著科學(xué)技術(shù)在管理上越來越深入而廣泛的應(yīng)用，管理信息系統(tǒng)的技術(shù)已逐步成熟。學(xué)生成績管理系統(tǒng)是一個(gè)不斷發(fā)展的新型學(xué)科，任何一個(gè)學(xué)校要生存要發(fā)展，要高效率地把內(nèi)部活動(dòng)有機(jī)地組織起來，因?yàn)楣芾磉@些龐大的體系是非常困難的，要想有機(jī)地組織起來，就必須建立與自身特點(diǎn)相適應(yīng)的成績管理系統(tǒng)。本文對(duì)Visua