學生學籍管理系統(tǒng)畢業(yè)論文1

《學生學籍管理系統(tǒng)畢業(yè)論文1》由會員分享，可在線閱讀，更多相關《學生學籍管理系統(tǒng)畢業(yè)論文1（27頁珍藏版）》請在裝配圖網(wǎng)上搜索。

1、武威職業(yè)學院畢業(yè)論文系 別： xxxxxx系 姓 名： xxx 論文題目： 學生學籍管理系統(tǒng) 指導老師： xxx 提交時間： 2021年11月18日 【摘要】學生學籍管理系統(tǒng)是典型的信息管理系統(tǒng)(MIS),其開發(fā)主要包括后臺數(shù)據(jù)庫的建立和維護以及前端應用程序的開發(fā)兩個方面。對于前者要求建立起數(shù)據(jù)一致性和完整性強、數(shù)據(jù)安全性好的庫。而對于后者則要求應用程序功能完備,易使用等特點。經(jīng)過分析,我們使用 MICROSOFT公司的 VISUAL BASIC開發(fā)工具,利用其提供的各種面向?qū)ο蟮拈_發(fā)工具,尤其是數(shù)據(jù)窗口這一能方便而簡潔操縱數(shù)據(jù)庫的智能化對象,首先在短時間內(nèi)建立系統(tǒng)應用原型,然后,對初始原型系

2、統(tǒng)進行需求迭代,不斷修正和改進,直到形成用戶滿意的可行系統(tǒng)。這次開發(fā)我非常注重系統(tǒng)的人性化設計。最討厭一些系統(tǒng)的不人性化設計，讓普通用戶不知道如何使用，從而望而卻步。即使是我這樣的計算機專業(yè)人員，也要探索半天才能掌握用法。 我即是此系統(tǒng)的設計開發(fā)者，也是此系統(tǒng)的用戶，所以我在此系統(tǒng)的人性化設計上下足了功夫。為方便普通用戶的操作使用，也為我的畢業(yè)設計增添了一份特色。 本系統(tǒng)的用戶界面十分簡潔、實用，系統(tǒng)編制過程中充分考慮了計算機的優(yōu)越性，對于不是計算機專業(yè)的人員來說，只要閱讀了操作說明書，也可以很方便的進入系統(tǒng)和使用本系統(tǒng)提供的功能?！娟P鍵字】：控件、窗體、域、學籍管理系統(tǒng)、信息管理系統(tǒng)、VIS

3、UAL BASIC。目 錄 前 言1第一章 為什么要開發(fā)一個學生學籍管理系統(tǒng)？111在中小學中用計算機管理學生學籍的意義112為將來學校上網(wǎng)做好準備213學生學籍的設計分析2第二章 怎樣開發(fā)一個學生學籍管理系統(tǒng)？221編程環(huán)境的選擇222關系型數(shù)據(jù)庫的實現(xiàn)223二者的結合（DBA）3第三章 Windows下的Visual Basic 編程環(huán)境簡介331 告別“hello world”的年代332 面對對象的編程533實現(xiàn)菜單選項634實現(xiàn)工具欄635幫助736關于系統(tǒng)7第四章 使用 Access2000 實現(xiàn)關系型數(shù)據(jù)庫841數(shù)據(jù)庫的概念842新建一個數(shù)據(jù)庫843修改已建的數(shù)據(jù)庫844實現(xiàn)數(shù)據(jù)

4、庫之間的聯(lián)系8第五章 系統(tǒng)總體規(guī)劃951系統(tǒng)功能952系統(tǒng)流程圖953數(shù)據(jù)字典10第六章 系統(tǒng)具體實現(xiàn)1061用戶界面的實現(xiàn)10611用戶登陸界面10612班級信息管理界面11613學生信息管理界面11614學生成績管理界面1262數(shù)據(jù)庫的實現(xiàn)12621學籍數(shù)據(jù)庫13622成績數(shù)據(jù)庫13623課程數(shù)據(jù)庫1463 與VB的連接15第七章 結束語15致謝15參考文獻15程序清單及注釋16前 言學生學籍管理系統(tǒng)是一個教育單位不可缺少的部分,它的內(nèi)容對于學校的決策者和管理者來說都至關重要,所以學生學籍管理系統(tǒng)應該能夠為用戶提供充足的信息和快捷的查詢手段。但一直以來人們使用傳統(tǒng)人工的方式管理文件學籍，這

