學(xué)生信息管理系統(tǒng)畢業(yè)畢業(yè)設(shè)計(jì)

1、 PAGE34 / NUMPAGES34目 錄摘要 1Abstract2 應(yīng)用背景 3 VB對(duì)數(shù)據(jù)庫的操作 42.1 ADO簡介42.2 ADO中Connection對(duì)象的屬性 42.3 ADO中Connection對(duì)象的方法 52.4 ADO中Connection對(duì)象的事件 52.5 ADO中Connection對(duì)象的常數(shù) 5第三章 系統(tǒng)設(shè)計(jì)過程7 3.1 系統(tǒng)設(shè)計(jì)73.1.1 系統(tǒng)功能分析 73.1.2 系統(tǒng)功能模塊設(shè)計(jì) 73.2 數(shù)據(jù)庫設(shè)計(jì)83.2.1 數(shù)據(jù)庫需求分析 83.2.2 數(shù)據(jù)庫概念結(jié)構(gòu)設(shè)計(jì)83.2.3 數(shù)據(jù)庫邏輯結(jié)構(gòu)設(shè)計(jì)103.3 學(xué)生信息管理系統(tǒng)主窗體的創(chuàng)建123.3.1

2、創(chuàng)建工程項(xiàng)目Student_MIS123.3.2 創(chuàng)建學(xué)生信息管理系統(tǒng)的主窗體 123.3.3 創(chuàng)建主窗體的菜單133.3.4 創(chuàng)建功用模塊 143.4 系統(tǒng)用戶管理模塊的創(chuàng)建143.4.1 用戶登錄窗體的創(chuàng)建143.4.2 添加用戶窗體的創(chuàng)建153.4.3 修改用戶密碼窗體的創(chuàng)建16 3.5 學(xué)籍管理模塊的創(chuàng)建173.5.1 添加學(xué)籍管理模塊的創(chuàng)建173.5.2 修改學(xué)籍管理模塊的創(chuàng)建193.5.3查詢學(xué)籍管理模塊的創(chuàng)建21 3.6 班級(jí)管理模塊的創(chuàng)建223.6.1 添加班級(jí)信息模塊的創(chuàng)建223.6.2 修改班級(jí)信息模塊的創(chuàng)建23 3.7 課程設(shè)置模塊的創(chuàng)建233.7.1 添加課程信息窗體的

3、創(chuàng)建233.7.2 修改課程設(shè)置窗體的創(chuàng)建243.7.3 設(shè)置年級(jí)課程窗體的創(chuàng)建25 3.8 成績管理模塊的創(chuàng)建 263.8.1 添加成績信息窗體的創(chuàng)建263.8.2 修改成績信息窗體的創(chuàng)建273.8.3 查詢成績信息窗體的創(chuàng)建28參考資料 29附錄30隨著學(xué)校的規(guī)模不斷擴(kuò)大，學(xué)生數(shù)量急劇增加，有關(guān)學(xué)生的各種信息也成倍增長。面對(duì)龐大的信息量，有必要開發(fā)學(xué)生信息管理系統(tǒng)來提高學(xué)生管理工作的效率。通過這樣的系統(tǒng)，可以做到信息的規(guī)管理、科學(xué)統(tǒng)計(jì)和快速查詢，從而減少管理方面的工作量。本學(xué)生信息管理系統(tǒng)包括學(xué)籍信息管理、班級(jí)信息管理、課程信息管理、成績信息管理四大模塊。管理員可以擁有完全的權(quán)限管理系統(tǒng)，

4、而學(xué)生用戶只擁有查詢學(xué)籍信息和查詢成績信息的權(quán)限。本系統(tǒng)采用Visual Basic 6.0為開發(fā)工具，后臺(tái)數(shù)據(jù)庫采用Access 2000，操作系統(tǒng)為Windows98。關(guān)鍵詞：學(xué)生信息、管理系統(tǒng)、VB、ADOAbstractWith the expanding of school and the sharp increasing of students, students information becomes larger and larger.Facing the huge number of information, it is necessary to develop an inf

5、ormation management system of students to improve the efficiency of work.It can provide standard management, science statistics and rapid inquiry of students information.This system includes four following modules: status information management, class information management, course information manag

6、ement and score information management.The manager owns the complete management of this system, while students can only own the access to the status information and score information.This system is designed for windows 98, the develop language is Visual Basic 6.0, and the database management system

7、is Access2000.Keywords:Students Information, Management System、VB、ADO應(yīng)用背景管理信息系統(tǒng)就是我們常說的MIS（Management Information System），在強(qiáng)調(diào)管理，強(qiáng)調(diào)信息的現(xiàn)代社會(huì)中它變得越來越普與。MIS是一門新的學(xué)科，它跨越了若干個(gè)領(lǐng)域，比如管理科學(xué)、系統(tǒng)科學(xué)，運(yùn)籌學(xué)、統(tǒng)計(jì)學(xué)以與計(jì)算機(jī)科學(xué)。在這些學(xué)科的基礎(chǔ)上，形成信息收集和加工的方法，從而形成一個(gè)縱橫交織的系統(tǒng)。管理信息系統(tǒng)起初應(yīng)用于最基礎(chǔ)的工作，如打印報(bào)表、計(jì)算工資、人事管理等，進(jìn)而發(fā)展到企業(yè)財(cái)務(wù)管理、庫存管理等單項(xiàng)業(yè)務(wù)管理，這屬于電子數(shù)據(jù)處理（

8、EDP，Electronic Data Processing）系統(tǒng)。當(dāng)建立了企業(yè)數(shù)據(jù)庫，有了計(jì)算機(jī)網(wǎng)絡(luò)從而達(dá)到數(shù)據(jù)共享后，從系統(tǒng)觀點(diǎn)出發(fā)，實(shí)施全局規(guī)劃和設(shè)計(jì)信息系統(tǒng)時(shí)，就達(dá)到管理信息系統(tǒng)的階段。隨著計(jì)算機(jī)技術(shù)的進(jìn)步和人們對(duì)系統(tǒng)的需求進(jìn)一步提高，人們更加強(qiáng)調(diào)管理信息系統(tǒng)能否支持企業(yè)高層領(lǐng)導(dǎo)的決策這一功能，更側(cè)重于企業(yè)外部信息的收集、綜合數(shù)據(jù)庫、模型庫、方法庫和其他人工智能工具能否直接面向決策者，這是決策支持系統(tǒng)（DSS，Decision Support System）的任務(wù)。我國20世紀(jì)70年代末有少數(shù)企業(yè)開始MIS的局部應(yīng)用?！傲濉逼陂g，選擇一些大型企業(yè)進(jìn)行MIS的開發(fā)試點(diǎn)，其中首都鋼鐵公司

