【正文】 學(xué)費(fèi)設(shè)置根據(jù)我校實(shí)際情況，各個(gè)專業(yè)的學(xué)費(fèi)不盡相同，且需要在限定時(shí)間內(nèi)無欠費(fèi)繳清，因此，該系統(tǒng)在設(shè)計(jì)過程中不涉及到多次繳費(fèi)的功能。學(xué)費(fèi)設(shè)置的核心代碼：SQL = update 學(xué)費(fèi)信息 set 學(xué)費(fèi) =39。 + Trim() + 39。 where 班級(jí)編號(hào) =39。 + Trim() + 39。 Call ExecuteSQL(SQL, rst, True)SQL = select ,班級(jí)名稱,學(xué)費(fèi) from 班級(jí)信息,學(xué)費(fèi)信息 where = and = 39。 + Trim() + 39。Call viewData(SQL, DataGrid1, False) = ： 學(xué)生繳費(fèi)學(xué)生繳費(fèi)由管理員進(jìn)行操作，輸入學(xué)號(hào)并點(diǎn)擊“查詢”按鈕，系統(tǒng)根據(jù)輸入學(xué)號(hào)的班級(jí)信息進(jìn)行判斷，輸出學(xué)費(fèi)金額，管理員點(diǎn)擊“繳費(fèi)”按鈕，繳費(fèi)狀態(tài)更改為“已交”。 其中助學(xué)貸款項(xiàng)與貸款名單數(shù)據(jù)表相關(guān)，如果貸款名單中有該生記錄，則繳費(fèi)狀態(tài)為“已交”，否則該生為欠費(fèi)狀態(tài)。： 學(xué)生繳費(fèi)運(yùn)行圖 欠費(fèi)處理該功能不需要進(jìn)行輸入操作，系統(tǒng)對(duì)逾期未交清學(xué)費(fèi)的學(xué)生自動(dòng)記錄并進(jìn)行顯示，便于管理員進(jìn)行下發(fā)通知等進(jìn)一步操作。： 欠費(fèi)處理核心代碼：SQL = select ,姓名,班級(jí)名稱,學(xué)費(fèi),繳費(fèi)狀態(tài) from 學(xué)生信息,班級(jí)信息,學(xué)費(fèi)信息,繳費(fèi)信息 where = and = and = and = 39。未交39。Call viewData(SQL, DataGrid1, False) 管理員信息模塊設(shè)計(jì) 管理員添加和刪除添加新管理員角色功能的核心代碼是：SQL = insert into 訪問權(quán)限 values(39。 + Trim() + 39。,39。 + Trim() + 39。,39。管理員39。)Call ExecuteSQL(SQL, rst, False)SQL = select 賬號(hào),權(quán)限 from 訪問權(quán)限 where 權(quán)限= 39。管理員39。 Call viewData(SQL, DataGrid1, False)刪除管理員角色的核心代碼：SQL = delete from 訪問權(quán)限 where 賬號(hào) = 39。 + Trim() + 39。Call ExecuteSQL(SQL, rst, False)SQL = select 賬號(hào),權(quán)限 from 訪問權(quán)限 where 權(quán)限= 39。管理員39。 Call viewData(SQL, DataGrid1, False)： 管理員管理本系統(tǒng)上傳了新生或教師的名單后會(huì)自動(dòng)生成賬號(hào)和密碼，密碼和賬號(hào)相同，可以進(jìn)一步對(duì)密碼進(jìn)行更改，相關(guān)的權(quán)限信息會(huì)保存在“訪問權(quán)限”數(shù)據(jù)表中。而對(duì)管理員用戶，則需要在已有管理員身份登錄的狀態(tài)下進(jìn)行添加或刪除。 密碼的修改密碼更改的核心代碼：If = Or = Or = ThenMsgBox 請(qǐng)將信息填寫完整！, vbOKOnly + vbExclamation, 警告ElseSQL = select 密碼 from 訪問權(quán)限 where 密碼 = 39。 + Trim() + 39。and 賬號(hào) =39。 + 賬號(hào)1 + 39。Call DBExist(SQL)If DBExist(SQL) = False ThenMsgBox 舊密碼錯(cuò)誤！, vbOKOnly + vbExclamation, 警告ElseIf ThenMsgBox 兩次輸入的新密碼不一致！, vbOKOnly + vbExclamation, 警告ElseSQL = update 訪問權(quán)限 set 密碼=39。 + Trim() + 39。 where =39。 + 賬號(hào)1 + 39。Call ExecuteSQL(SQL, rst, True)MsgBox 修改成功！, vbOKOnly, 提示： 密碼更改本系統(tǒng)具有訪問權(quán)限的用戶均能對(duì)自己的密碼進(jìn)行更改，由于三種訪問角色的密碼更改功能一致，故以管理員更改密碼的功能為例進(jìn)行介紹。在管理員“李朝林”登錄時(shí)，系統(tǒng)記錄了訪問者的訪問賬號(hào)，因此登錄者只能對(duì)自己的密碼進(jìn)行更改。首先系統(tǒng)會(huì)對(duì)輸入的舊密碼進(jìn)行核實(shí)，如果輸入的舊密碼與數(shù)據(jù)庫(kù)中的數(shù)據(jù)一致則可以進(jìn)行下一步操作，否則會(huì)報(bào)錯(cuò)，： 舊密碼確認(rèn)失敗“提交”按鈕，舊密碼確認(rèn)正確的情況下，如果新設(shè)定的密碼兩次輸入不一致，： 新密碼確認(rèn)失敗“取消”按鈕，則退出密碼修改界面。5 結(jié)論學(xué)生信息管理系統(tǒng)所管理的對(duì)象是日益擴(kuò)大的學(xué)生群體，數(shù)據(jù)較為龐大，因此在設(shè)計(jì)系統(tǒng)時(shí)多次用到了數(shù)據(jù)庫(kù)。SQL server 2008在Microsoft 的數(shù)據(jù)平臺(tái)上發(fā)布，可以幫助用戶的組織隨時(shí)隨地管理任何數(shù)據(jù)。它提供了一系列豐富的集成服務(wù)，可以對(duì)數(shù)據(jù)進(jìn)行查詢、搜索、同步、報(bào)告和分析之類的操作。Visual Basic （Active Data Object）是微軟開發(fā)的訪問SQL Server的主要數(shù)據(jù)方法，是一種提供訪問各種數(shù)據(jù)庫(kù)的聯(lián)接機(jī)制。ADO模型由一下兩部分組成：一個(gè)是數(shù)據(jù)集（Recordset），與數(shù)據(jù)源斷開并且不需要知道所保持?jǐn)?shù)據(jù)的來源；另一個(gè)是數(shù)據(jù)提供程序，數(shù)據(jù)提供程序能夠與數(shù)據(jù)源連接，并執(zhí)行針對(duì)數(shù)據(jù)源的SQL語句。ADO訪問數(shù)據(jù)庫(kù)可以通過ODBC（Open Database Connectivity）方式訪問SQL Server，可以使用用戶DSN、系統(tǒng)DSN和文件DSN。無論使用哪種方式，均需要在連接數(shù)據(jù)庫(kù)前建立具體的ODBC連接——用戶DSN、文件DSN或者系統(tǒng)DSN，文件DSN更具有安全性。Visual Basic在數(shù)據(jù)庫(kù)應(yīng)用程序的開發(fā)領(lǐng)域中，提供包含數(shù)據(jù)管理（DataManager），數(shù)據(jù)控件（Data Control）以及數(shù)據(jù)編程對(duì)象（數(shù)據(jù)訪問對(duì)象（DAO）遠(yuǎn)程數(shù)據(jù)對(duì)象（RDO）和ActiveX數(shù)據(jù)對(duì)象（ADO））等工具，協(xié)助設(shè)計(jì)人員輕松的連接數(shù)據(jù)庫(kù)文件，并訪問其中的數(shù)據(jù)。所見即所得的開發(fā)界面更加降低了系統(tǒng)的開發(fā)難度。通過對(duì)學(xué)生信息管理系統(tǒng)的開發(fā)實(shí)踐，認(rèn)識(shí)到數(shù)據(jù)庫(kù)的重要性以及其功能的強(qiáng)大，同時(shí)也使我在應(yīng)用軟件的開發(fā)上積累了許多寶貴的經(jīng)驗(yàn)，為以后的工作和學(xué)習(xí)提供了幫助。但由于本人學(xué)識(shí)和經(jīng)驗(yàn)有限，本系統(tǒng)難免存在一些錯(cuò)誤和不足，這些不足和錯(cuò)誤也將是我學(xué)習(xí)的重要資料?？傊?，通過本次設(shè)計(jì)，讓我學(xué)到了很多，積累了較多的經(jīng)驗(yàn)，同時(shí)也認(rèn)識(shí)到自身的不足。致 謝光陰荏苒，四年的大學(xué)生活即將畫上句號(hào)，為期一學(xué)期的畢業(yè)設(shè)計(jì)也即將告一段落，畢業(yè)設(shè)計(jì)陪伴我度過了大學(xué)校園的最后一段難忘的時(shí)光。非常感謝在本次設(shè)計(jì)中幫助我的指導(dǎo)老師于春老師，在百忙之中還要幫我修改論文，并對(duì)我的設(shè)計(jì)進(jìn)行了細(xì)心指導(dǎo)，對(duì)設(shè)計(jì)過程中的很多疑問進(jìn)行了悉心講解，對(duì)內(nèi)容提出了寶貴的意見。沒有于春老師的幫助，我很難完成這次畢業(yè)設(shè)計(jì)的工作，在此，我誠(chéng)摯地向于師表示感謝，并祝于春老師在以后的工作中更加順利。同時(shí)，在即將畢業(yè)之際，我衷心的感謝大學(xué)里我所有的任課老師們。沒有你們的辛勤勞作，就沒有今天的畢業(yè)設(shè)計(jì)成果，設(shè)計(jì)中的每一個(gè)知識(shí)點(diǎn)、每一個(gè)設(shè)計(jì)思想都是老師們耳濡目染的結(jié)果。在以后的工作中，我將會(huì)繼續(xù)把你們傳授的知識(shí)、技能發(fā)揚(yáng)光大，為社會(huì)貢獻(xiàn)自己的一份力量。最后，我將向我的父母致以最崇高的敬意，辛勤養(yǎng)育我已有二十余載，十年寒窗有你們的支持才讓我有機(jī)會(huì)進(jìn)入到成都理工大學(xué)廣播影視學(xué)院這個(gè)美麗的大學(xué)校園，認(rèn)識(shí)這里可愛的老師和同學(xué)們。經(jīng)過四年的大學(xué)生活磨練，我即將踏入社會(huì)的大門，我將會(huì)用我的所學(xué)、所得努力奮斗，回報(bào)你們。參考文獻(xiàn)[1] 黃明，梁旭，馮瑞芳. Visual Basic + SQL server ：機(jī)械工業(yè)出版社，[2] 林陳雷，郭安源，葛曉東. Visual Basic ：人民郵電出版社，[3] 溫小敏. Visual ：科學(xué)出版社，2005[4] 徐謖，徐立，吳明旺. Visual ：清華大學(xué)出版社，[5] 王晟. Visual ：清華大學(xué)出版社，[6] 姚一永， server ：電子工業(yè)出版社，[7] 王新民，張彥鈴. Visual Basic 程序設(shè)計(jì)與數(shù)據(jù)庫(kù)應(yīng)用. 北京：電子工業(yè)出版社，[8] 王立豐，王穎峰. Visual Basic中標(biāo)項(xiàng)目案例導(dǎo)航 .北京：科學(xué)出版社，[9] 徐嘯凱，賀桂英. 數(shù)據(jù)庫(kù)基礎(chǔ)與SQL Server 應(yīng)用開發(fā). 北京：清華大學(xué)出版社，[10] 趙致格. 數(shù)據(jù)庫(kù)系統(tǒng)與應(yīng)用（SQL Server）.北京：清華大學(xué)出版社，3