5、種管理方式存在著許多缺點,如:效率低、保密性差,另外時間一長,將產(chǎn)生大量的文件和數(shù)據(jù),這對于查找、更新和維護都帶來了不少的困難。隨著科學技術的不斷提高,計算機科學日漸成熟,其強大的功能已為人們深刻認識,它已進入人類社會的各個領域并發(fā)揮著越來越重要的作用。作為計算機應用的一部分,使用計算機對學生學籍信息進行管理,具有著手工管理所無法比擬的優(yōu)點.例如:檢索迅速、查找方便、可靠性高、存儲量大、保密性好、壽命長、成本低等。這些優(yōu)點能夠極大地提高學生學籍管理的效率,也是企業(yè)的科學化、正規(guī)化管理,與世界接軌的重要條件。因此，開發(fā)這樣一套管理軟件成為很有必要的事情,在下面的各章中我們將以開發(fā)一套學生學籍管理

6、系統(tǒng)為例,談談其開發(fā)過程和所涉及到的問題及解決方法。第一章 為什么要開發(fā)一個學生學籍管理系統(tǒng)？ 計算機已經(jīng)成為我們學習和工作的得力助手：今天，計算機的價格已經(jīng)十分低廉，性能卻有了長足的進步。它已經(jīng)被應用于許多領域，計算機之所以如此流行的原因主要有以下幾個方面：首先，計算機可以代替人工進行許多繁雜的勞動；其次，計算機可以節(jié)省許多資源；第三，計算機可以大大的提高人們的工作效率；第四，計算機可以使敏感文檔更加安全，等等。 11在中小學中用計算機管理學生學籍的意義現(xiàn)在我國的中小學校中學籍的管理水平還停留在紙介質(zhì)的基礎上，這樣的機制已經(jīng)不能適應時代的發(fā)展，因為它浪費了許多人力和物力，在信息時代這種傳統(tǒng)的

7、管理方法必然被計算機為基礎的信息管理所取代。我作為一個計算機應用的?？粕Ｍ梢栽谶@方面有所貢獻。改革的總設計師鄧小平同志說過“科學技術是第一生產(chǎn)力”，我希望能用我三年的所學編制出一個實用的程序來幫助中小學進行更有效的學籍管理。 歸納起來，好處大約有以下幾點：1 可以存儲歷屆的學生學籍，安全、高效；2 只需一到二名學籍錄入員即可操作系統(tǒng)，節(jié)省大量人力；3 可以迅速查到所需信息。 12為將來學校上網(wǎng)做好準備跟據(jù)1999年中國電信的調(diào)查報告顯示我國的上網(wǎng)人數(shù)已達到890萬，互聯(lián)網(wǎng)已經(jīng)十分普及，學校往界的畢業(yè)生希望能在世界的任何一個角落查到自己校友的信息，本系統(tǒng)為學校將來的上網(wǎng)作了先期工作，比如數(shù)

8、據(jù)庫的建立。 13學生學籍的設計分析根據(jù)實際情況，我們使用原型法（Rapid Prototyping）即以少量代價快速地構造一個可執(zhí)行的軟件系統(tǒng)模型。使用戶和開發(fā)人員可以較快地確定需求，然后采用循環(huán)進化的開發(fā)方式，對系統(tǒng)模型作連續(xù)的精化，將系統(tǒng)需具備的性質(zhì)逐漸增加上去，直到所有的性質(zhì)全部滿足。此時模塊也發(fā)展成為最終產(chǎn)品了。第二章 怎樣開發(fā)一個學生學籍管理系統(tǒng)？21編程環(huán)境的選擇微軟公司的Visual Basic 6.0是Windows應用程序開發(fā)工具，使目前最為廣泛的、易學易用的面向?qū)ο蟮拈_發(fā)工具。Visual Basic提供了大量的控件，這些控件可用于設計界面和實現(xiàn)各種功能，減少了編程人員的

9、工作量，也簡化了界面設計過程，從而有效的提高了應用程序的運行效率和可靠性。故而，實現(xiàn)本系統(tǒng)VB是一個相對較好的選擇。 22關系型數(shù)據(jù)庫的實現(xiàn)Access2000 就是關系數(shù)據(jù)庫開發(fā)工具，數(shù)據(jù)庫能匯集各種信息以供查詢、存儲和檢索。Access 的優(yōu)點在于它能使用數(shù)據(jù)表示圖或自定義窗體收集信息。數(shù)據(jù)表示圖提供了一種類似于 Excel 的電子表格，可以使數(shù)據(jù)庫一目了然。另外，Access 允許創(chuàng)建自定義報表用于打印或輸出數(shù)據(jù)庫中的信息。Access也提供了數(shù)據(jù)存儲庫，可以使用桌面數(shù)據(jù)庫文件把數(shù)據(jù)庫文件置于網(wǎng)絡文件服務器，與其他網(wǎng)絡用戶共享數(shù)據(jù)庫。Access 是一種關系數(shù)據(jù)庫工具，關系數(shù)據(jù)庫是已開發(fā)