9、、第一棉紡廠、第二汽車制造廠、寧江機(jī)床廠等取得了經(jīng)驗(yàn)。20世紀(jì)80年代中后期，在全國性的計(jì)算機(jī)應(yīng)用熱潮中，許多企業(yè)紛紛從財(cái)務(wù)管理、人事管理等單項(xiàng)應(yīng)用入手，嘗試建立MIS。許多企業(yè)，如燃機(jī)廠、電視機(jī)廠、鼓風(fēng)機(jī)廠、渤海無線電廠的MIS初具規(guī)模，建立了覆蓋全廠的計(jì)算機(jī)網(wǎng)絡(luò)?！鞍宋濉逼陂g，企業(yè)逐步走向市場，MIS建設(shè)的目標(biāo)和需求日益明確。一些企業(yè)的系統(tǒng)，如第一機(jī)床廠、經(jīng)緯紡織機(jī)械廠、飛機(jī)制造公司等都達(dá)到了很高的水平，與企業(yè)中其他系統(tǒng)集成，形成了CIMS。目前，我國MIS已經(jīng)有了相當(dāng)?shù)钠张c率，幾乎覆蓋了各個(gè)行業(yè)與各個(gè)部門。在學(xué)校，尤其是在各大高校，對(duì)于學(xué)生的管理是相當(dāng)重要，而且也是相當(dāng)麻煩的，它是學(xué)校管

10、理中最基本的一項(xiàng)常規(guī)性工作。而長期以來，學(xué)校管理都是依賴人工來進(jìn)行的，面對(duì)如此眾多的學(xué)生信息，其工作量是相當(dāng)相當(dāng)巨大的。這樣不僅僅浪費(fèi)了大量的人力物力，而且由于人工管理存在著大量的不可預(yù)知性，造成學(xué)生信息管理的一些不規(guī)，使得信息管理陷入“事倍功半”的地步。開發(fā)本系統(tǒng)就是為了解決學(xué)校在管理中的一些不規(guī)，使學(xué)生信息的管理向著規(guī)化、簡單化、有效化的方向發(fā)展。根據(jù)學(xué)生信息管理系統(tǒng)的基本流程和高校學(xué)生信息管理的實(shí)際要求，本系統(tǒng)需要實(shí)現(xiàn)以下功能：學(xué)生基本信息的錄入，基本信息包括學(xué)生的基本情況、所在班級(jí)、所學(xué)課程和成績等；要求在系統(tǒng)中能夠?qū)W(xué)生信息精心靈活的瀏覽和查詢；要求在系統(tǒng)中能夠?qū)Π嗉?jí)信息進(jìn)行輸入、查

11、詢和修改等；要求能夠?qū)W(xué)?；菊n程信息錄入、修改和設(shè)置等；要求能夠?qū)W(xué)生成績信息進(jìn)行輸入、修改和查詢等；基于權(quán)限的管理，本系統(tǒng)可以提供給管理員或者學(xué)生本人使用。對(duì)學(xué)生類用戶，只能查看信息；而對(duì)于管理員類用戶而言，可以管理所有的學(xué)生信息。VB對(duì)數(shù)據(jù)庫的操作Visual Basic（簡稱VB）是一種可視化的、事件驅(qū)動(dòng)型的Windows應(yīng)用程序開發(fā)工具，它在GUI設(shè)計(jì)、繪圖、制表、運(yùn)算、通信和多媒體開發(fā)方面都具有簡單易行、功能強(qiáng)大等優(yōu)點(diǎn)，所以越來越受到開發(fā)人員的親睞。同時(shí)，VB在數(shù)據(jù)庫開發(fā)方面也具有Foxpro所遠(yuǎn)不能與的強(qiáng)大功能。VB能夠讀取和訪問Access、Excel、DbaseX、Foxpr

12、o、Btrieve和ODBC等多種數(shù)據(jù)庫，并能利用VB自身所帶的數(shù)據(jù)庫引擎創(chuàng)建Access數(shù)據(jù)庫。所以VB在管理信息系統(tǒng)（MIS）的開發(fā)和建設(shè)方面得到了是益廣泛的應(yīng)用。2.1 ADO簡介ActiveX Data Objects(ADO)是微軟公司最新的數(shù)據(jù)訪問技術(shù)。它被設(shè)計(jì)用來同新的數(shù)據(jù)訪問層OLE DB Privider一起協(xié)同工作，一提供通用數(shù)據(jù)訪問（Universal Data Access）。OLE DB是一個(gè)低層的數(shù)據(jù)訪問接口，用它可以訪問各種數(shù)據(jù)源，包括傳統(tǒng)的關(guān)系型數(shù)據(jù)庫，以與電子系統(tǒng)與自定義的商業(yè)對(duì)象。最重要的三個(gè)ADO對(duì)象是Connection、Recordset和Commen

13、t。每個(gè)Connection的屬性定義了與數(shù)據(jù)源的連接。Recordset對(duì)象接收來自數(shù)據(jù)源的數(shù)據(jù)。Recordset 可以與Connection一起使用，先建立一個(gè)連接，然后獲取數(shù)據(jù)。盡管如此，Recordset也可以被單獨(dú)創(chuàng)建，其Connection參數(shù)可以在Open屬性定義。2.2 ADO中Connection對(duì)象的屬性Connection對(duì)象的屬性如下表：屬性名稱屬性類型和用途Attributes可讀寫Long類型，通過兩個(gè)常數(shù)之和指定是否使用保留事務(wù)（retainning transactions）。常數(shù)AdXactCommitRetaning表示調(diào)用CommitTrans方法時(shí)啟動(dòng)

14、一個(gè)新事務(wù)：常數(shù)AdXactAbortRetanin表示調(diào)用RollbackTrans方法時(shí)啟動(dòng)一個(gè)新事務(wù)。默認(rèn)值為0，表示不使用保留事務(wù)。CommandTimeout可讀寫Long類型，指定終止某個(gè)相關(guān)Command對(duì)象的Execute調(diào)用之前必須等待時(shí)間。默認(rèn)值為30秒。ConnectionString可讀寫String類型，提供數(shù)據(jù)提供者或服務(wù)提供者打開到數(shù)據(jù)源的連接所需要的指定信息ConnectionTimeout可讀寫Long類型，指定終止一個(gè)失敗的Connection.open方法調(diào)用之前必須等待的時(shí)間，默認(rèn)值為15秒CursorLocation可讀寫Long類型，確定是使用客互端

15、游標(biāo)引擎，還是使用服務(wù)器端游標(biāo)引擎。默認(rèn)值是AdUseServerDefaultDatabase可讀寫String類型，如果ConnectString中未指定數(shù)據(jù)庫名稱，就使用這里指定的名稱，對(duì)SQL Server而言，默認(rèn)值是pubsIsolationLevel可讀寫Long類型，指定和其他并發(fā)事務(wù)交互時(shí)的行為或事務(wù)。Provider可讀寫String類型，如果ConnectionString中未指定OLB DB數(shù)據(jù)或服務(wù)提供者的名稱，就使用這時(shí)指定的名稱。默認(rèn)值是MSDASQLState可讀寫Long類型，指定連接是處于打開狀態(tài)，還是處于關(guān)閉狀態(tài)或中間狀態(tài)。Version只讀String類

