vb學(xué)生成績(jī)管理系統(tǒng)設(shè)計(jì)源代碼1

中要：學(xué)生成績(jī)管理系統(tǒng)是典型的信息管理系統(tǒng)(MIS),其開(kāi)發(fā)主要包括數(shù)據(jù)庫(kù)的建立和維護(hù)以及前端應(yīng)用程序的開(kāi)發(fā)兩個(gè)方面。對(duì)于前者要求建立起數(shù)據(jù)一致性和完整性強(qiáng)、數(shù)據(jù)安點(diǎn)。本系統(tǒng)主要完成對(duì)學(xué)生情況和學(xué)生成績(jī)的管理，包括數(shù)據(jù)庫(kù)中詢、添加、刪除、修改、報(bào)表等功能。系統(tǒng)的是數(shù)據(jù)庫(kù)中各個(gè)表的，每一個(gè)表的修改都將聯(lián)庫(kù)的修改。詢和多條件功能也是系統(tǒng)的，也有精確之一，在系統(tǒng)中即有單條件查和模糊件修改功能，并具備報(bào)表打印功系統(tǒng)有完整的用戶添加、刪除和能。經(jīng)過(guò)分析,我們使用MICROSOFT公司的VISUALBASIC利用其提供的各種面向?qū)ο蟮拈_(kāi)發(fā)工具,尤其是數(shù)據(jù)窗口這一能方便而簡(jiǎn)潔數(shù)據(jù)庫(kù)的智能化對(duì)象,首先在短時(shí)間內(nèi)建立系統(tǒng)應(yīng)用原型,然后,對(duì)初始原型系統(tǒng)進(jìn)行需求迭代,不斷修正和改進(jìn),直到中要：學(xué)生成績(jī)管理系統(tǒng)是典型的信息管理系統(tǒng)(MIS),其開(kāi)發(fā)主要包括數(shù)據(jù)庫(kù)的建立和維護(hù)以及前端應(yīng)用程序的開(kāi)發(fā)兩個(gè)方面。對(duì)于前者要求建立起數(shù)據(jù)一致性和完整性強(qiáng)、數(shù)據(jù)安點(diǎn)。本系統(tǒng)主要完成對(duì)學(xué)生情況和學(xué)生成績(jī)的管理，包括數(shù)據(jù)庫(kù)中詢、添加、刪除、修改、報(bào)表等功能。系統(tǒng)的是數(shù)據(jù)庫(kù)中各個(gè)表的，每一個(gè)表的修改都將聯(lián)庫(kù)的修改。詢和多條件功能也是系統(tǒng)的，也有精確之一，在系統(tǒng)中即有單條件查和模糊件修改功能，并具備報(bào)表打印功系統(tǒng)有完整的用戶添加、刪除和能。經(jīng)過(guò)分析,我們使用MICROSOFT公司的VISUALBASIC利用其提供的各種面向?qū)ο蟮拈_(kāi)發(fā)工具,尤其是數(shù)據(jù)窗口這一能方便而簡(jiǎn)潔數(shù)據(jù)庫(kù)的智能化對(duì)象,首先在短時(shí)間內(nèi)建立系統(tǒng)應(yīng)用原型,然后,對(duì)初始原型系統(tǒng)進(jìn)行需求迭代,不斷修正和改進(jìn),直到形成用戶滿意的可行系統(tǒng)。：管理信息系統(tǒng)；數(shù)據(jù)庫(kù)；vb6.0；access2000ABSTRACT：ABSTRACT：Studentstatusresultsystemisdevelopmenttwoaspectsthattypicalinformationmanagementsystem,MIS(MIS),itsdevelopmentincludesprimarilythebackgrounddatabasecreateswithsupportandthefrontendappliestheprocedure.Createstorisetotheformerrequesttheconsistencyofdataisstrongwiththeintegrity,thelibrarythatthesafenessofdatalike.Butrequestthelatterverymuchtoapplytheprocedurefunctioncomplete,easyusageetc.characteristics.Thissystemcompletesprimarilytostudent'scircumstancewiththemanagementofstudent'sscore,includethedatabasetheinsidethewatchincrease,modify,deleteetc.hesystemcanalsocompletetothebrowsingofvariousinformation,search,increase,delete,modify,reportetc.function.Systemofnucleusisothertableinaninfluenceforofrelation,eachamodificationofwatchmovinginatableindatabasethatmodificationthatoperationhoursystem,betocompletethelogarithmsaccordingtowillcompletethedatabaseofoneself.Searchthefunctionisalsooneofthenucleusofthesystem,havingnamelyinsystemthesingleconditionsearchtosearchwithmanyconditions,alsohavingtheaccuratesearchtosearchwithblur,systemnotonlycontainstaticconditionsearch,alsohavethedynamicbornconditionsearch,itspurposeisallforthesakeoftheconvenientconsumertouse.Systemcontaincompleteconsumerincrease,deletetomodifythefunctionwiththepassword,theunionhasthereportprintsthefunction.Throughanalysis,weusetheMICROSOFTcompanyVISUALBASICdevelopmenttool,makinguseofitseverykindofthetoolofdevelopmentthatprovidethatfacetotheobject,particularlyisintelligencethatthewindowofdatathisoncanningbeconvenientbutmanipulatethedatabaseinbrieftoturntheobject,createintheinashorttimemanipulatethedatabaseinbrieftoturntheobject,createintheinashorttimefirstsystemapplicationprototype,then,starttothebeginningtheprototypesystemproceedstorequirewiththeiteration,revisingcontinuouslywithimprove,untilformingtheconsumerissatisfiedcanrowsystem.Keywords:MIS；database；vb6.0；access2000目錄目錄 IV第一章緒論 1開(kāi)發(fā)背景 1開(kāi)發(fā)環(huán)境 目錄目錄 IV第一章緒論 1開(kāi)發(fā)背景 1開(kāi)發(fā)環(huán)境 11.2.1VB6.0簡(jiǎn)介 2MicrosoftAccess的使用 2ADO的介紹 31.3課題的來(lái)源 3第二章系統(tǒng)的需求分析 42.1總體需求····················································································4系統(tǒng)總需求概述 4系統(tǒng)目標(biāo) 42.1.32．2系統(tǒng)功能如圖2.1 5·················································································52.2.1系統(tǒng)登陸管理功能 62.2.22.2.32.2.42.2.5查看和修改管理功能 6信息錄入模塊功能管理 72.2.22.2.32.2.42.2.5查看和修改管理功能 6信息錄入模塊功能管理 7模塊的功能 8打印模塊的功能 8第三章概要設(shè)計(jì) 9系統(tǒng)設(shè)計(jì)思路 9界面設(shè)計(jì) 9用戶登陸 93.1.3和錄入 93.1.4數(shù)據(jù)庫(kù)分析 9設(shè)計(jì)簡(jiǎn)述 10vb設(shè)計(jì)的界面簡(jiǎn)述 10Access2000設(shè)計(jì)數(shù)據(jù)庫(kù) 10系統(tǒng)介紹 10運(yùn)行設(shè)計(jì) 113.3E-R圖 12系統(tǒng)環(huán)境與軟件安裝 14硬件環(huán)境要求 14軟件環(huán)境要求 14軟件安裝及運(yùn)行 14第四章詳細(xì)設(shè)計(jì)與實(shí)現(xiàn) 154.1軟件環(huán)境要求 14軟件安裝及運(yùn)行 14第四章詳細(xì)設(shè)計(jì)與實(shí)現(xiàn) 154.1概述 15數(shù)據(jù)庫(kù)設(shè)計(jì) 15課程表 16學(xué)生情況表 164.2.34.2.44.2.5學(xué)生與課程表 16用戶表 17建立ACCESS數(shù)據(jù)庫(kù) 17界面的實(shí)現(xiàn) 20登陸界面 20主界面 234.3.34.3.44.3.5查看和修改信息 24成績(jī)錄入 27學(xué)生信息的錄入 294.3.6·······················································································294.3.6報(bào)表輸出 32第五章系統(tǒng)測(cè)試 34第五章系統(tǒng)測(cè)試 34系統(tǒng)功能測(cè)試 34整體模塊測(cè)試 34系統(tǒng)數(shù)據(jù)庫(kù)測(cè)試 34系統(tǒng)錯(cuò)誤處理測(cè)試 35參考文獻(xiàn) 36致謝 371.1開(kāi)發(fā)背景隨著經(jīng)濟(jì)全球化、管理現(xiàn)代化的到來(lái)，信息化建設(shè)已提到議事日程。競(jìng)爭(zhēng)的大中型企業(yè)等企業(yè)計(jì)劃性。在我國(guó)的各類學(xué)校，尤其是高等院校，近些年由于闊招生員，大大增加了學(xué)校的管理體制的負(fù)擔(dān)，因此，學(xué)生成績(jī)管理系統(tǒng)大大管理系統(tǒng)是度，十分完備的管理層次，是一個(gè)學(xué)校能夠辦學(xué)成功的關(guān)鍵所在。1.1開(kāi)發(fā)背景隨著經(jīng)濟(jì)全球化、管理現(xiàn)代化的到來(lái)，信息化建設(shè)已提到議事日程。競(jìng)爭(zhēng)的大中型企業(yè)等企業(yè)計(jì)劃性。在我國(guó)的各類學(xué)校，尤其是高等院校，近些年由于闊招生員，大大增加了學(xué)校的管理體制的負(fù)擔(dān)，因此，學(xué)生成績(jī)管理系統(tǒng)大大管理系統(tǒng)是度，十分完備的管理層次，是一個(gè)學(xué)校能夠辦學(xué)成功的關(guān)鍵所在。1.2開(kāi)發(fā)環(huán)境開(kāi)發(fā)學(xué)生信息管理系統(tǒng)的軟件主要是MicrosoftVisualBasic6.0和MicrosoftAcces。6.0Windows為廣泛的、易學(xué)易用的面向?qū)ο蟮拈_(kāi)發(fā)工具。VisualBasic提供了大量的控實(shí)現(xiàn)本系統(tǒng)VB是一個(gè)相對(duì)較好的選擇。VB6.0VisualBasic具有數(shù)據(jù)庫(kù)連接和數(shù)據(jù)處理功能，因此完全有資格作為數(shù)據(jù)庫(kù)應(yīng)用程序的開(kāi)發(fā)環(huán)境。Microsoft公司把許多新的數(shù)據(jù)VBAccessFoxPtoParadoxforWindows的直接競(jìng)爭(zhēng)者[2]。實(shí)現(xiàn)本系統(tǒng)VB是一個(gè)相對(duì)較好的選擇。VB6.0VisualBasic具有數(shù)據(jù)庫(kù)連接和數(shù)據(jù)處理功能，因此完全有資格作為數(shù)據(jù)庫(kù)應(yīng)用程序的開(kāi)發(fā)環(huán)境。Microsoft公司把許多新的數(shù)據(jù)VBAccessFoxPtoParadoxforWindows的直接競(jìng)爭(zhēng)者[2]。VisualBasic優(yōu)點(diǎn)：★簡(jiǎn)單性:VisualBasic的代碼甚至不編寫任何代碼就可以數(shù)據(jù)庫(kù)，對(duì)數(shù)據(jù)庫(kù)進(jìn)行瀏覽。Access)那樣局限于特定的比較靈活。★可擴(kuò)充性。VisualBasic是一種可以擴(kuò)充的語(yǔ)言，其中包括在數(shù)據(jù)庫(kù)應(yīng)用方面的擴(kuò)充。在VisualBasic中，可以使用ActiveX控件(以前版本中VBXOLEMicrosoft第開(kāi)發(fā)者提供。有了這些控件，可以很容易地在VisualBasic中增加新功能，擴(kuò)充VisualBasic數(shù)據(jù)存取控制的指令系統(tǒng)。在其它數(shù)據(jù)庫(kù)開(kāi)發(fā)平臺(tái)中，目前還不具備ActiveX控件。AccessAccessMicrosoftoffice,目前已經(jīng)成為世界上最流行地連接相關(guān)的信息而且還對(duì)其他的數(shù)據(jù)庫(kù)系統(tǒng)有所補(bǔ)充[3]操作其它來(lái)源的資Paradox，MicrosoftFoxPro）和服Accesswindows統(tǒng)的高級(jí)應(yīng)用程序開(kāi)發(fā)系統(tǒng)。Access與其它數(shù)據(jù)庫(kù)開(kāi)發(fā)系統(tǒng)之間相當(dāng)顯著的差。SQLAccess差。SQLAccessMicrosoftAccess1.2.3ADOADO(ActiveXDataObject)是Microsoft數(shù)據(jù)庫(kù)應(yīng)用程序開(kāi)發(fā)的新接DB(對(duì)象連接和鑲?cè)氲臄?shù)據(jù)庫(kù))為基礎(chǔ)，經(jīng)過(guò)OLEDB精心包裝后的數(shù)據(jù)庫(kù)訪問(wèn)技術(shù)，利用它可以快速的創(chuàng)建數(shù)據(jù)庫(kù)應(yīng)用程序。ADO提供了一組非常簡(jiǎn)單，將一般通用的數(shù)據(jù)細(xì)節(jié)進(jìn)行封裝的對(duì)象。由于ODBC數(shù)據(jù)源也提供而且還可以應(yīng)用所有的ODBC驅(qū)動(dòng)程序[4]。1.3課題的來(lái)源發(fā)的一個(gè)學(xué)生成績(jī)管理系統(tǒng)。本系統(tǒng)開(kāi)發(fā)后不是為了馬上可以應(yīng)用到實(shí)際工套更為完善的學(xué)生成績(jī)管理系統(tǒng)。第二章系統(tǒng)的需求分析2.1總體需求2.1.1模塊和打印模塊。1.系統(tǒng)登陸模塊：主要完成對(duì)登陸用戶名和進(jìn)行有效性驗(yàn)證，當(dāng)輸入的數(shù)據(jù)合法時(shí)，跳轉(zhuǎn)到主菜單頁(yè)面，進(jìn)行對(duì)應(yīng)的操作查看和修改模塊：在這個(gè)模塊中可以對(duì)學(xué)生的基本信息和學(xué)生的成績(jī)進(jìn)行添加，修改和刪除。信息錄入模塊：可以添加課程，添加成績(jī)和基本信息。2.3.4.模塊：可以對(duì)學(xué)生的基本信息和學(xué)生成績(jī)進(jìn)行。其中學(xué)生。學(xué)生成績(jī)查基本信息的可以通過(guò)學(xué)號(hào)，班級(jí)，專業(yè)院系詢可以通過(guò)學(xué)號(hào)，班級(jí)和全部進(jìn)行。5.打印報(bào)表模塊：可以打印學(xué)生的自然情況，學(xué)生的各科成績(jī)和補(bǔ)考學(xué)生的。2.1.2采用現(xiàn)有的軟件和科學(xué)的管理系統(tǒng)開(kāi)發(fā)方案，完成對(duì)學(xué)生成績(jī)管理的部達(dá)到操作直觀、方便、實(shí)用等要求。第二章系統(tǒng)的需求分析2.1總體需求2.1.1模塊和打印模塊。1.系統(tǒng)登陸模塊：主要完成對(duì)登陸用戶名和進(jìn)行有效性驗(yàn)證，當(dāng)輸入的數(shù)據(jù)合法時(shí)，跳轉(zhuǎn)到主菜單頁(yè)面，進(jìn)行對(duì)應(yīng)的操作查看和修改模塊：在這個(gè)模塊中可以對(duì)學(xué)生的基本信息和學(xué)生的成績(jī)進(jìn)行添加，修改和刪除。信息錄入模塊：可以添加課程，添加成績(jī)和基本信息。2.3.4.模塊：可以對(duì)學(xué)生的基本信息和學(xué)生成績(jī)進(jìn)行。其中學(xué)生。學(xué)生成績(jī)查基本信息的可以通過(guò)學(xué)號(hào)，班級(jí)，專業(yè)院系詢可以通過(guò)學(xué)號(hào)，班級(jí)和全部進(jìn)行。5.打印報(bào)表模塊：可以打印學(xué)生的自然情況，學(xué)生的各科成績(jī)和補(bǔ)考學(xué)生的。2.1.2采用現(xiàn)有的軟件和科學(xué)的管理系統(tǒng)開(kāi)發(fā)方案，完成對(duì)學(xué)生成績(jī)管理的部達(dá)到操作直觀、方便、實(shí)用等要求。2.1.3業(yè)務(wù)總體流程2.12.1系統(tǒng)總體流程圖該學(xué)生成績(jī)成績(jī)管理系統(tǒng)基本流程如下：數(shù)據(jù)庫(kù)中直接進(jìn)行操作或由用戶提交數(shù)據(jù)的輸入：由用戶直接輸入完成。令進(jìn)行操作。數(shù)據(jù)的顯示或提交：通過(guò)運(yùn)用SQL語(yǔ)句連接到數(shù)據(jù)庫(kù)完成相應(yīng)的功能。2．2系統(tǒng)功能模塊，打印報(bào)表模塊。每一部分實(shí)現(xiàn)的功能如下：結(jié)束數(shù)據(jù)庫(kù)數(shù)據(jù)備份2.1.3業(yè)務(wù)總體流程2.12.1系統(tǒng)總體流程圖該學(xué)生成績(jī)成績(jī)管理系統(tǒng)基本流程如下：數(shù)據(jù)庫(kù)中直接進(jìn)行操作或由用戶提交數(shù)據(jù)的輸入：由用戶直接輸入完成。令進(jìn)行操作。數(shù)據(jù)的顯示或提交：通過(guò)運(yùn)用SQL語(yǔ)句連接到數(shù)據(jù)庫(kù)完成相應(yīng)的功能。2．2系統(tǒng)功能模塊，打印報(bào)表模塊。每一部分實(shí)現(xiàn)的功能如下：結(jié)束數(shù)據(jù)庫(kù)數(shù)據(jù)備份顯示或提交數(shù)據(jù)對(duì)各模塊進(jìn)行操作主菜單功能選擇系統(tǒng)登陸2.2.1系統(tǒng)登陸管理功能用戶名和的有效性驗(yàn)證；根據(jù)用戶名判斷用戶是管理員或者普通用戶出錯(cuò)信息提示；登陸模塊的示例如圖2.2：2.2登陸模塊用例圖2.2.22.2.1系統(tǒng)登陸管理功能用戶名和的有效性驗(yàn)證；根據(jù)用戶名判斷用戶是管理員或者普通用戶出錯(cuò)信息提示；登陸模塊的示例如圖2.2：2.2登陸模塊用例圖2.2.2用戶管理：實(shí)現(xiàn)靈活的增加成績(jī)信息；用戶管理：實(shí)現(xiàn)靈活的修改和刪除學(xué)生基本信息。出錯(cuò)信息提示。查看和修改功能如圖2.3:系統(tǒng)管理員系統(tǒng)操作系統(tǒng)登陸成績(jī)添加成績(jī)刪除管理員成績(jī)修改信息修改信息刪除2.3查看和修改功能2.2.3信息錄入模塊功能管理成績(jī)添加：可以添加某門課程的成績(jī)基本信息添加：可以添加學(xué)生名字，學(xué)號(hào)，等信息。信息錄入功能介紹如圖2.4成績(jī)添加管理員課程添加學(xué)生信息添加2.4信息錄入功能成績(jī)添加成績(jī)刪除管理員成績(jī)修改信息修改信息刪除2.3查看和修改功能2.2.3信息錄入模塊功能管理成績(jī)添加：可以添加某門課程的成績(jī)基本信息添加：可以添加學(xué)生名字，學(xué)號(hào)，等信息。信息錄入功能介紹如圖2.4成績(jī)添加管理員課程添加學(xué)生信息添加2.4信息錄入功能2.2.4模塊的功能學(xué)生基本信息的：可以通過(guò)學(xué)號(hào)，班級(jí)，專業(yè)和院系。學(xué)生成績(jī)的：學(xué)號(hào)，班級(jí)和全部2.2.5補(bǔ)考學(xué)生的打印2.2.4模塊的功能學(xué)生基本信息的：可以通過(guò)學(xué)號(hào)，班級(jí)，專業(yè)和院系。學(xué)生成績(jī)的：學(xué)號(hào)，班級(jí)和全部2.2.5補(bǔ)考學(xué)生的打印3.1系統(tǒng)設(shè)計(jì)思路3.1.1界面設(shè)計(jì)用VB設(shè)計(jì)基礎(chǔ)界面，在初步設(shè)計(jì)時(shí)，可以只對(duì)窗體進(jìn)行設(shè)計(jì)，而不涉及程序的內(nèi)容，待窗體設(shè)計(jì)完畢后，再進(jìn)行程序編程，這也是VB的優(yōu)點(diǎn)之一。3.1.2用戶登陸的db5無(wú)效的用戶名或，返回用戶登陸界面。3.1.3學(xué)生信息信息內(nèi)容和錄入數(shù)據(jù)庫(kù)內(nèi)其安全和主屬性的唯一。3.1.4數(shù)據(jù)庫(kù)分析，設(shè)計(jì)一個(gè)用戶表比較出的結(jié)果完全滿足用戶的需求。3.1系統(tǒng)設(shè)計(jì)思路3.1.1界面設(shè)計(jì)用VB設(shè)計(jì)基礎(chǔ)界面，在初步設(shè)計(jì)時(shí)，可以只對(duì)窗體進(jìn)行設(shè)計(jì)，而不涉及程序的內(nèi)容，待窗體設(shè)計(jì)完畢后，再進(jìn)行程序編程，這也是VB的優(yōu)點(diǎn)之一。3.1.2用戶登陸的db5無(wú)效的用戶名或，返回用戶登陸界面。3.1.3學(xué)生信息信息內(nèi)容和錄入數(shù)據(jù)庫(kù)內(nèi)其安全和主屬性的唯一。3.1.4數(shù)據(jù)庫(kù)分析，設(shè)計(jì)一個(gè)用戶表比較出的結(jié)果完全滿足用戶的需求。3.2設(shè)計(jì)簡(jiǎn)述3.2.1vb輸入帳戶以把excel表中的數(shù)據(jù)導(dǎo)入到數(shù)據(jù)庫(kù)中[5]。查找向?qū)?，可以根?jù)各種條件對(duì)學(xué)生進(jìn)行查找，并顯示。成績(jī)，對(duì)成績(jī)進(jìn)行單人或者全班。打印管理，管理員可以打印單人或者全班成績(jī)，并且對(duì)打印的字段進(jìn)行設(shè)置。幫助信息，說(shuō)明作者，版本信息。3.2.2Access2000表包括學(xué)生與課程的各種基本屬性，“學(xué)號(hào)”與“課程”為主屬性。用戶權(quán)限表包括“用戶”號(hào)”，“姓名”和以課程名字命名的屬性，“學(xué)號(hào)”為主屬性。3.2.3系統(tǒng)介紹3.2設(shè)計(jì)簡(jiǎn)述3.2.1vb輸入帳戶以把excel表中的數(shù)據(jù)導(dǎo)入到數(shù)據(jù)庫(kù)中[5]。查找向?qū)?，可以根?jù)各種條件對(duì)學(xué)生進(jìn)行查找，并顯示。成績(jī)，對(duì)成績(jī)進(jìn)行單人或者全班。打印管理，管理員可以打印單人或者全班成績(jī)，并且對(duì)打印的字段進(jìn)行設(shè)置。幫助信息，說(shuō)明作者，版本信息。3.2.2Access2000表包括學(xué)生與課程的各種基本屬性，“學(xué)號(hào)”與“課程”為主屬性。用戶權(quán)限表包括“用戶”號(hào)”，“姓名”和以課程名字命名的屬性，“學(xué)號(hào)”為主屬性。3.2.3系統(tǒng)介紹，信息和課程。如果登陸失敗，則系統(tǒng)。3.1登陸成功3.1系統(tǒng)簡(jiǎn)圖3.2.4各個(gè)模塊在軟件運(yùn)行過(guò)程中能較好的交換信息，處理數(shù)據(jù)[6]。2．運(yùn)行控制：軟件運(yùn)行時(shí)有較好的界面，基本能夠?qū)崿F(xiàn)用戶的數(shù)據(jù)處理要求。3.運(yùn)行時(shí)間:系統(tǒng)的運(yùn)行時(shí)間基本可以用戶所提出的要求.學(xué) 籍 信 息 庫(kù)輸入輸入輸入輸入輸入輸入成績(jī)打印報(bào)表成績(jī)輸入課程輸入信息輸入學(xué)生主界面登陸成功3.1系統(tǒng)簡(jiǎn)圖3.2.4各個(gè)模塊在軟件運(yùn)行過(guò)程中能較好的交換信息，處理數(shù)據(jù)[6]。2．運(yùn)行控制：軟件運(yùn)行時(shí)有較好的界面，基本能夠?qū)崿F(xiàn)用戶的數(shù)據(jù)處理要求。3.運(yùn)行時(shí)間:系統(tǒng)的運(yùn)行時(shí)間基本可以用戶所提出的要求.學(xué) 籍 信 息 庫(kù)輸入輸入輸入輸入輸入輸入成績(jī)打印報(bào)表成績(jī)輸入課程輸入信息輸入學(xué)生主界面用戶登陸學(xué)籍管理系統(tǒng)3.3E-R3.3.1課程管理E-R3.2課程號(hào)課程管理課程名稱授課教師3.2E-R3.3.2E-R3.3E-R學(xué)生與課程學(xué)生與課程3.3E-R3.3.1課程管理E-R3.2課程號(hào)課程管理課程名稱授課教師3.2E-R3.3.2E-R3.3E-R學(xué)生與課程學(xué)生與課程學(xué)生與課程學(xué)生與課程學(xué)生與課程學(xué)生與課程3.3.3學(xué)生信息E-R3.4出生年月學(xué)號(hào)班級(jí)名字性別民族學(xué)生信息附注父母姓名郵政編碼電話號(hào)碼地址專業(yè)院系3.4E-R圖3.3.4用戶管理E-R3.5用戶編號(hào)用戶名稱用戶管理用戶圖3.5 理E-R圖3.3.3學(xué)生信息E-R3.4出生年月學(xué)號(hào)班級(jí)名字性別民族學(xué)生信息附注父母姓名郵政編碼電話號(hào)碼地址專業(yè)院系3.4E-R圖3.3.4用戶管理E-R3.5用戶編號(hào)用戶名稱用戶管理用戶圖3.5 理E-R圖3.4系統(tǒng)環(huán)境與軟件安裝3.4.13（建3.4系統(tǒng)環(huán)境與軟件安裝3.4.13（建128MB。3.4.2MicrosoftAccessVisualBasic6.0臺(tái)，可在Windows95/98/2000（server）/XP操作系統(tǒng)下運(yùn)行.3.4.3軟件安裝及運(yùn)行建議用戶在系統(tǒng)上安裝Microsoft公司的VisualBasic6.0企業(yè)版和運(yùn)行程序。打開(kāi)VisualBasic6.0企業(yè)版，運(yùn)行“student.vbp”工程，或執(zhí)行“student.exe”文件[7]。第四章詳細(xì)設(shè)計(jì)與實(shí)現(xiàn)MicrosoftVisualBasic6.0為開(kāi)發(fā)工具，MicrosoftAccess作為數(shù)據(jù)庫(kù)實(shí)現(xiàn)學(xué)生成績(jī)管理系統(tǒng)各個(gè)模塊的功能。4.1概述WindowsXPMicrosoftAccessMicrosoftVisualBasic6.0畫出幾個(gè)模塊的第四章詳細(xì)設(shè)計(jì)與實(shí)現(xiàn)MicrosoftVisualBasic6.0為開(kāi)發(fā)工具，MicrosoftAccess作為數(shù)據(jù)庫(kù)實(shí)現(xiàn)學(xué)生成績(jī)管理系統(tǒng)各個(gè)模塊的功能。4.1概述WindowsXPMicrosoftAccessMicrosoftVisualBasic6.0畫出幾個(gè)模塊的界面，然后通過(guò)添加程序代碼實(shí)現(xiàn)各個(gè)模塊的功能。4.2數(shù)據(jù)庫(kù)設(shè)計(jì)本系統(tǒng)的數(shù)據(jù)庫(kù)為MicrosoftAccess,既方便操作，又達(dá)到系統(tǒng)設(shè)因此本系統(tǒng)中的數(shù)據(jù)庫(kù)表應(yīng)設(shè)計(jì)的實(shí)體和屬性如下：登陸信息（用戶ID，用戶，用戶編號(hào)）（課程名稱，課程號(hào)，學(xué)號(hào)，備注，成績(jī)）課程信息（課程號(hào)，課程名稱，授課教師）學(xué)生情況信息（學(xué)號(hào)，班級(jí)，名字， ，出生日期， 母姓名，，，專業(yè)，院系，號(hào)碼，附注）4.2.1課程表4.1課程表字段名類型是否為空說(shuō)明課程號(hào)文本否主鍵，課程編號(hào)課程名稱文本否授課教師文本否4.2.2學(xué)生情況表4.2學(xué)生情況表字段名類型是否為空說(shuō)明名字文本否主鍵，學(xué)號(hào)出生日期父母地址備注4.2.3學(xué)生與課程表4.2.1課程表4.1課程表字段名類型是否為空說(shuō)明課程號(hào)文本否主鍵，課程編號(hào)課程名稱文本否授課教師文本否4.2.2學(xué)生情況表4.2學(xué)生情況表字段名類型是否為空說(shuō)明名字文本否主鍵，學(xué)號(hào)出生日期父母地址備注4.2.3學(xué)生與課程表表4.3 學(xué)生與課程表字段名類型（長(zhǎng)度）是否為空說(shuō)明課程號(hào)文本否主鍵，課程編號(hào)學(xué)號(hào)數(shù)字否否否4.2.44.4用戶表字段名類型是否為空說(shuō)明用戶名文本否用戶文本否用戶編號(hào)文本否主鍵4.2.5建立ACCESSACCESS表4.3 學(xué)生與課程表字段名類型（長(zhǎng)度）是否為空說(shuō)明課程號(hào)文本否主鍵，課程編號(hào)學(xué)號(hào)數(shù)字否否否4.2.44.4用戶表字段名類型是否為空說(shuō)明用戶名文本否用戶文本否用戶編號(hào)文本否主鍵4.2.5建立ACCESSACCESSdb5.mdb;4.1建立數(shù)據(jù)庫(kù)db5.md。db5.mdb根據(jù)上面的表格，使用程序設(shè)計(jì)器建立系統(tǒng)需要的表格如圖4.2,4.3,4.4,4.5db5.mdb根據(jù)上面的表格，使用程序設(shè)計(jì)器建立系統(tǒng)需要的表格如圖4.2,4.3,4.4,4.5超級(jí)用戶表課程表學(xué)生表4-3超級(jí)用戶表課程表學(xué)生表4-3課程表學(xué)生與課程表4.3界面的實(shí)現(xiàn)label學(xué)生與課程表4.3界面的實(shí)現(xiàn)label2textboxPublicLoginSucceededAsBooleanIntegerrs.eofflasers.fields(0)text1.text，rs.fields(1)text2.text（用戶都正確）1timer_timerlabel1.left1timer_timerlabel1.left0，0rightlabel0，leftlabel1，label1label1.leftformlabel1rightlabel1leftlabel0，label1button2_click（系統(tǒng)）。4-6：登陸界面主要代碼：PrivateSubcmdOK_Click()OnErrorGoToerrh:rsAsADODB.RecordsetSetrs=cn.Execute("SELECTUserName,PasswordIfrs.EOFThenrs.CloseSetrs=NothingUnloadMeFROM超級(jí)用戶")LoadFrmMainExitSubEndIfrs.MoveFirstLoadFrmMainExitSubEndIfrs.MoveFirst'校驗(yàn)是否為超級(jí)用戶DoIfrs.Fields("UserName")=txtUserName.TextThenIfrs.Fields("Password")=txtPassword.TextThenUserType=TrueLoginSucceeded=Truers.CloseIftxtPassword.Text="Admin"ThenIsAdmin=TrueUnloadMeLoadFrmMainExitSubExitDoEndIfEndIfrs.MoveNextLoopUntilrs.EOF'校驗(yàn)是否為普通用戶Setrs=cn.Execute("SELECTFROM學(xué)生WHERE&txtPassword.Text&Ifrs.EOFThen學(xué)號(hào)="&"'"MsgBox無(wú)效或用戶名請(qǐng)重試"Login"txtPassword.SetFocusSendKeys"{Home}+{End}"Elsers.CloseUserType=False=TrueUnloadMeLoadFrmMainrs.CloseUserType=False=TrueUnloadMeLoadFrmMainEndIfExitSub4.3.2“主界面”包括菜單和經(jīng)過(guò)處理的圖片組成。在各個(gè)菜單中包含子菜單，enabledtrue（主界面可用）。在Form_Load()般用戶系統(tǒng)管理、信息錄入、打印報(bào)表菜單將不可用。Form_QueryUnload的時(shí)候掉所有窗口的免得造成內(nèi)存泄漏，cn.CloseADO，F(xiàn)orEachfrmInForms4.7主界面4.3.3textbox主界面4.3.3textbox，5combo，12commandbuttondatagridTimercombo可以選擇具體表，datagrid可以顯示選擇表，14個(gè)label分別為“學(xué)號(hào)”、姓名、話號(hào)碼、附注，12個(gè)button分別是“第一個(gè)”、前一個(gè)、下一個(gè)、最后、修（對(duì)基本信息（對(duì)基本信息（成績(jī)）、刪除（對(duì)成績(jī)）OptionExplicitDimrsAsADODB.RecordsetDimrs1AsADODB.RecordsetDimtxtSQLAsStringDimMsgTextAsStringDimmybookmarkAsVariantDimmccleanAsBoolean。DimmybookmarkAsVariantDimmccleanAsBoolean。combo2combo2.additem集使用方法rs.Fields(0)打開(kāi)文件中的中有所有的信息，管理員可以任意選擇想對(duì)應(yīng)的課程和課程號(hào)。出對(duì)并建立的連接，Adodc1.Recordset.UpdateMsgBox"添加成功!"ElseMsgBoxDataGrid2來(lái)。command7_click（修改（對(duì)成績(jī)））中添加代碼。Setrs=cn.Execute("select成績(jī)from學(xué)生與課程where課程號(hào)='"&&and&Trim(Combo2.Text)&and學(xué)號(hào)='"&Trim(Text2.Text)&rsrs.statersdatagriddatagrid2.enabled（由rsdatagrid）；如果不存在則根據(jù)各個(gè)成績(jī),不能修改!”、“該項(xiàng)不能為空,請(qǐng)輸入備注!”、“該項(xiàng)不能為空,請(qǐng)輸入課程名稱!”、“該項(xiàng)不能為空,請(qǐng)輸入課程號(hào)!”、“該項(xiàng)不能為空,請(qǐng)輸入成績(jī)!”。在command8_click（刪除）中添加代碼。輸入以給成績(jī)的課程號(hào)和課程rsrs.state判斷rsrsrs.delete；給出提示IfMsgBox("你的操作將會(huì)刪除當(dāng)前的，你確信嗎？)，rs1.Close MsgBox"沒(méi)有這條,無(wú)法刪除!"。rsdbcommand2_click（第一個(gè)）goto生學(xué)生信息的基本信息。command3_click（最后）gotoAdodc2.Recordset.MoveLast轉(zhuǎn)到下一條信息。command5_click（前一個(gè)）中添加代碼。rsdbcommand2_click（第一個(gè)）goto生學(xué)生信息的基本信息。command3_click（最后）gotoAdodc2.Recordset.MoveLast轉(zhuǎn)到下一條信息。command5_click（前一個(gè)）中添加代碼。Adodc2.Recordset.MovePreviousgotocommand6_click（修改（對(duì)基本信息））Command2、Command3、Command4、Command5、Command10EnabledFalse，text1text12、Combo1bo1True。若有信息示輸入，提示（"請(qǐng)輸入學(xué)號(hào)!"）………。和bo1False。MsgBox"什么也沒(méi)修改,無(wú)所謂取消不取消!"。command10_click（刪除(對(duì)基本信息)）中添加代碼。MsgBoxErr.Description提示(“你確信刪除嗎?”)。選是刪除當(dāng)前的一條。查看和修改信息功能的截圖如圖4-8查看和修改信息界面4.3.4成績(jī)錄入模塊的界面包括五個(gè)個(gè)label控件，四個(gè)command控件，三個(gè)combo控件，兩個(gè)adodc查看和修改信息界面4.3.4成績(jī)錄入模塊的界面包括五個(gè)個(gè)label控件，四個(gè)command控件，三個(gè)combo控件，兩個(gè)adodc控件。Label主要起提示作用，command的captionAsNewADODB.Recordset，db，rs，db1，rs1Command1（添加）IF若符合條件則提示“添加成功!”否則談出各種不匹配的窗口。Command（更改etrscn.Execute("select成績(jī)&Trim(Combo1.Text)&and&Trim(Combo2.Text)&"'and學(xué)號(hào)='"&Trim(Text2.Text)&"'")，課程IF80注中不能選不及格，MsgBox提示"成績(jī)和備注不匹配,請(qǐng)核對(duì)!"。刪除）中添加代碼。IfMsgBox("你的操作將會(huì)刪除當(dāng)前的vbOKCancel,vbOKThen，信息必須與學(xué)生信息信息相同才能刪除學(xué)生成績(jī)。若沒(méi)有則提示“沒(méi)有這條,無(wú)法刪除!”。rs.Open打開(kāi)數(shù)據(jù)庫(kù)中的連接（用來(lái)連接課程號(hào)和課程名）刪除）中添加代碼。IfMsgBox("你的操作將會(huì)刪除當(dāng)前的vbOKCancel,vbOKThen，信息必須與學(xué)生信息信息相同才能刪除學(xué)生成績(jī)。若沒(méi)有則提示“沒(méi)有這條,無(wú)法刪除!”。rs.Open打開(kāi)數(shù)據(jù)庫(kù)中的連接（用來(lái)連接課程號(hào)和課程名）UnloadMe成績(jī)錄入功能模塊的截圖如圖4.9成績(jī)錄入界面4.3.5，出生年月，，父母姓名，地址，，專業(yè)院系，號(hào)碼，附注。學(xué)生信息錄入功能模塊的截圖如4.10學(xué)生基本信息錄入4.3.6本界面包括兩個(gè)framelabeltextoption控件，一個(gè)Adodc控件，一個(gè)datagrid控件。Frame控件可以乘放其他控件，使界面美觀，label文字提示作用，datagrid控件顯示集，option是單選框，分別為依據(jù)“學(xué)號(hào)”、“班級(jí)”、“專業(yè)”、“院系”。中。單擊“的依據(jù)，并在文本框中輸入要的關(guān)鍵字，單擊“”到指定內(nèi)容。結(jié)果以列表的形式顯示在datagrid4.3.5，出生年月，，父母姓名，地址，，專業(yè)院系，號(hào)碼，附注。學(xué)生信息錄入功能模塊的截圖如4.10學(xué)生基本信息錄入4.3.6本界面包括兩個(gè)framelabeltextoption控件，一個(gè)Adodc控件，一個(gè)datagrid控件。Frame控件可以乘放其他控件，使界面美觀，label文字提示作用，datagrid控件顯示集，option是單選框，分別為依據(jù)“學(xué)號(hào)”、“班級(jí)”、“專業(yè)”、“院系”。中。單擊“的依據(jù)，并在文本框中輸入要的關(guān)鍵字，單擊“”到指定內(nèi)容。結(jié)果以列表的形式顯示在datagrid控件基本信息4.11系統(tǒng)還提供了成績(jī)此不在贅述。成績(jī) 功能截圖如4.12主要代碼：PrivateSubCommand1_Click()OnErrorGoToerror:IfText1.Text<>""Then主要代碼：PrivateSubCommand1_Click()OnErrorGoToerror:IfText1.Text<>""ThenIfOption1.ValueThensearchSQL="SELECT*FROM學(xué)生與課程WHERE學(xué)號(hào)="&&Text1.Text&"'"IfOption2.ValueThensearchSQL="SELECT*FROM學(xué)生與課程where學(xué)號(hào)in(select學(xué)號(hào)fromwhere班級(jí)='"&Trim(Text1.Text)&"')"IfOption3.ValueThensearchSQL"SELECT*FROM學(xué)生與課程"ElseMsgBox條件不能為空"Text1.SetFocusEndIf'IfOption1.ValueThen'Text1.Enabled=True'Text2.Enabled=False'Text2.ForeColor=&HC0C0C0'Text1.SetFocus'searchSQL="SELECT*FROM="&"'"&Text1.Text&"'"'EndIf'IfOption2.ValueThen'Text2.Enabled=True'Text1.Enabled=False'Text1.ForeColor=&HC0C0C0'Text2.SetFocusWHERE學(xué)號(hào)'searchSQL="SELECT*FROM學(xué)生與課程where學(xué)號(hào)inselectfromwhere班級(jí)='"&Trim(Text2.Text)&"')"'EndIf'IfOption3.ValueThensearchSQL="SELECT*FROM"'EndIf'EndIf'Adodc1.ConnectionString="Provider=Microsoft.Jet.OLEDB.4.0;DataSource=E:\軟件工程\db5.mdb;PersistSecurityInfo=False"Adodc1.RecordSourcesearchSQLAdodc1.RefreshIfSource=E:\軟件工程\db5.mdb;PersistSecurityInfo=False"Adodc1.RecordSourcesearchSQLAdodc1.RefreshIfOption1.ValueThenIfAdodc1.Recordset.EOFThenMsgBox沒(méi)有這個(gè)學(xué)生!"EndIfExitSubEndIfIfOption2.ValueThenIfAdodc1.Recordset.EOFThenMsgBox沒(méi)有這個(gè)班級(jí)!"EndIfExitSubEndIfIfOption3.ValueThenIfAdodc1.Recordset.EOFThenMsgBox沒(méi)有相應(yīng)的信息!"EndIfExitSubEndIfExitSub' SetDataGrid2.DataSource=Adodc1'DataGrid2.Refresherror:MsgBoxErr.DescriptionEndSub4.3.6報(bào)表輸出進(jìn)行打印。界面截圖如圖4.13報(bào)表輸出主要代碼：PrivateSubForm_Load()OnErrorGoToerrh'DataEnvironment.Connection1.CursorLocation=報(bào)表輸出主要代碼：PrivateSubForm_Load()OnErrorGoToerrh'DataEnvir