10、的最通用的數(shù)據(jù)庫之一。如上所述，Access 作為關系數(shù)據(jù)庫開發(fā)具備了許多優(yōu)點，可以在一個數(shù)據(jù)包中同時擁有桌面數(shù)據(jù)庫的便利和關系數(shù)據(jù)庫的強大功能。 23二者的結合（DBA）微軟的JET數(shù)據(jù)庫引擎提供了與數(shù)據(jù)庫打交道的途徑，我們是通過它以及Visual Basic 來訪問數(shù)據(jù)庫并對其進行各種操作。Visual Basic、Access以及其他微軟的軟件產(chǎn)品都是通過共用JET數(shù)據(jù)庫引擎，從而給用戶提供了豐富的數(shù)據(jù)類型。DATA 控件在數(shù)據(jù)庫中的信息與將信息顯示給用戶看的Visual Basic程序之間架起了一座橋梁。我們可以設置DATA控件的各個屬性，告訴它要調(diào)用那個數(shù)據(jù)庫的哪個部分。缺省情況下，

11、DATA控件根據(jù)數(shù)據(jù)庫中的一個或多個數(shù)據(jù)表建立一個dynaset-type（動態(tài)集合）類型的記錄集合。一個記錄集合是動態(tài)的也就意味著，當原來的數(shù)據(jù)表中的容改變了以后，該記錄集合中的記錄也會隨之改變。DATA控件還提供了用來瀏覽不同記錄的各種跳轉(zhuǎn)按鈕。將DATA控件放置在窗體中之后，我們還必須在該控件與要處理的數(shù)據(jù)庫之間建立聯(lián)系。第三章 Windows下的Visual Basic 編程環(huán)境簡介31 告別“hello world”的年代 Visual Basic應用程序基本的構建塊是用戶所創(chuàng)建的對象，每一個對象都具有一些特性和行為（屬性、事件和 方法）。開發(fā)人員可以最有效利用所創(chuàng)建的每一個對象。使

12、用應用程序具有可通用性可說擴展性和強有力的功能。BASIC是Beginner's All-purpose symbolic instruction Code（初學者通用符號指令代碼）的縮寫，是國際上廣泛使用的一種計算機高級語言。BASIC簡單、易學，目前仍是計算機入門的主要學習語言之一。 BASIC語言的問世及發(fā)展 BASIC語言自其問世經(jīng)歷了以下四個階段：第一階段：（1964年70年代初） 1964年BASIC語言問世。 第二階段：（1975年80年代中） 微機上固化的BASIC第三階段：（80年代中90年代初） 結構化BASIC語言。第四階段：（1991年以來） Visual BA

13、SIC 1991年，微軟推出了Visual Basic1.0版。這在當時引起了很大的轟動。許多專家把VB的出現(xiàn)當做是軟件開發(fā)史上的一個具有劃時代意義的事件。其實，以我們現(xiàn)在的目光來看，VB10的功能實在是太弱了。但在當時，它是第一個“可視”的編程軟件。這使得程序員欣喜之極，都嘗試在VB的平臺上進行軟件創(chuàng)作。微軟也不失時機地在四年內(nèi)接連推出VB20，VB30，40三個版本。并且從VB3開始，微軟將ACCESS的數(shù)據(jù)庫驅(qū)動集成到了VB中，這使得VB的數(shù)據(jù)庫編程能力大大提高。從VB4開始，VB也引入了面向?qū)ο蟮某绦蛟O計思想。VB功能強大，學習簡單。而且，VB還引入了“控件：的概念，使得大量已經(jīng)編好的

14、VB程序可以被我們直接拿來使用，如今，VB已經(jīng)有了6.0版。通過幾年的發(fā)展，它已成為一種真真專業(yè)化的開發(fā)語言和環(huán)境。用戶認為可用Visual Basic快速創(chuàng)建Windows程序，在現(xiàn)在還可以編寫企業(yè)水平的客戶服務器程序及強大的數(shù)據(jù)庫應用程序，Visual Basic新版中還有更多可用功能。Visual Basic的編程基礎 什么是程序 首先需要知道下面這個問題的答案：“程序到底是什么？”計算機程序是指令集，它告訴計算機如何執(zhí)行特殊的任務。讀者也許對許多種指令熟悉，如按菜譜烹調(diào)特殊的食物或按指定的方向到達不熟悉的目的地。沒有這些特殊的指令，就不能執(zhí)行預期的任務。計算機也是一樣，只是它們需要為執(zhí)