16、型，返回ADO版本號(hào)表1 Connection對(duì)象的屬性表2.3 ADO中Connection對(duì)象的方法方法名稱用途Begintrans初始化一個(gè)事務(wù)；其后必須有committrans和/或rollbacktrans相呼應(yīng)Close關(guān)閉連接Committrans提交一個(gè)事務(wù)，以完成對(duì)數(shù)據(jù)源的永久改變（要求使用之前必須調(diào)用了begintrans方法）ExecuteSelect sql語句返回一個(gè)forward-only recordset對(duì)象，也用來執(zhí)行那些不返回recordset語句，如insertupdatedelete查詢或ddl語句Open用來連接字符串來打開一個(gè)連接Openschema

17、返回一個(gè)recordset對(duì)象以提供數(shù)據(jù)源的結(jié)構(gòu)信息（metadata）Rollbacktrans取消一個(gè)事務(wù)，恢復(fù)對(duì)數(shù)據(jù)源做的臨時(shí)性改變（要求使用之前必須調(diào)用了begintrans方法）表2 Connection對(duì)象的方法表2.4 ADO中Connection對(duì)象的事件事件名稱觸發(fā)時(shí)機(jī)BeginTransCompleteBeginTrans方法執(zhí)行以后CommitTransCompleteCommitTrans方法執(zhí)行以后ConnectComplete成功建立到數(shù)據(jù)源的Connection之后DisconnectConnection關(guān)閉之后ExecuteComplete完成Connectio

18、n. Execute或Command. Execute之時(shí)InfoMessage一個(gè)Error對(duì)象被添加到ADODB.Connectuin.Error 集合之時(shí)RollbackTransCompeleteRollbackTrans方法執(zhí)行之后WillConnect即將調(diào)用Connection.open方法之時(shí)WillExecute即將調(diào)用Connection.Execute或Command.Execute方法之時(shí)表3 Connection對(duì)象的方法表2.5 ADO中Connection對(duì)象的常數(shù)在ADO中Connection對(duì)象的常數(shù)包括IsolationLevel常數(shù)、Mode常數(shù)、Stat

19、e常數(shù)、Execut方法中l(wèi)ngOption參數(shù)用到的常數(shù)和ADODB事件處理子過程參數(shù)adStatus所用的常數(shù)。IsolationLevel常數(shù)的含義如下表：常數(shù)含義AdXactCursorStability只允許讀其他事務(wù)已提交的改變AdXactBrowse允許讀其他事務(wù)未提交的改變AdXactChaos本事務(wù)不會(huì)覆蓋其他位于更高隔離程度的事務(wù)所做的改變AdXactIsolated所有事務(wù)相互獨(dú)立AdXactReadCommitted只允許讀其他事務(wù)已提交的改變AdXactReadUncommitted允許讀其他事務(wù)未提交的改變AdXactSerializable本事務(wù)不會(huì)覆蓋其他位于更

20、高隔離程度的事務(wù)所做的改變AdXactUnspecified不能確定提供者的事務(wù)隔離程度表4 IsolationLevel常數(shù)表Mode常數(shù)的含義如下表：常數(shù)含義AdModeUnknown未指定數(shù)據(jù)源的連接許可權(quán)（默認(rèn)值）AdModeRead連接是只讀的AdModeReadWrite連接是可讀寫的AdModeShareDenyNone不拒絕其他擁護(hù)的讀寫訪問AdModeShareDenyRead拒絕其他擁護(hù)打開到數(shù)據(jù)源的讀連接AdModeShareDenyWrite拒絕其他擁護(hù)打開到數(shù)據(jù)源的寫連接AdModeShareExclusive以獨(dú)占方式打開數(shù)據(jù)源AdModeWrite連接是只寫的表5

21、 Mode常數(shù)表State常數(shù)的含義如下：常數(shù)含義AdStateClosedConnection是關(guān)閉的AdStateConnecting正在連接數(shù)據(jù)源的狀態(tài)AdStateExecutingConnection或Command對(duì)象的Execute方法已被調(diào)用AdStateFetching返回行到Recordset對(duì)象AdStateOpenConnection是打開的表6 State常數(shù)表Execute方法中l(wèi)ngOption參數(shù)用到的常數(shù)含義見下表：常數(shù)含義AdCmdUnknown類型未定，由數(shù)據(jù)提供者去判斷Command語法AdCmdFile是和對(duì)象類型相應(yīng)的文件名稱AdCmdStoredP

22、roc是存儲(chǔ)過程名稱AdCmdTable是能產(chǎn)生北部SELECT*FROM TableName查詢的表名稱AdCmdTableDirect是能直接從表中獲取行容的表名稱AdCmdText是一條SQL語句表7 Execute方法中l(wèi)ngOption參數(shù)的常數(shù)表ADODB事件處理子過程參數(shù)adStatus所用的常數(shù)的含義見下表：常數(shù)含義AdStatusCancel操作被用戶取消AdStatusCnatDeny操作不能拒絕其他用戶對(duì)數(shù)據(jù)源的訪問AdStatusErrorsOccurred操作導(dǎo)致錯(cuò)誤并已送到Errors集合中AdStatusOK操作成功AdStatusUnWantedEvent操作過

23、程中一個(gè)未預(yù)料到的時(shí)間被激活表8 ADODB事件處理子過程參數(shù)adStatus的常數(shù)表 系統(tǒng)設(shè)計(jì)過程3.1 系統(tǒng)設(shè)計(jì)3.1.1系統(tǒng)功能的分析系統(tǒng)開發(fā)的總體任務(wù)是實(shí)現(xiàn)學(xué)生信息管理的系統(tǒng)化、規(guī)化和自動(dòng)化。系統(tǒng)功能分析是在系統(tǒng)開發(fā)的總體任務(wù)的基礎(chǔ)上完成的。學(xué)生信息管理系統(tǒng)需要完成的功能主要有：有關(guān)學(xué)籍等信息的輸入，包括輸入學(xué)生基本信息、所在班級(jí)、所學(xué)課程和成績等。學(xué)生信息的查詢，包括學(xué)生基本信息、所在班級(jí)、已學(xué)課程和成績等。學(xué)生信息的修改。班級(jí)管理信息的輸入，包括輸入班級(jí)設(shè)置、年級(jí)信息等。班級(jí)管理信息的查詢。班級(jí)管理信息的修改。學(xué)?；菊n程信息的輸入?；菊n程信息的修改。學(xué)生課程的設(shè)置和修改。學(xué)生成

