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

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

2、創(chuà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 班級管理模塊的創(chuàng)建223.6.1 添加班級信息模塊的創(chuàng)建223.6.2 修改班級信息模塊的創(chuàng)建23 3.7 課程設(shè)置模塊的創(chuàng)建233.7.1 添加課程信息窗體的

3、創(chuàng)建233.7.2 修改課程設(shè)置窗體的創(chuàng)建243.7.3 設(shè)置年級課程窗體的創(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ī)模不斷擴大，學(xué)生數(shù)量急劇增加，有關(guān)學(xué)生的各種信息也成倍增長。面對龐大的信息量，有必要開發(fā)學(xué)生信息管理系統(tǒng)來提高學(xué)生管理工作的效率。通過這樣的系統(tǒng)，可以做到信息的規(guī)管理、科學(xué)統(tǒng)計和快速查詢，從而減少管理方面的工作量。本學(xué)生信息管理系統(tǒng)包括學(xué)籍信息管理、班級信息管理、課程信息管理、成績信息管理四大模塊。管理員可以擁有完全的權(quán)限管理系統(tǒng)，

4、而學(xué)生用戶只擁有查詢學(xué)籍信息和查詢成績信息的權(quán)限。本系統(tǒng)采用Visual Basic 6.0為開發(fā)工具，后臺數(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），在強調(diào)管理，強調(diào)信息的現(xiàn)代社會中它變得越來越普與。MIS是一門新的學(xué)科，它跨越了若干個領(lǐng)域，比如管理科學(xué)、系統(tǒng)科學(xué)，運籌學(xué)、統(tǒng)計學(xué)以與計算機科學(xué)。在這些學(xué)科的基礎(chǔ)上，形成信息收集和加工的方法，從而形成一個縱橫交織的系統(tǒng)。管理信息系統(tǒng)起初應(yīng)用于最基礎(chǔ)的工作，如打印報表、計算工資、人事管理等，進而發(fā)展到企業(yè)財務(wù)管理、庫存管理等單項業(yè)務(wù)管理，這屬于電子數(shù)據(jù)處理（

8、EDP，Electronic Data Processing）系統(tǒng)。當(dāng)建立了企業(yè)數(shù)據(jù)庫，有了計算機網(wǎng)絡(luò)從而達(dá)到數(shù)據(jù)共享后，從系統(tǒng)觀點出發(fā)，實施全局規(guī)劃和設(shè)計信息系統(tǒng)時，就達(dá)到管理信息系統(tǒng)的階段。隨著計算機技術(shù)的進步和人們對系統(tǒ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è)進行MIS的開發(fā)試點，其中首都鋼鐵公司

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

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

11、詢和修改等；要求能夠?qū)W(xué)?；菊n程信息錄入、修改和設(shè)置等；要求能夠?qū)W(xué)生成績信息進行輸入、修改和查詢等；基于權(quán)限的管理，本系統(tǒng)可以提供給管理員或者學(xué)生本人使用。對學(xué)生類用戶，只能查看信息；而對于管理員類用戶而言，可以管理所有的學(xué)生信息。VB對數(shù)據(jù)庫的操作Visual Basic（簡稱VB）是一種可視化的、事件驅(qū)動型的Windows應(yīng)用程序開發(fā)工具，它在GUI設(shè)計、繪圖、制表、運算、通信和多媒體開發(fā)方面都具有簡單易行、功能強大等優(yōu)點，所以越來越受到開發(fā)人員的親睞。同時，VB在數(shù)據(jù)庫開發(fā)方面也具有Foxpro所遠(yuǎn)不能與的強大功能。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è)計用來同新的數(shù)據(jù)訪問層OLE DB Privider一起協(xié)同工作，一提供通用數(shù)據(jù)訪問（Universal Data Access）。OLE DB是一個低層的數(shù)據(jù)訪問接口，用它可以訪問各種數(shù)據(jù)源，包括傳統(tǒng)的關(guān)系型數(shù)據(jù)庫，以與電子系統(tǒng)與自定義的商業(yè)對象。最重要的三個ADO對象是Connection、Recordset和Commen

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

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

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

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

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

18、n. Execute或Command. Execute之時InfoMessage一個Error對象被添加到ADODB.Connectuin.Error 集合之時RollbackTransCompeleteRollbackTrans方法執(zhí)行之后WillConnect即將調(diào)用Connection.open方法之時WillExecute即將調(diào)用Connection.Execute或Command.Execute方法之時表3 Connection對象的方法表2.5 ADO中Connection對象的常數(shù)在ADO中Connection對象的常數(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ù)不會覆蓋其他位于更高隔離程度的事務(wù)所做的改變AdXactIsolated所有事務(wù)相互獨立AdXactReadCommitted只允許讀其他事務(wù)已提交的改變AdXactReadUncommitted允許讀其他事務(wù)未提交的改變AdXactSerializable本事務(wù)不會覆蓋其他位于更

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

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

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

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

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