15、行的每一個任務提供指令。甚至對最簡單的任務也需要指令，例如如何取得擊鍵，怎樣在屏幕上放一個字母，怎樣在磁盤中保存訊息。 幸運的是，許多這樣的指令包含在處理器芯片中或內(nèi)置于操作系統(tǒng)中，因此用戶不必擔心它們。 相反，應集中于為任務提供指令，如計算雇員工資，創(chuàng)建鄰居郵件列表，或設置格式化文本以顯示最近的年度報表信息。 雖然我們用自然語言讀這些指令，但計算機指令必須是二進制代碼，即一系列在計算機內(nèi)存和處理器中的開或關的狀態(tài)。有些語言，如匯編程序，可以允許直接寫這種類型的代碼。但是，以這種方法編程十分困難，因此Visual Basic和其他編程語言使程序員可以用與自然語言有點相近的方式編寫指令。然而，即

16、使是這些指令仍有限，并要遵循高度定義的結構。 Visual Basic允許創(chuàng)建反映用戶動作和系統(tǒng)事件的程序。這種編程叫事件驅(qū)動編程。要了解事件驅(qū)動程序是怎樣工作的，先要了解過去的程序怎樣運行及在Windows環(huán)境中有何不同。 在Windows之前（回到往日的DOS和“史前時代”��之前），程序以順序方式運行。也就是說，一旦程序啟動，它就一條指令一條指令的向前執(zhí)行，直到程序結束或出現(xiàn)致命錯誤。 32 面對對象的編程使創(chuàng)建Windows程序較為容易的關鍵技術是面向?qū)ο缶幊?，或OOP。這種技術可以創(chuàng)建可重用組建，它是程序的組成模塊。 幾個定義在討論Visual Basic

17、時，經(jīng)?？梢月牭竭@些術語，因此對這些術語的基本理解十分有幫助?？丶?提供程序可見界面的可重用對象。控件的示例有文本框、標簽和命令按鈕。事件 由用戶或操作系統(tǒng)引發(fā)的動作。事件的示例有擊鍵、單擊鼠標、一段時間的限制，或從端口接收數(shù)據(jù)。方法 嵌入在對象定義中的程序代碼，它定義對象怎樣處理信息并響應某事件。例如，數(shù)據(jù)庫對象有打開紀錄集并從一個記錄移動到另一個記錄的方法。 對象 程序的基本元素，它含有定義其特征的屬性，定義其任務和識別它可以響應的事件的方法。控件和窗體是Visual Basic中所有對象的示例。 過程 為完成任務而編寫的代碼段。過程通常用于響應特定的事件。 屬性 對象的特征，如尺寸、位置

18、、顏色或文本。屬性決定對象的外觀，有時也決定對象的行為。屬性也用于為對象提供數(shù)據(jù)和從對象取回信息。BASIC是種易學易用的高級語言,非常適合初學者學習運用。常用的編譯軟件有True BASIC,Turbo BASIC Quick BASIC,Visual BASIC,CAREALIZER,GFA BASIC,POWER BASIC,等等。Visual Basic應用由一系列對象組成，包括有函數(shù)、菜單、函數(shù)、結構和數(shù)據(jù)窗口、用戶對象、用戶事件等等，對象中又包含若干控件如命令按鈕、單行編輯器等這些對象和控件都可在許多應用中重復使用。 33實現(xiàn)菜單選項菜單是程序最重要的特性之一，大多數(shù)程序都依賴一個

19、定義良好的菜單使程序易于使用和維護，Visual Basic也提供了強大的創(chuàng)建菜單功能是程序更加標準。您可以使用Visual Basic的Application Wizard也可以使用Visual Basic 的菜單編輯器建立菜單或者修改已經(jīng)存在的菜單。 34實現(xiàn)工具欄CoolBar控件與Office97種看到的CoolBar是類似的。CoolBar就是一個可以在窗體上浮動的工具，同時也是其他ActiveX的容器。通過在CoolBar中遷入其他空間你局可以向用戶提供更好的靈活性和義用性。Toolbar 是工具條控件，是實現(xiàn)工具條的主體。其中的按鈕可以顯示圖像和標題，并按功能分組或加入分隔符，還