24、績信息的修改。學(xué)生成績信息的查詢。學(xué)生成績信息的統(tǒng)計(jì)。3.1.2 系統(tǒng)功能模塊設(shè)計(jì)對(duì)上述各項(xiàng)功能進(jìn)行集中、分塊，按照結(jié)構(gòu)化程序設(shè)計(jì)的要求，得到下圖所示的系統(tǒng)功能模塊圖。學(xué)生信息管理系統(tǒng)成績信息管理課程信息管理班級(jí)信息管理學(xué)籍信息管理系統(tǒng)管理成績信息查詢成績信息修改成績信息添加年級(jí)課程設(shè)置課程信息修改課程信息添加班級(jí)信息修改班級(jí)信息添加學(xué)籍信息查詢學(xué)籍信息修改學(xué)籍信息添加密碼管理用戶管理圖1 系統(tǒng)功能模塊圖3.2 數(shù)據(jù)庫設(shè)計(jì)數(shù)據(jù)庫在一個(gè)信息管理系統(tǒng)中占有非常重要的地位，數(shù)據(jù)庫結(jié)構(gòu)設(shè)計(jì)的好壞將直接對(duì)應(yīng)用系統(tǒng)的效率以與實(shí)現(xiàn)的效果產(chǎn)生影響。合理的數(shù)據(jù)庫結(jié)構(gòu)設(shè)計(jì)可以提高數(shù)據(jù)存儲(chǔ)的效率，保證數(shù)據(jù)的完整和一

25、致。同時(shí)，合理的數(shù)據(jù)庫結(jié)構(gòu)也將有利于程序的實(shí)現(xiàn)。設(shè)計(jì)數(shù)據(jù)庫系統(tǒng)時(shí)應(yīng)該首先充分了解用戶各個(gè)方面的需求，包括現(xiàn)有的以與將來可能增加的需求。 3.2.1 數(shù)據(jù)庫需求分析用戶的需求具體體現(xiàn)在各種信息的提供、保存、更新和查詢，這就要求數(shù)據(jù)庫結(jié)構(gòu)能充分滿足各種信息的輸出和輸入。收集基本數(shù)據(jù)、數(shù)據(jù)結(jié)構(gòu)以與數(shù)據(jù)處理的流程，組成一份詳細(xì)的數(shù)據(jù)字典，為后面的具體設(shè)計(jì)打下基礎(chǔ)。數(shù)據(jù)流程圖：學(xué)生注冊(cè)基本信息輸入班級(jí)設(shè)置學(xué)籍信息管理成績信息輸入班級(jí)管理班級(jí)課程設(shè)置課程基本信息班級(jí)課程管理圖2 系統(tǒng)數(shù)據(jù)流程圖數(shù)據(jù)項(xiàng)和數(shù)據(jù)結(jié)構(gòu)：學(xué)生基本信息：包括的數(shù)據(jù)項(xiàng)有：學(xué)生學(xué)號(hào)、學(xué)生、性別、出生日期、班號(hào)、聯(lián)系、入校日期、家庭住址、備

26、注等。班級(jí)信息：包括的數(shù)據(jù)項(xiàng)有：班號(hào)、所在班級(jí)、班主任、所在教室等。課程基本信息：包括的數(shù)據(jù)項(xiàng)有：課程號(hào)、課程名稱、課程類別、課程描述等。課程設(shè)置信息：包括的數(shù)據(jù)項(xiàng)有：年級(jí)信息、所學(xué)課程等。學(xué)生基本信息：包括的數(shù)據(jù)項(xiàng)有：考試編號(hào)、所在班級(jí)、學(xué)生學(xué)號(hào)、學(xué)生、所學(xué)課程、考試分?jǐn)?shù)等。3.2.2 數(shù)據(jù)庫概念結(jié)構(gòu)設(shè)計(jì)在得到數(shù)據(jù)項(xiàng)和數(shù)據(jù)結(jié)構(gòu)以后，就可以設(shè)計(jì)出滿足用戶需求的各種實(shí)體，以與他們之間的關(guān)系，為邏輯設(shè)計(jì)打下基礎(chǔ)。實(shí)體有：學(xué)生實(shí)體、班級(jí)實(shí)體、年級(jí)實(shí)體、課程實(shí)體。學(xué)生實(shí)體E-R圖：學(xué)生學(xué)生基本信息學(xué)生班級(jí)信息學(xué)生課程信息學(xué)生成績信息圖3 學(xué)生實(shí)體E-R圖班級(jí)實(shí)體E-R圖：班級(jí)班號(hào)所在年級(jí)班主任所在教室

27、圖4 班級(jí)實(shí)體E-R圖課程實(shí)體E-R圖：課程課程編號(hào)課程名稱課程類別課程描述圖5 課程實(shí)體E-R圖年級(jí)實(shí)體E-R圖：年級(jí)年級(jí)名稱包括班級(jí)設(shè)置課程圖6 年級(jí)實(shí)體E-R圖實(shí)體和實(shí)體之間的關(guān)系E-R圖：學(xué)生學(xué)生學(xué)生班級(jí)設(shè)置年級(jí)設(shè)置考核過程課程設(shè)置學(xué)生圖7 實(shí)體之間的關(guān)系E-R圖3.2.3數(shù)據(jù)庫邏輯結(jié)構(gòu)設(shè)計(jì)現(xiàn)在需要將上面的數(shù)據(jù)庫概念結(jié)構(gòu)轉(zhuǎn)化為Assecc 2000數(shù)據(jù)庫系統(tǒng)所支持的實(shí)際數(shù)據(jù)模型，也就是數(shù)據(jù)庫的邏輯結(jié)構(gòu)。在上面的實(shí)體以與實(shí)體之間關(guān)系的基礎(chǔ)上，形成數(shù)據(jù)庫中的表以與各個(gè)表之間的關(guān)系。學(xué)生信息管理系統(tǒng)數(shù)據(jù)庫中各個(gè)表格的設(shè)計(jì)結(jié)果如下所示：學(xué)生基本信息表（student_Info）:列名數(shù)據(jù)類型說

28、明Student_IDINT(4)學(xué)生學(xué)號(hào)（主鍵）Student_NameCHAR(10)學(xué)生Student_sexCHAR(2)學(xué)生性別Born_DateDATETIME(8)出生日期Class_noINT(4)班號(hào)Tele_NumberCHAR(10)聯(lián)系Ru_DateCHAR(8)入校時(shí)間AddressVARCHAR(50)家庭住址CommentVARCHAR(200)注釋表9 學(xué)生基本信息表班級(jí)信息表格：列名數(shù)據(jù)類型說明Class_NoINT(4)班號(hào)（主鍵）gradeCHAR(10)年級(jí)directorCHAR(10)班主任Classroom_NOCHAR(10)注釋表10 班級(jí)基本

