【正文】 e語句的運用。在這里不一一列舉。 = insert into 成績表 (課程代碼,課程名,課程類別,學(xué)分,成績,學(xué)期,姓名,學(xué)號,系科,班級,教工號,任課老師,考試性質(zhì)) values(39。 amp。 Trim() amp。 39。,39。 amp。 Trim() amp。 39。,39。 amp。 Trim() amp。 39。,39。 amp。 Trim() amp。 39。,39。 amp。 Trim() amp。 39。,39。 amp。 Trim() amp。 39。,39。 amp。 Trim() amp。 39。,39。 amp。 Trim() amp。 39。,39。 amp。 Trim() amp。 39。,39。 amp。 Trim() amp。 39。,39。 amp。 Trim() amp。 39。,39。 amp。 Trim() amp。 39。,39。 amp。 Trim() amp。 39。) = objconn = objm () () ()以上成績錄入的主要代碼。 = update 成績表 set 課程代碼=39。 amp。 Trim() amp。 39。,課程名= 39。 amp。 Trim() amp。 39。,課程類別=39。 amp。 Trim() amp。 39。,學(xué)分=39。 amp。 Trim() amp。 39。,成績=39。 amp。 Trim() amp。 39。,學(xué)期=39。 amp。 Trim() amp。 39。,姓名=39。 amp。 Trim() amp。 39。,學(xué)號=39。 amp。 Trim() amp。 39。,系科=39。 amp。 Trim() amp。 39。,班級=39。 amp。 Trim() amp。 39。,教工號=39。 amp。 Trim() amp。 39。,任課老師=39。 amp。 Trim() amp。 39。,考試性質(zhì)= 39。 amp。 Trim() amp。 39。 where 課程代碼=39。 amp。 Trim() amp。 39。 And 學(xué)號=39。 amp。 Trim() amp。 39。 = objconn = objm () () ()以上成績修改的主要代碼查詢代碼就更加的簡單了，將插入代碼改成select語句即可。對已有學(xué)生獎懲情況進(jìn)行查詢。按照學(xué)號查詢。Select語句運用。 = select 學(xué)號,姓名,班級,系科,專業(yè),民族,籍貫,年齡,性別,備注 from 學(xué)生用戶表 主要SQL語句如上。 If = Then MsgBox(請輸入學(xué)號) Else Dim objconn As New Dim objda As New Dim objm As New Dim objdb As New DataSet = Provider=。Data Source=39。..\..\39。 = update 學(xué)生用戶表 set 備注=39。 amp。 Trim() amp。 39。 where 學(xué)號=39。 amp。 () amp。 39。 = objconn = objm () () () MsgBox(成功修改, vbYes, 修改) = select 學(xué)號,姓名,班級,系科,備注 from 學(xué)生用戶表 where 學(xué)號=39。 amp。 Trim() amp。 39。 = objm (objdb) = (0) () End If系統(tǒng)信息（圖省略）本模塊中包含了關(guān)于作者，系統(tǒng)有關(guān)信息等信息，便于用戶瀏覽。用戶的幫助信息用于使用該系統(tǒng)。輸入教師的教工號和口令密碼、學(xué)生的學(xué)號和密碼就可以對本系統(tǒng)的欠缺之處提出意見，也可以作為學(xué)校的教學(xué)意見反饋。 Dim objconn As New 39。 列舉的是學(xué)生的發(fā)送意見，教師意見反饋同學(xué)生。 Dim objda As New Dim objm As New Dim objdb As New DataSet Dim s As String Dim qq As = Provider=。Data Source=39。..\..\39。 () = select * from 學(xué)生用戶表 If Trim() = Then MsgBox(請輸入學(xué)號) Else If Trim() Then s = 學(xué)號=39。 amp。 Trim() amp。 39。 End If If s Then = amp。 where amp。 s End If = objconn qq = If = False Then MsgBox(該學(xué)生不存在, 0 + 48, 提示) = Else If = qq(2).ToString Then Dim q As Integer q = MsgBox(確定發(fā)送嗎？, vbYesNo, 通知) If q = 6 Then () () = Provider=。Data Source=39。..\..\39。 = insert into 用戶反饋表 (用戶ID,用戶名,單位名稱,部門,身份,性別,反饋意見,發(fā)送日期,發(fā)送時間) values(39。 amp。 Trim() amp。 39。,39。 amp。 Trim() amp。 39。,39。 amp。 Trim() amp。 39。,39。 amp。 Trim() amp。 39。,39。 amp。 Trim() amp。 39。,39。 amp。 Trim() amp。 39。,39。 amp。 Trim() amp。 39。,39。 amp。 () amp。 39。,39。 amp。 (TimeOfDay) amp。 39。 ) = objconn = objm () () () MsgBox(成功發(fā)送, vbYes, 通知) = select * from 用戶反饋表 where 用戶ID=39。 amp。 Trim() amp。 39。 = objm (objdb) = (0) () End If End If () () End If本模塊是一個附件功能，在這里就不詳細(xì)講解了。實現(xiàn)的是模糊查詢。對于不同用戶的習(xí)慣對窗體進(jìn)行切換，以適應(yīng)廣大用戶。返回到初始窗體模式。第5章 總結(jié)內(nèi)容在本系統(tǒng)的開發(fā)過程中，由于本人是初次開發(fā)軟件，在知識、經(jīng)驗方面都存在著不足。另外，在整個開發(fā)的過程中，時間也比較倉促。因此，該系統(tǒng)必然會存在一些缺陷和不足。因為對學(xué)生管理的整個流程不夠熟悉，在需求分析時未能做到完全滿足用戶的需求。雖然網(wǎng)絡(luò)在學(xué)生管理系統(tǒng)中的應(yīng)用不是很多，但是未來的發(fā)展方向，在本次開發(fā)過程由于硬件的限制，未能實現(xiàn)網(wǎng)絡(luò)功能 。盡管本管理系統(tǒng)存在著很多不足，但其功能全面、易于日后程序更新、數(shù)據(jù)庫管理容易、界面友好、操作方便、效率高、安全性好等優(yōu)點是本管理系統(tǒng)所必需的。相信本學(xué)生管理系統(tǒng)是一套學(xué)校在日常管理中必不可少的管理軟件，通過開發(fā)這個系統(tǒng)，我掌握了基本的項目過程，但在這次畢業(yè)設(shè)計中的最大收獲并不是掌握這幾門開發(fā)工具的應(yīng)用，而是學(xué)會了設(shè)計系統(tǒng)的思維方法，以及與同學(xué)們之間相互幫助的精神。確定了本系統(tǒng)的實用價值后，選用了目前最常用也最簡便的Access數(shù)據(jù)庫作為后臺，鑒于ADO在很多程序里的廣泛應(yīng)用，使用ADO來連接數(shù)據(jù)庫將是最為適用的，并且在定義了ADO的連接模塊后，對于將來的升級也會很方便，只要修改一下連接源，就可以輕松的更換后臺，Access適用于單機版，當(dāng)想轉(zhuǎn)換為網(wǎng)絡(luò)版的SQL數(shù)據(jù)庫時，就很容易做到。為了減少系統(tǒng)的數(shù)據(jù)資源，選用了目前最方便的將數(shù)據(jù)交給后臺處理的方法，即使用SQL的語句將數(shù)據(jù)庫交給ACCESS后臺，由后臺來處理，這樣系統(tǒng)的執(zhí)行會加快，也使用程序本身變得簡單。參考文獻(xiàn)本系統(tǒng)的過程中，主要的參考文獻(xiàn)有：1．林陳雷 《Visual 》 人民郵電出版社 20052．龔沛曾 《面向?qū)ο蟪绦蛟O(shè)計系列教材》 高等教育出版社 20053．鄭阿奇 彭作民《Visual 》 機械工程出版社 20054．徐紅 《 Visual Basic可視化程序設(shè)計 》 人民郵電出版社 20065．沈大林 《Visual 》 電子工程出版社 20066．李蘭友 《Visual 應(yīng)用教程(.)》 清華大學(xué)出版社 2006致 謝在論文即將完成之際，回顧緊張但又充實的學(xué)習(xí)班和開發(fā)過程，本人在此向所有關(guān)心我的及幫助我的老師和同學(xué)們致以最真誠的感謝。通過本次課題的設(shè)計，讓我熟練的掌握了制作程序的一些流程及規(guī)劃，在本次畢業(yè)設(shè)計中，我從指導(dǎo)老師黃老師，身上學(xué)到了很多東西。她認(rèn)真負(fù)責(zé)的工作態(tài)度，嚴(yán)謹(jǐn)?shù)闹螌W(xué)精神和深厚的理論水平都使我受益匪淺。她無論在理論上還是在實踐中，都給與我很大的幫助，使我得到很大的提高，這對于我以后的工作和學(xué)習(xí)都有一種巨大的幫助，在此感謝他耐心的輔導(dǎo)。在撰寫論文階段，黃老師幾次審閱我們的論文，提出了許多寶貴意見，沒有她的指導(dǎo)，我們就不能較好的完成課題設(shè)計的任務(wù)。另外，我還要感謝在這幾年來對我有所教導(dǎo)的老師，他們孜孜不倦的教誨不但讓我學(xué)到了很多知識，而且讓我掌握了學(xué)習(xí)的方法，更教會了我做人處事的道理，在此表示感謝。同時，在系統(tǒng)開發(fā)過程中還有同組的同學(xué)也給了我不少幫助，這里表示感謝。45