20、可以圍棋設置鼠標停留在其上顯示的提示字符。Toolbar也是一個控件容器且具有Style屬性，并可以為其增加下拉按鈕和平滑按鈕等。選擇“工程”下拉菜單中的“部件”選項，顯示“部件”對話框。在“控件”選項卡列表中選擇“Microsoft Windows Common Controls 6.0”后工具相中增加改控件。其屬性及對象如下： 1 Align屬性定義工具條在窗體中的位置2 ToolTipText屬性是字符串類型，定義控件的提示字符3 Style屬性定義按鈕外觀。4 ImageList屬性定義與數(shù)據(jù)條對應的ImageList控件名，該控件定義工具條按鈕顯示的圖像。5 HotImangeLis

21、t屬性設置一個ImageList控件名，該控件定義按鈕獲得熱點時顯示的圖像。6 DisabledImageList屬性定義工具條按鈕無效時顯示的圖像。創(chuàng)建工具條包括ImageList和Toolbar控件ImageList用于為其他控件提供圖像庫，將ImageList控件加入到工具箱的操作于前述Toolbar控件相同。 35幫助專業(yè)水平的軟件通常都帶有聯(lián)機幫助功能。無論寫出來的程序是要給大量的用戶使用，還是僅僅局限于公司內(nèi)部有限的使用者，我們都應該為用戶提供詳細的、易于理解的聯(lián)機幫助文檔。微軟的Help Workshop4.0 是一套獨立于Visual Basic 的用來協(xié)助我們創(chuàng)建、運行于32

22、位Windows 操作系統(tǒng)下的幫助文件的工具。使用它我們可以為我們編寫的應用程序生成一組幫助文件。 36關于系統(tǒng)為了是程序顯得更具有專業(yè)風格，首先可以在其中加入通常的應用程序信息。這些信息包括公司名稱、版本號、修訂號以及其他類似信息。Visual Basic允許你使用APP對象來保存這些信息，APP對象是一個預定義對象，不需要在程序中創(chuàng)建它。APP對象的大多數(shù)屬性被應用程序用來提供常規(guī)的信息，通過使用這些APP提供的屬性，可以在應用程序和用戶之間交流重要信息，在項目屬性框中可以設置它的屬性。第四章 使用 Access2000 實現(xiàn)關系型數(shù)據(jù)庫41數(shù)據(jù)庫的概念數(shù)據(jù)庫是一種存儲數(shù)據(jù)并對數(shù)據(jù)進行操作

23、的工具。數(shù)據(jù)庫的作用在于組織和表達信息，簡而言之，數(shù)據(jù)庫就是信息的集合。計算機的數(shù)據(jù)庫可以分為兩類：非關系數(shù)據(jù)庫（flat-file）和關系數(shù)據(jù)庫（relational）。關系數(shù)據(jù)庫中包含了多個數(shù)據(jù)表的信息，數(shù)據(jù)庫含有各個不同部分的術語，象記錄、域等。 42新建一個數(shù)據(jù)庫創(chuàng)建任何一個數(shù)據(jù)庫的第一步是仔細的規(guī)劃數(shù)據(jù)庫，設計必須是靈活的、有邏輯的。創(chuàng)建一個數(shù)據(jù)庫結構的過程被認為是數(shù)據(jù)模型設計。1 標識需要的數(shù)據(jù)；2 收集被標識的字段到表中；3 標識主關鍵字字段；4 繪制一個簡單的數(shù)據(jù)圖表；5 規(guī)范數(shù)據(jù)；6 標識指定字段的信息；7 創(chuàng)建物理表。 43修改已建的數(shù)據(jù)庫數(shù)據(jù)庫的修改分為：添加、編輯和刪除

24、記錄。這三種操作均可由Visual Basic 創(chuàng)建的程序來完成，下面的章節(jié)將詳細描述實現(xiàn)的具體方法。 44實現(xiàn)數(shù)據(jù)庫之間的聯(lián)系數(shù)據(jù)庫之間的關系指明兩個庫之間共享一個共同的關鍵字值。一個連接是指一種虛擬的表，這種表是在當用戶要求從相互關聯(lián)的各個不同的表中獲取信息時建立的，關鍵字段用于在相互連接的不同表中查找匹配的記錄。一個更高級的連接形式稱為自連接。這種連接是指一個表被連接到它自己的一個字段，或在不同的紀錄中由重復數(shù)據(jù)的組合字段。數(shù)據(jù)庫中有三種不同類型的關鍵字：主關鍵字、組合關鍵字和外關鍵字。在表中使用的關鍵字類型用于描述庫表示什么以及在數(shù)據(jù)庫中如何與其它的庫建立關系。第五章 系統(tǒng)總體規(guī)劃 5