29、信息表課程基本信息表：列名數(shù)據(jù)類型說明Course_NoINT(4)課程編號(hào)（主鍵）Course_NameCHAR(10)課程名稱Course_TypeCHAR(10)課程類型Course_DesCHAR(10)課程描述表11 課程基本信息表年級(jí)課程設(shè)置表：列名數(shù)據(jù)類型說明gradeCHAR(10)年級(jí)Course_NameCHAR(10)課程名稱表12 年成設(shè)置表學(xué)生成績信息表：列名數(shù)據(jù)類型說明Exam_NoCHAR(10)考試編號(hào)Student_IDINT(4)學(xué)生學(xué)號(hào)Student_NameCHAR(10)學(xué)生Class_NOINT(4)學(xué)生班號(hào)Course_NameCHAR(10)課程

30、名稱resultFLOAT(8)分?jǐn)?shù)表13 學(xué)生成績信息表系統(tǒng)用戶表：列名數(shù)據(jù)類型說明User_IDCHAR(10)用戶名稱（主鍵）User_PWDCHAR(10)用戶密碼User_DESCHAR(10)用戶描述表14 系統(tǒng)用戶表3.3 學(xué)生管理系統(tǒng)主窗體的創(chuàng)建 3.3.1 創(chuàng)建工程項(xiàng)目Student_MIS為了用Visual Basic創(chuàng)建應(yīng)用程序，應(yīng)當(dāng)使用工程。一個(gè)工程是用來建造應(yīng)用程序的文件的集合，它包括：跟蹤所有部件的工程文件（.vbp）每個(gè)窗體的文件（.frm）每個(gè)窗體的二進(jìn)制數(shù)據(jù)文件（.frx）,它含有窗體上控件的屬性數(shù)據(jù)。對(duì)含有二進(jìn)制屬性的任何.frm文件都是不可編輯的，這些文件

31、都是自動(dòng)產(chǎn)生的。每個(gè)類模塊的一個(gè)文件(.cls)，該文件是可選項(xiàng)。每個(gè)標(biāo)準(zhǔn)模塊的一個(gè)文件（.bas）,該文件是可選項(xiàng)。一個(gè)或多個(gè)包含ActiveX控件的文件(.ocx), 該文件是可選項(xiàng)。單個(gè)資源文件(.res), 該文件是可選項(xiàng)。啟動(dòng)Visual Basic后，單擊File/New Project菜單，在工程模板中選擇Standard EXE, Visual Basic將自動(dòng)產(chǎn)生一個(gè)Form窗體，屬性都為缺省設(shè)置。刪除窗體，單擊File/Save Project菜單，將工程項(xiàng)目命名為Student_MIS。3.3.創(chuàng)建學(xué)生信息管理系統(tǒng)的主窗體Visual Basic創(chuàng)建的應(yīng)用程序可以是SDI

32、（單文檔界面）和MDI（多文檔界面）。在SDI的程序中，每個(gè)窗體之間是獨(dú)立的。而MDI的程序中，有一個(gè)窗體是主窗體，可以包含其他窗體，它的類型是MDI Form。本系統(tǒng)采用多文檔界面，這樣可以使程序更加美觀、整齊有序。圖8 學(xué)生信息管理系統(tǒng)主窗體單擊工具欄中的“ADD MDI Form”按鈕，生成一個(gè)窗體，屬性設(shè)置如表。主窗體與其控件屬性設(shè)置：控件屬性屬性取值FrmMain(Form)NameFrmMainCaption學(xué)生信息管理系統(tǒng)StartUpPositonCenterScreenWindowsStateMaximizedSbStatusaBar(statusBar)NameSbStat

33、usBar表15 主窗體與其屬性表在主窗體中加入狀態(tài)欄控件，可以實(shí)時(shí)反映系統(tǒng)中的各個(gè)狀態(tài)的變化。狀態(tài)欄控件需要在通常的屬性窗口中設(shè)置一般屬性，還需要在其特有的彈出式菜單中進(jìn)行設(shè)置。選中狀態(tài)欄控件，單擊鼠標(biāo)右鍵，選中Property菜單，在“General”屬性頁對(duì)一般屬性進(jìn)行設(shè)置，在“Panels”屬性頁對(duì)各個(gè)文本框進(jìn)行設(shè)置，在“Font”屬性頁對(duì)文本字體進(jìn)行設(shè)置，在“Picture”屬性頁可以添加圖片。單擊Insert Panel按鈕，為狀態(tài)欄添加3個(gè)面板，設(shè)置屬性如下表：面板屬性屬性取值1styleSbrText2styleSbrDate3styleSbrTime表16 主窗體中面板屬性設(shè)

34、置表面板1用來顯示各種文本信息，面板2用來顯示當(dāng)前日期，面板3用來顯示當(dāng)前時(shí)間。3.3.3創(chuàng)建主窗體的菜單在主窗體中，單擊鼠標(biāo)右鍵，選擇彈出式菜單中的“Menu Editor”命令，創(chuàng)建菜單結(jié)系統(tǒng)添加用戶修改密碼推出系統(tǒng)學(xué)籍管理添加學(xué)籍信息修改學(xué)籍信息查詢學(xué)籍信息班級(jí)管理添加班級(jí)信息修改班級(jí)信息課程設(shè)置添加課程信息修改課程信息設(shè)置年級(jí)課程成績管理添加成績信息修改成績信息查詢成績信息幫助使用說明構(gòu)如下表：圖9 主窗體菜單結(jié)構(gòu)表3.3.4 創(chuàng)建公用模塊在Visual Basic中可以用公用模塊來存放整個(gè)工程項(xiàng)目公用的函數(shù)、全局變量等。整個(gè)工程項(xiàng)目中的任何地方都可以調(diào)用公用模塊中的函數(shù)、變量，這樣可

35、以極提高代碼的效率。在項(xiàng)目資源管理器中為項(xiàng)目添加一個(gè)Module，保存為Module1.bas。下面就可以開始添加需要的代碼了。由于系統(tǒng)中各個(gè)功能模塊都將頻繁使用數(shù)據(jù)庫中的各種數(shù)據(jù)，因此需要一個(gè)公共的數(shù)據(jù)操作函數(shù)，用以執(zhí)行各種SQL語句。添加函數(shù)ExecuteSQL。ExecuteSQL函數(shù)有兩個(gè)參數(shù)：SQL和MsgString。其中SQL用來存放需要執(zhí)行的SQL語句，MsgString用來返回執(zhí)行的提示信息。函數(shù)執(zhí)行時(shí)，首先判斷SQL語句中包含的容：當(dāng)執(zhí)行查詢操作時(shí)，ExecuteSQL函數(shù)將返回一個(gè)與函數(shù)同名的記錄集對(duì)象（Recordset），所有滿足條件的記錄包含在對(duì)象中；當(dāng)執(zhí)行如刪除、