25、致。同時，合理的數(shù)據(jù)庫結(jié)構(gòu)也將有利于程序的實現(xiàn)。設(shè)計數(shù)據(jù)庫系統(tǒng)時應(yīng)該首先充分了解用戶各個方面的需求，包括現(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è)計打下基礎(chǔ)。數(shù)據(jù)流程圖：學(xué)生注冊基本信息輸入班級設(shè)置學(xué)籍信息管理成績信息輸入班級管理班級課程設(shè)置課程基本信息班級課程管理圖2 系統(tǒng)數(shù)據(jù)流程圖數(shù)據(jù)項和數(shù)據(jù)結(jié)構(gòu)：學(xué)生基本信息：包括的數(shù)據(jù)項有：學(xué)生學(xué)號、學(xué)生、性別、出生日期、班號、聯(lián)系、入校日期、家庭住址、備

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

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

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

29、信息表課程基本信息表：列名數(shù)據(jù)類型說明Course_NoINT(4)課程編號（主鍵）Course_NameCHAR(10)課程名稱Course_TypeCHAR(10)課程類型Course_DesCHAR(10)課程描述表11 課程基本信息表年級課程設(shè)置表：列名數(shù)據(jù)類型說明gradeCHAR(10)年級Course_NameCHAR(10)課程名稱表12 年成設(shè)置表學(xué)生成績信息表：列名數(shù)據(jù)類型說明Exam_NoCHAR(10)考試編號Student_IDINT(4)學(xué)生學(xué)號Student_NameCHAR(10)學(xué)生Class_NOINT(4)學(xué)生班號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)建工程項目Student_MIS為了用Visual Basic創(chuàng)建應(yīng)用程序，應(yīng)當(dāng)使用工程。一個工程是用來建造應(yīng)用程序的文件的集合，它包括：跟蹤所有部件的工程文件（.vbp）每個窗體的文件（.frm）每個窗體的二進制數(shù)據(jù)文件（.frx）,它含有窗體上控件的屬性數(shù)據(jù)。對含有二進制屬性的任何.frm文件都是不可編輯的，這些文件

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

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

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

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

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

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

37、要實現(xiàn)：用戶登錄。添加用戶。修改用戶密碼。3.4.1 用戶登錄窗體的創(chuàng)建系統(tǒng)啟動后，將首先出現(xiàn)用戶登錄窗體，用戶首先輸入用戶名，然后輸入密碼。如果用戶3次輸入密碼錯誤，將退出程序。圖10 學(xué)生信息管理系統(tǒng)登錄窗體用戶登錄窗體中放置了三個文本框（Textbox），用來輸入用戶名、密碼和用戶類型；兩個按鈕（CommandButton）用來確定或取消登錄；四個標(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ù)。并且在載入窗體時初始化這兩個全局變量。Option Explicit是用來規(guī)定所有變量使用前必須定義。這樣可以避免由于輸入錯誤而產(chǎn)生的新變量。當(dāng)用戶輸入完用戶名、用戶密碼和用戶屬性，單擊CmdOK按鈕將對用戶輸入信息進行判斷。用戶單擊該按鈕，將觸發(fā)按鈕cmdOK的Click事件。用戶如果沒有輸入用戶名、用戶密碼和用戶屬性，將出現(xiàn)消息框給予提示。如果輸入的用戶名在用戶表格中沒有找到，將提示重新輸入用戶名（默認(rèn)的用戶名和密碼是aa），文本框TxtUserName，將重新獲得輸入焦點。如果用戶輸入的密碼不正確，文本框TxtPassword將重新獲得輸入焦點。用戶登錄成功，全局變量O

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

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

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

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

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

45、DNameTxtSIDTxtNameNameTxtNameTxtBorndateNameTxtBorndateTxtTelNameTxtTelTxtRudateNameTxeRudateTxtAddressNametxtAddressScrollbarsVerticalMultilineTrueTxtCommentNameTxtCommentScrollbarsVerticalMultilinetrueComboGenderNamecomboGenderComboClassNoNameComboClassNoCmdOKNameCmdOKCaption確定添加CmdcanelNameCmdCan

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

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

48、NameTxtNameTxtBorndateNameTxtBorndateTxtTelNameTxtTelTxtRudateNameTxeRudateTxtAddressNametxtAddressScrollbarsVerticalMultilineTrueTxtCommentNameTxtCommentScrollbarsVerticalMultilinetrueComboGenderNamecomboGenderComboClassNoNameComboClassNoCmdFirstNameCmdOKCaption第一條記錄CmdPreviousNameCmdPreviousCaptio

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

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

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

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

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

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

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

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

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

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

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

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