25、1系統(tǒng)功能1 可以進行文本操作；2 添加一個數(shù)據(jù)庫項目；3 刪除一個數(shù)據(jù)庫項目；4 修改一個數(shù)據(jù)庫項目；5 查詢信息；6 察看課程表。 52系統(tǒng)流程圖本系統(tǒng)流程圖如下：學生管理系統(tǒng)數(shù)據(jù)修改數(shù)據(jù)錄入退出系統(tǒng)打印報表數(shù)據(jù)查詢數(shù)據(jù)查詢數(shù)據(jù)錄入學生注冊情況查詢學生基本情況查詢班級課程查詢班主任查詢學生成績查詢學生成績錄入班級課程錄入班主任錄入學生注冊錄入學生基本情況錄入數(shù)據(jù)修改班級課程修改學生成績修改班主任修改學生注冊情況修改學生基本情況修改圖 5-2 53數(shù)據(jù)字典  數(shù)據(jù)字典是在需求分析階段建立，在數(shù)據(jù)庫設計過程中不斷修改、充實完善的。明確地需求收集和分析作為數(shù)據(jù)庫設計的第一階段是十分重要

26、的。第六章 系統(tǒng)具體實現(xiàn) 61用戶界面的實現(xiàn) 611用戶登陸界面圖6-1概述：用戶必須輸入正確的用戶名稱（zhanghaiyan）和用戶密碼（888）后按“確認”或“Enter”鍵才可進入本系統(tǒng)操作。圖6-2 612班級信息管理界面圖6-3概述：用戶可以添加、修改、刪除班級信息 613學生信息管理界面圖6-4概述：當查詢條件輸入完畢后，系統(tǒng)自動在數(shù)據(jù)庫中檢索，將滿足條件的記錄顯示在屏幕上。用戶可以添加、修改、刪除學生信息等。 614學生成績管理界面圖6-5概述：用戶可以添加、修改、刪除學生成績信息等。當查詢條件輸入完畢后，系統(tǒng)自動在數(shù)據(jù)庫中檢索，將滿足條件的記錄顯示在屏幕上。 62數(shù)據(jù)庫的實現(xiàn)

27、 621學籍數(shù)據(jù)庫學籍數(shù)據(jù)庫里存儲了學生的學籍包括：學號、姓名、性別、出生日期、學生編號、聯(lián)系電話、入學日期、家庭住址、備注等如下表表6-1student_NO（學號）文本 student_Name（姓名）文本student_Sex（性別）文本student_Bir（出生日期）日期/時間 student_Cla（學生編號）文本student_Tel（聯(lián)系電話）文本student_Esd （入學日期）日期/時間student_Add（家庭住址）文本student_Rem（備注）備注學籍模塊：該模塊主要完成學生基本信息的錄入、刪除 、更新等功能。在此模塊中定義了八個域名來進行學生的信息存儲。如果用

28、戶修改某一紀錄中的某一項，可單添加按鈕進行學生記錄的編輯，此窗口使用數(shù)據(jù)窗口的FREEDOM風格（典型的錄入界面）。該種風格特點是列標題緊挨著數(shù)據(jù)列在此窗口還可以增加新學生紀錄。 622成績數(shù)據(jù)庫成績數(shù)據(jù)庫里存儲了學生的成績包括：學號、學生編號、考試課程、成績等如下表表6-2score_NO（考試編號）文本 score_Per（考試期號）文本 score_Cla （學生班號）文本score_Stu（學生編號） 文本score_Cou （考試課程）文本score_Sco（考試分數(shù)）數(shù)字成績模塊：該模塊主要完成學生成績的基本信息的錄入、刪除 、更新等功能。在此模塊中定義了四個域名來進行學生的信息存

29、儲。 623課程數(shù)據(jù)庫課程數(shù)據(jù)庫利存儲了課程的信息：課程名、備注等如下表表6-3course_Name（課程名） 文本 course_Rem（備注）備注課程模塊：該模塊主要完成存儲課程的所有信息及錄入、刪除 、更新等功能 63 與VB的連接Visual Basic提供了與底層數(shù)據(jù)庫系統(tǒng)緊密的連接。Visual Basic 支持不同的關系數(shù)據(jù)庫管理系統(tǒng)并充分發(fā)揮每一個數(shù)據(jù)庫的特長。生成獨立應用或脫離服務器運行的服務以上的應用，Visual Basic連接數(shù)據(jù)庫的方式有兩種：通過使用Visual Basic的 DATA控件。 通過使用由Visual Basic提供的專用的直接與數(shù)據(jù)庫相連的接口第七