36、更新、添加等操作時(shí)，不返回記錄集對(duì)象。在ExecuteSQL函數(shù)中使用了Connect String函數(shù)，這個(gè)函數(shù)用來連接數(shù)據(jù)庫。由于在后面的程序中，需要頻繁檢查各種文本框的容是否為空，這里定義了Txsttxt函數(shù)。如果文本框容為空時(shí)，函數(shù)將返回True,否則將返回False。由于學(xué)生信息管理系統(tǒng)啟動(dòng)后，需要對(duì)用戶進(jìn)行判斷。如果登錄者是授權(quán)用戶，將進(jìn)入系統(tǒng)，否則將停止程序的執(zhí)行，這個(gè)判斷需要在系統(tǒng)運(yùn)行的最初進(jìn)行，因此將代碼放在公用模塊中。系統(tǒng)需要知道登錄用戶的信息，定義全局變量UserName: Public UserName As String3.4 系統(tǒng)用戶管理模塊的創(chuàng)建系統(tǒng)用戶管理模塊主

37、要實(shí)現(xiàn)：用戶登錄。添加用戶。修改用戶密碼。3.4.1 用戶登錄窗體的創(chuàng)建系統(tǒng)啟動(dòng)后，將首先出現(xiàn)用戶登錄窗體，用戶首先輸入用戶名，然后輸入密碼。如果用戶3次輸入密碼錯(cuò)誤，將退出程序。圖10 學(xué)生信息管理系統(tǒng)登錄窗體用戶登錄窗體中放置了三個(gè)文本框（Textbox），用來輸入用戶名、密碼和用戶類型；兩個(gè)按鈕（CommandButton）用來確定或取消登錄；四個(gè)標(biāo)簽（Label）用來標(biāo)示窗體的信息。屬性見下表：控件屬性屬性取值FrmLogin(form)NamefrmLoginCaption登錄StartUpPositonCenterSreenWindowStateNoMaltxtUserNameNa

38、meTxtUserNametxtPasswordNameTxtpasswordPasswordChar*txtUserSxNameTxtUserSxcmdOKNamecmdOKCaption確定cmdCancelNamecmdCanelCaption取消Lable1Caption學(xué)生信息管理系統(tǒng)Lable2Caption用戶名Lable3Caption用戶密碼Lable4Caption用戶類型表17 用戶登錄窗體中控件與其屬性設(shè)置表文本框TxtPassword的PasswordChar屬性是用指定字符來掩蓋用戶輸入的密碼。為窗體定義全局變量OK，用來判斷登錄是否成功；定義MiCount，用來記

39、載輸入密碼的次數(shù)。并且在載入窗體時(shí)初始化這兩個(gè)全局變量。Option Explicit是用來規(guī)定所有變量使用前必須定義。這樣可以避免由于輸入錯(cuò)誤而產(chǎn)生的新變量。當(dāng)用戶輸入完用戶名、用戶密碼和用戶屬性，單擊CmdOK按鈕將對(duì)用戶輸入信息進(jìn)行判斷。用戶單擊該按鈕，將觸發(fā)按鈕cmdOK的Click事件。用戶如果沒有輸入用戶名、用戶密碼和用戶屬性，將出現(xiàn)消息框給予提示。如果輸入的用戶名在用戶表格中沒有找到，將提示重新輸入用戶名（默認(rèn)的用戶名和密碼是aa），文本框TxtUserName，將重新獲得輸入焦點(diǎn)。如果用戶輸入的密碼不正確，文本框TxtPassword將重新獲得輸入焦點(diǎn)。用戶登錄成功，全局變量O

40、K將被賦值為False。公用模塊中的Main過程將根據(jù)OK的值決定是退出，或者進(jìn)入管理員主模塊，或者進(jìn)入學(xué)生主模塊。如果用戶取消登錄，單擊“取消”按鈕，將觸發(fā)按鈕的Click事件，代碼如下： OK = False Me.HideMe是Visual Basic中常用的對(duì)象，用來指代當(dāng)前對(duì)象本身。3.4.2 添加用戶窗體的創(chuàng)建進(jìn)入管理員主模塊后，選擇菜單“系統(tǒng)|添加用戶”就可以添加用戶，出現(xiàn)添加用戶窗體。圖11 添加用戶窗體在添加用戶窗體中放置了三個(gè)文本框，用來輸入用戶名和密碼；兩個(gè)按牛用來確定是否添加用戶；三個(gè)標(biāo)簽用來標(biāo)示文本框的提示。這些控件的屬性見下表：控件屬性屬性取值FrmAdduser(

41、rorm)NameFrmAdduserCaption添加用戶StartUpPositonCenterScreenwindowStateNomaltxtUserNameNameTxtUserNameTxtPassword1NameTxtpassword1PasswordChar*TxtPassword2NameTxtPassword2PasswordChar*cmdOKNamecmdOKCaption確定cmdCanelNamecmdCanelCaption取消Lable1Caption請(qǐng)輸入用戶名Lable2Caption請(qǐng)輸入密碼Lable3Caption請(qǐng)確認(rèn)密碼表18 添加用戶窗體控件與

42、其屬性設(shè)置表用戶需要兩次輸入密碼，用來確保輸入密碼的正確。用戶輸入信息完畢，單擊“確定”按鈕將觸發(fā)Click事件。一旦輸入完畢，系統(tǒng)將首先查詢數(shù)據(jù)庫中與新建用戶名一樣的記錄，如果有一樣記錄將提示用戶重新輸入用戶名。當(dāng)確定數(shù)據(jù)庫中沒有一樣的用戶名，并且兩次輸入密碼一致時(shí)，將把該條記錄添加到數(shù)據(jù)庫中。單擊“取消”按鈕將取消添加用戶的操作。3.4.3 修改用戶密碼窗體的創(chuàng)建用戶可以修改自己的密碼，選擇菜單“系統(tǒng)|修改密碼”，出現(xiàn)“修改密碼”窗體。圖12 用戶修改密碼窗體在修改密碼窗體中，放置了兩個(gè)文本框，用來輸入密碼和確認(rèn)密碼；兩個(gè)按鈕用來確定是否修改密碼；兩個(gè)標(biāo)簽用來標(biāo)示文本框的容。控件屬性如下表

43、：控件屬性屬性取值FrmModifyuserinfo(Form)NamefrmModifyuserinfoCaption修改密碼StartUpPositonCenterScreenWindowStateNomalTxtPassword1NameTxtPassword1PasswordChar*TxtPassword2NameTxtPassword2PasswordChar*CmdOKNameCmdOKCaption確定CmdCanelNamecmdCanelCaption取消Lable1Caption請(qǐng)輸入密碼Lable2Caption請(qǐng)確認(rèn)密碼表19 用戶修改密碼控件與其屬性設(shè)置表兩次輸入密