30、章 結束語經(jīng)過三個多月的設計和開發(fā)，中小學學籍管理系統(tǒng)基本開發(fā)完畢。其功能基本符合用戶需求，能夠完成學生學籍的存儲和成績的查詢以及各類相關報表的打印。并提供部分系統(tǒng)維護功能,使用戶方便進行數(shù)據(jù)備份和恢復、數(shù)據(jù)刪除。，對于數(shù)據(jù)的一致性的問題也通過程序進行了有效的解決。但是由于畢業(yè)設計時間較短，所以該系統(tǒng)還有許多不盡如人意的地方，比如聯(lián)機文檔比較少，用戶界面不夠美觀，出錯處理不夠等多方面問題。這些都有待進一步改善。 致謝在本次畢業(yè)設計中，我從指導老師 身上學到了很多東西。胡老師認真負責的工作態(tài)度，嚴謹?shù)闹螌W精神和深厚的理論水平都使我收益匪淺。他無論在理論上還是在實踐中，都給與我很大的幫助，使我得到

31、不少的提高這對于我以后的工作和學習都有一種巨大的幫助，感謝他耐心的輔導。另外，在系統(tǒng)開發(fā)過程中 師傅也給于我很大的幫助，幫助解決了不少的難點，使得系統(tǒng)能及時開發(fā)完成，還有同組的同學同樣給與我不少幫助，這里一并表示感謝。 參考文獻1 Visual Basic 6.0 使用指南 作者：Bob Reselman , Richard Peasley 出版社：電子工業(yè)出版社2 中文版Microsoft Office 97 自學通作者：Ned Snell 出版社：機械工業(yè)出版社3 Visual Basic 6.0 中文版控件大全作者：Microsoft 出版社：電子工業(yè)出版社4 中文Access 2000

32、 24學時教程 作者：Craig Eddy ，Timothy Buchanan 出版社：機械工業(yè)出版社5 Visual Basic6.0程序設計教程作者：李淑華 出版社：高等教育出版社出版6 Visual Basic程序設計作者：王利 出版社：高等教育出版社出版程序清單及注釋 用戶登陸代碼： Private Sub cmdOK_Click() txtSQL = "select * from user_Form where user_ID = '" & txtUserName.Text & "'" Set mrc = Exe

33、cuteSQL(txtSQL, MsgText) If mrc.EOF = True Then MsgBox "沒有這個用戶，請重新輸入用戶名!", vbOKOnly + vbExclamation, "警告" txtUserName.SetFocus Else If Trim(mrc.Fields(1) = Trim(txtPassword.Text) Then OK = True mrc.Close Me.Hide UserName = Trim(txtUserName.Text) Else MsgBox "輸入密碼不正確，請重新輸入！&q

34、uot;, vbOKOnly + vbExclamation, "警告" txtPassword.SetFocus txtPassword.Text = "" End If End If miCount = miCount + 1 If miCount = 3 Then Me.Hide End If Exit SubEnd Sub 班級信息管理代碼： Private Sub Label2_Click(Index As Integer) Me.Caption = "班級信息" Me.Caption = Me.Caption &

35、"->" & Trim(Label2(Index).Caption) For i = 0 To 2 Label2(i).BackColor = &HE0E0E0 Picture1(i).Visible = False Next Label2(Index).BackColor = &HFFFFFF Picture1(Index).Visible = True For i = 0 To 11 Text1(i) = "" Next Command3.Enabled = False Command5.Enabled = FalseE

36、nd SubPrivate Sub ShowData() Dim txSQL As String Dim mrcc As ADODB.Recordset txSQL = "select * from class_Form" Set mrcc = ExecuteSQL(txSQL, MsgText) With MSFlexGrid1 .ColWidth(0) = 1200 .ColWidth(1) = 1200 .ColWidth(2) = 1200 .ColWidth(3) = 6000 .TextMatrix(0, 0) = "班級編號" .TextM

37、atrix(0, 1) = "班級名稱" .TextMatrix(0, 2) = "導員姓名" .TextMatrix(0, 3) = "備注信息" .Rows = 1 Do While Not mrcc.EOF .Rows = .Rows + 1 For i = 0 To mrcc.Fields.Count - 1 .TextMatrix(.Rows - 1, i) = mrcc.Fields(i) & "" Next i mrcc.MoveNext Loop End With mrcc.CloseEnd

38、 SubPrivate Sub MSFlexGrid1_Click() If Picture1(1).Visible = True Then Text1(4) = Trim(MSFlexGrid1.TextMatrix(MSFlexGrid1.Row, 0) Text1(5) = Trim(MSFlexGrid1.TextMatrix(MSFlexGrid1.Row, 1) Text1(6) = Trim(MSFlexGrid1.TextMatrix(MSFlexGrid1.Row, 2) Text1(7) = Trim(MSFlexGrid1.TextMatrix(MSFlexGrid1.R

39、ow, 3) Command3.Enabled = True End If If Picture1(2).Visible = True Then Text1(8) = Trim(MSFlexGrid1.TextMatrix(MSFlexGrid1.Row, 0) Text1(9) = Trim(MSFlexGrid1.TextMatrix(MSFlexGrid1.Row, 1) Text1(10) = Trim(MSFlexGrid1.TextMatrix(MSFlexGrid1.Row, 2) Text1(11) = Trim(MSFlexGrid1.TextMatrix(MSFlexGri

40、d1.Row, 3) Command5.Enabled = True End IfEnd SubPrivate Sub Text1_Change(Index As Integer) If Index = 4 Then tSQL = "select * from class_Form where class_NO='" & Trim(Text1(Index) & "'" Set mrc = ExecuteSQL(tSQL, MsgText) If mrc.EOF = False Then Text1(5) = mrc.Fie

41、lds(1) Text1(6) = mrc.Fields(2) Text1(7) = mrc.Fields(3) Command3.Enabled = True Exit Sub Else Text1(5) = "" Text1(6) = "" Text1(7) = "" Command3.Enabled = False End If mrc.Close End If If Index = 8 Then tSQL = "select * from class_Form where class_NO='" &

42、amp; Trim(Text1(Index) & "'" Set mrc = ExecuteSQL(tSQL, MsgText) If mrc.EOF = False Then Text1(9) = mrc.Fields(1) Text1(10) = mrc.Fields(2) Text1(11) = mrc.Fields(3) Command5.Enabled = True Exit Sub Else Text1(9) = "" Text1(10) = "" Text1(11) = "" Comm

43、and5.Enabled = False End If mrc.Close End IfEnd SubPrivate Sub Text1_GotFocus(Index As Integer) Text1(Index).SelStart = 0 Text1(Index).SelLength = Len(Text1(Index)End SubPrivate Sub Text1_KeyDown(Index As Integer, KeyCode As Integer, Shift As Integer) EnterToTab KeyCodeEnd Sub 學生信息管理代碼： Private Sub

44、Label1_Click(Index As Integer) Me.Caption = "學籍信息->" Me.Caption = Me.Caption & Trim(Label1(Index).Caption) Label1(0).BackColor = &HE0E0E0 Label1(1).BackColor = &HE0E0E0 Label1(2).BackColor = &HE0E0E0 Label1(3).BackColor = &HE0E0E0 Label1(Index).BackColor = &HFFFF

45、FF Label2(4).Caption = "在此選擇學號" Label2(5).Caption = "在此輸入聯(lián)系電話" Label2(6).Caption = "在此輸入入學日期" Command5.SetFocus If Index = 0 Then TextDcolor Command1.Visible = True Command2.Visible = False Command3.Visible = False Command4.Visible = False End If If Index = 1 Then Label

46、2(4).Caption = "在此輸入學生學號" Label2(5).Caption = "查詢?nèi)雽W日期起始" Label2(6).Caption = "查詢?nèi)雽W日期截止" TextDcolor Text1(4).Visible = True Combo1.Visible = False Command1.Visible = False Command2.Visible = True Command3.Visible = False Command4.Visible = False Text1(2).Enabled = False

47、Text1(3).Enabled = False Text1(7).Enabled = False Text1(8).Enabled = False End If If Index = 2 Then TextDcolor Text1(0).SetFocus Command1.Visible = False Command2.Visible = False Command3.Visible = True Command4.Visible = False End If If Index = 3 Then TextDcolor Text1(0).SetFocus Command1.Visible =

48、 False Command2.Visible = False Command3.Visible = False Command4.Visible = True Text1(1).Enabled = False Text1(2).Enabled = False Text1(3).Enabled = False Combo1.Enabled = False Text1(4).Enabled = False Text1(5).Enabled = False Text1(6).Enabled = False Text1(7).Enabled = False Text1(8).Enabled = False End IfEnd Sub 23