44、碼后，單擊“確認(rèn)”按牛，將觸發(fā)Click事件判斷是否修改密碼。當(dāng)兩次輸入密碼一致時(shí)，數(shù)據(jù)庫中的記錄將更新。3.5 學(xué)籍管理模塊的創(chuàng)建學(xué)籍信息管理模塊主要實(shí)現(xiàn)以下功能：添加學(xué)籍信息修改學(xué)籍信息查詢學(xué)籍信息 3.5.1 添加學(xué)籍信息窗體的創(chuàng)建選擇“學(xué)籍管理|添加學(xué)籍信息”菜單，將出現(xiàn)“添加學(xué)籍信息”窗體。圖13 添加學(xué)籍信息窗體在窗體上放置了多個(gè)文本框和下拉式文本框，用來輸入學(xué)籍信息；兩個(gè)按鈕用來確定是否添加學(xué)籍信息；多個(gè)標(biāo)簽用來提示文本框需要輸入的容。屬性見下表：控件屬性屬性取值FrmAddsinfo(Form)NameFrmsinfoCaption添加學(xué)籍信息MDIChildtrueTxtSI

45、DNameTxtSIDTxtNameNameTxtNameTxtBorndateNameTxtBorndateTxtTelNameTxtTelTxtRudateNameTxeRudateTxtAddressNametxtAddressScrollbarsVerticalMultilineTrueTxtCommentNameTxtCommentScrollbarsVerticalMultilinetrueComboGenderNamecomboGenderComboClassNoNameComboClassNoCmdOKNameCmdOKCaption確定添加CmdcanelNameCmdCan

46、elCaption取消添加Lable1Caption學(xué)號(hào)Lable2CaptionLable3Caption性別Lable4Caption出生日期Lable5Caption班號(hào)Lable6Caption聯(lián)系Lable7Caption入校日期Lable8Caption家庭住址Lable9Caption備注表20 添加學(xué)籍信息窗體控件與其屬性設(shè)置表在載入窗體時(shí)，程序?qū)⒆詣?dòng)在兩個(gè)下拉式文本框中添加容，這樣可以規(guī)化輸入容。在班號(hào)選擇的下拉式文本框中，將出現(xiàn)所有班級(jí)，用戶不用輸入容。用戶輸入容完畢后，單擊cmdOK按鈕將觸發(fā)Click事件。程序首先對(duì)是否輸入容進(jìn)行判斷，然后進(jìn)行格式判斷，使用了下面兩個(gè)函

47、數(shù)：判斷數(shù)據(jù)是否日期格式IsDate(txtBorndate.text)判斷數(shù)據(jù)是否日期格式IsDate(txtRudate.text)判斷是否有重復(fù)記錄是很重要的，否則數(shù)據(jù)庫中將發(fā)生錯(cuò)誤。單擊按鈕cmdCanel取消添加學(xué)籍信息。3.5.2 修改學(xué)籍信息窗體的創(chuàng)建選擇“學(xué)籍管理|修改學(xué)籍信息”菜單，將出現(xiàn)“修改學(xué)籍信息”窗體。圖14 修改學(xué)籍信息窗體這個(gè)窗體在“添加學(xué)籍信息”窗體的基礎(chǔ)上添加了兩排按鈕，所有控件的屬性見下表：控件屬性屬性取值FrmAddsinfo(Form)NameFrmsinfoCaption添加學(xué)籍信息MDIChildtrueTxtSIDNameTxtSIDTxtName

48、NameTxtNameTxtBorndateNameTxtBorndateTxtTelNameTxtTelTxtRudateNameTxeRudateTxtAddressNametxtAddressScrollbarsVerticalMultilineTrueTxtCommentNameTxtCommentScrollbarsVerticalMultilinetrueComboGenderNamecomboGenderComboClassNoNameComboClassNoCmdFirstNameCmdOKCaption第一條記錄CmdPreviousNameCmdPreviousCaptio

49、n上一條記錄cmdNextNamecmdNextcaption下一條記錄CmdLastNamecmdLastcaption最后一條記錄CmdEditNameCmdEditCaption修改記錄cmdUpdateNameCmdUpdatecaption更新記錄CmdcanelNameCmdCanelCaption取消修改記錄cmdDeleteNameCmdDeleteCaption刪除記錄Frame1Caption查看學(xué)籍信息Frame2caption修改學(xué)籍信息Lable1Caption學(xué)號(hào)Lable2CaptionLable3Caption性別Lable4Caption出生日期Lable5C

50、aption班號(hào)Lable6Caption聯(lián)系Lable7Caption入校日期Lable8Caption家庭住址Lable9Caption備注表21 修改學(xué)籍信息窗體控件與其屬性設(shè)置表第一排按鈕用來方便的瀏覽數(shù)據(jù)庫中各條記錄，第二排按牛用來修改記錄。由于記錄集為整個(gè)窗體公用，需要將記錄集對(duì)象定義為全局變量。程序在窗體載入時(shí)自動(dòng)加入各條記錄。由于程序中各處需要顯示數(shù)據(jù)，定義函數(shù)viewDate。單擊“第一條記錄”按鈕，將顯示第一條記錄。單擊“最后一條記錄”按鈕，將顯示最后一條記錄。單擊“上一條記錄”按鈕，將顯示上一條記錄。單擊“下一條記錄”按鈕，將顯示下一條記錄。單擊“修改記錄”按鈕，將進(jìn)入修

51、改狀態(tài)，各個(gè)文本框?qū)⒍加行?。此時(shí)，移動(dòng)記錄按鈕將失效，可以避免誤操作。修改完畢后，單擊“更新記錄”按鈕，將觸發(fā)Click事件。單擊“取消修改記錄”按鈕時(shí)，將取消所作的修改。單擊“刪除記錄”按鈕時(shí)，將刪除當(dāng)前記錄。3.5.3 查詢學(xué)籍信息窗體的創(chuàng)建選擇“學(xué)籍管理|查詢學(xué)籍信息”菜單，將出現(xiàn)“查詢學(xué)籍信息”菜單。圖15 查詢學(xué)籍信息窗體在這里可以按照各種方式以與他們的組合進(jìn)行查詢。查詢學(xué)籍信息窗體包括的控件與其屬性設(shè)置見下表：控件屬性屬性取值FrmInquiresinfo(Form)NamefrmInquiresinfoCaption查詢學(xué)籍信息MDIChildTrueCheck1Caption按

52、學(xué)號(hào)Check2Caption按Check3Caption按班號(hào)CmdInquireNameCmdInquireCaption查詢CmdExitNameCmdExitCaption退出查詢MyFlexgrit(MSHFlexgrid)nameMyFlexgrid表22 查詢學(xué)籍信息窗體與其控件屬性設(shè)置表在窗體中添加了一個(gè)表格控件（MSHFlexgrid）,用來顯示查詢后得到的結(jié)果。首先選擇查詢方式，然后輸入查詢?nèi)荨螕簟安樵儭卑粹o，觸發(fā)Click事件進(jìn)行查詢。程序首先判斷查詢方式，如果沒有設(shè)置查詢方式將提示；然后對(duì)查詢?nèi)葸M(jìn)行組合，組成SQL語句，進(jìn)行查詢。查詢到數(shù)據(jù)集以后，需要正常顯示在表格控

53、件中。運(yùn)用循環(huán)將每一條記錄的每一個(gè)字段顯示出來。單擊“退出查詢”按鈕，將退出查詢。3.6 班級(jí)管理模塊的創(chuàng)建班級(jí)管理模塊主要實(shí)現(xiàn)如下功能：添加班級(jí)信息修改班級(jí)信息3.6.1 添加班級(jí)信息窗體的創(chuàng)建選擇“班級(jí)管理|添加班級(jí)信息”菜單，將出現(xiàn)“添加班級(jí)信息”菜單。圖16 添加班級(jí)信息窗體窗體中各個(gè)屬性見下表：控件屬性屬性取值FrmAddclassinfo(Roem)NameFrmAddclassinfoCaption添加班級(jí)信息MDIChildTrueTxtClassnoNameTxtClassnoComboGradeNameComboGradeTxtDirectorNameTxtDirector

54、txtClassroomNameTxtClassroomCommand1NameCommand1Caption確定添加Lable1Caption班號(hào)Command2NameCommand2Caption退出添加Lable2Caption年級(jí)Lable3Caption班主任Lable4Caption教室表23 添加班級(jí)信息窗體控件與其屬性設(shè)置表輸入完容，單擊“確定添加”按鈕，觸發(fā)Click事件，添加容到數(shù)據(jù)庫。添加記錄到數(shù)據(jù)庫以前，需要判斷輸入容是否為空，格式是否滿足需要。然后判斷是否為重復(fù)記錄，最后將滿足要求的記錄添加到數(shù)據(jù)庫。單擊“退出添加”按鈕，將退出程序。3.6.2 修改班級(jí)信息窗體的創(chuàng)

55、建選擇“班級(jí)管理|修改班級(jí)信息”菜單，將出現(xiàn)“修改班級(jí)信息”窗體。圖17 修改班級(jí)信息窗體窗體中的控件與其屬性詳表21。窗體中“查看班級(jí)信息”中的按鈕，可以瀏覽數(shù)據(jù)庫中的各條記錄?！靶薷陌嗉?jí)信息”框架中的按鈕用來修改記錄。3.7 課程設(shè)置模塊的創(chuàng)建課程設(shè)置模塊主要實(shí)現(xiàn)如下功能：添加課程信息修改課程設(shè)置設(shè)置年級(jí)課程 3.7.1 添加課程信息窗體的創(chuàng)建選擇“課程設(shè)置|添加課程信息”菜單，將出現(xiàn)“添加課程設(shè)置”窗體。圖18 添加課程信息窗體窗體中的各個(gè)控件的屬性設(shè)置見下表：控件屬性屬性取值FrmAddcourseinfo(Form)NamefrmaddcourseinfoCaption添加課程信息M

56、DIChildTrueTxtCoursenoNameTxtcoursenoTxtCoursenameNameTxtcoursenameComboCoursetypenameCombocoursetypeTxtcoursedesNameTxtcoursedesCommand1NameCommand1Caption確定添加Command2NameCommand2Caption退出添加Lable1Caption課程編號(hào)Lable2Caption課程名稱Lable3Caption課程類型Lable4Caption課程描述表24 添加課程信息窗體控件與其屬性設(shè)置表單擊“確認(rèn)添加”按鈕，觸發(fā)Click事件

57、并添加記錄到數(shù)據(jù)庫。單擊“取消添加”按鈕，將退出程序。3.7.2 修改課程信息窗體的創(chuàng)建選擇“課程設(shè)置|修改課程信息”菜單，將出現(xiàn)“修改課程信息”窗體。圖19 修改課程信息窗體窗體中各個(gè)控件與其屬性詳見表21。“查看課程信息”框架中的4個(gè)按鈕用來移動(dòng)的數(shù)據(jù)集中記錄的位置，“修改課程信息”框架中的4個(gè)按鈕用來修改數(shù)據(jù)集中的記錄。3.7.3 設(shè)置年級(jí)課程窗體的創(chuàng)建選擇“課程設(shè)置|設(shè)置年級(jí)課程”，將出現(xiàn)“設(shè)置年級(jí)課程”窗體。圖20 設(shè)置年級(jí)課程窗體窗體中各個(gè)控件的屬性設(shè)置見下表：控件屬性屬性取值Frmsetcourseinfo(Form)NameFrmsetcourseinfoCaption設(shè)置年級(jí)

58、課程MDIChildTrueCombogradeNameCombogradeListallcourse(listbox)NameListallcourselistselectcourse(listbox)NameListselectcourseCmdSetNameCmdsetCaption設(shè)置課程CmdModifyNameCmdModifyCaption確認(rèn)設(shè)置CmdAddNameCmdAddCaption-CmdDeleteNameCmdDeleteCaption-Lable1Caption選擇年級(jí)Lable2Caption所有課程Lable3Caption已經(jīng)選擇課程表25 設(shè)置年級(jí)課程窗

59、體中控件與其屬性設(shè)置表程序開始執(zhí)行時(shí)，選擇年級(jí)，將在“已經(jīng)選擇課程”列表框中顯示容。單擊“年級(jí)”下拉式文本框，將觸發(fā)Click事件，顯示所選擇年級(jí)的課程。程序根據(jù)選擇的年級(jí)查詢獲得相應(yīng)的信息，并顯示在列表框中。單擊“設(shè)置課程”按鈕，將進(jìn)入設(shè)置狀態(tài)，“所有課程”列表框中將顯示所有課程。單擊“添加”和“刪除”按鈕，可以添加和刪除課程。列表框中的LisIndex屬性用來指示當(dāng)前選擇項(xiàng)，-1說明沒有被選中的數(shù)據(jù)項(xiàng)。單擊“確認(rèn)設(shè)置”按鈕，將課程設(shè)置數(shù)據(jù)保存到數(shù)據(jù)庫中。單擊“退出課程設(shè)置”按鈕，將退出程序。3.8 成績管理模塊的創(chuàng)建成績管理模塊主要實(shí)現(xiàn)如下功能：添加成績信息修改成績信息查詢成績信息 3.8

60、.1 添加成績信息窗體的創(chuàng)建選擇“成績管理|添加成績信息”菜單，將出現(xiàn)“添加成績信息”窗口。圖21 添加成績信息窗體“添加成績信息”窗體中控件的屬性設(shè)置見下表：控件屬性屬性取值FrmAddresult(Form)NameFrmAddresultCaption添加成績信息MDIChildTrueComboExamtypeNameComboExamtypeComboClassnoNameComboClassnoComboCourseNameComboCourseTxtResultNameTxtResultComboSIDNameComboSIDTxtNameNameTxtNameCmdOKName