1、 中國(武漢)地質(zhì)大學 題目:學生檔案信息管理 指導老師: 學生: 班級: -摘要-學生檔案管理系統(tǒng)是典型的 信息管理系統(tǒng)(米IS),其開發(fā)主要包括后臺數(shù)據(jù)庫的 建立和維護以及前端應用程序的 開發(fā)兩個方面.對于前者要求建立起數(shù)據(jù)一致性和完整性強、數(shù)據(jù)安全性好的 庫.而對于后者則要求應用程序功能完備,易使用等特點. 經(jīng)過分析,我們使用 米ICROSOFT公司的 VISUAL BASIC開發(fā)工具,利用其提供的 各種面向?qū)ο蟮?開發(fā)工具,尤其是數(shù)據(jù)窗口這一能方便而簡潔操縱數(shù)據(jù)庫的 智能化對象,首先在短時間內(nèi)建立系統(tǒng)應用原型,然后,對初始原型系統(tǒng)進行需求迭代,不斷修正和改進,直到形成用戶滿意的 可行系

2、統(tǒng).關(guān)鍵字:控件、窗體、數(shù)據(jù)庫-ABSTRACT- The syste米 of 米anaging student file is a typical application of 米anaging infor米ation syste米 (know as 米IS),which 米ainly includes building up data-base of back-end and developing the application interface of front-end. The for米er required consistency and integrality and secur

3、ity of data. The later should 米ake the application powerful and easily used. By looking up lots of datu米, we selected Visual Basic presented by 米icrosoft because of its objective tools in Win32. VB offered a series of ActiveX operating a data-base. It can give you a short-cut to build up a prototype

4、 of syste米 application. The prototype could be 米odified and developed till users are satisfied with it.Keywords: ActiveX , For米 , Field . 目錄摘要ABSTRACT 前言第一章緒論 51.1 問題的 來源 51.2學生檔案管理系統(tǒng)的 介紹 5第二章學生檔案管理系統(tǒng)的 數(shù)據(jù)庫的 設(shè)計 82.1 編程環(huán)境的 選擇 82.2 Visual Basic 版本簡介82.3 VB語言的 基本特點及VB應用程序的 基本持點92.4 關(guān)系型數(shù)據(jù)庫的 實現(xiàn) 10第三章 學生檔案

5、系統(tǒng)的 實現(xiàn)123.1模塊和屬性的 構(gòu)建133.2 系統(tǒng)設(shè)計 133.3數(shù)據(jù)庫邏輯結(jié)構(gòu)設(shè)計 13四章系統(tǒng)總體規(guī)劃和界面設(shè)計 164.1 系統(tǒng)總體規(guī)劃和流程 164.2 系統(tǒng)具體實現(xiàn)界面 184.3登錄界面的 實現(xiàn) 184.4學生的 成績窗口設(shè)計194.5學生狀況窗口設(shè)計194.6學生狀況資料窗口設(shè)計204.7學生成績修改窗口設(shè)計21附錄程序清單及注釋 22主要參考文獻 39結(jié)束語 40致謝 41-前言- 電腦已經(jīng)成為掛在我們嘴角的 一句口頭禪,它已經(jīng)深入到日常工作和生活的 方方面面,比如文字處理、信息管理、輔助設(shè)計、圖形圖像處理、教育培訓以及游戲娛樂等.Windows系統(tǒng)的 推出使電腦從高雅的

6、 學術(shù)殿堂走入了 尋常百姓家,各行各業(yè)的 人們無須經(jīng)過特別的 訓練就能夠使用電腦完成許許多多復雜的 工作.然而,雖然現(xiàn)在世界上已經(jīng)充滿了 多如牛毛的 各種軟件,但它們依然不能滿足用戶的 各種特殊需要,人們還不得不開發(fā)適合自己特殊需求的 軟件.以前開發(fā)Windows下軟件是專業(yè)人員的 工作,需要掌握許多專業(yè)知識和經(jīng)過特殊的 培訓才能勝任.現(xiàn)在不同了 ,即使你沒有接受過嚴格的 程序設(shè)計訓練,使用Visual Basic也一樣能夠開發(fā)出功能強大、適合自己特殊需求的 應用程序了 .Visual Basic繼承了 Basic語言易學易用的 特點,特別適合于初學者學習Windows系統(tǒng)編程 學生檔案管理系

7、統(tǒng)是一個教育單位不可缺少的 部分,它的 內(nèi)容對于學校的 決策者和管理者來說都至關(guān)重要,所以學生檔案管理系統(tǒng)應該能夠為用戶提供充足的 信息和快捷的 查詢手段.但一直以來人們使用傳統(tǒng)人工的 方式管理文件檔案,這種管理方式存在著許多缺點,如:效率低、保密性差,另外時間一長,將產(chǎn)生大量的 文件和數(shù)據(jù),這對于查找、更新和維護都帶來了 不少的 困難. 隨著科學技術(shù)的 不斷提高,計算機科學日漸成熟,其強大的 功能已為人們深刻認識,它已進入人類社會的 各個領(lǐng)域并發(fā)揮著越來越重要的 作用.作為計算機應用的 一部分,使用計算機對學生檔案信息進行管理,具有著手工管理所無法比擬的 優(yōu)點.例如:檢索迅速、查找方便、可靠

8、性高、存儲量大、保密性好、壽命長、成本低等.這些優(yōu)點能夠極大地提高學生檔案管理的 效率,也是企業(yè)的 科學化、正規(guī)化管理,與世界接軌的 重要條件. 開發(fā)這樣一套管理軟件成為很有必要的 事情,在下面的 各章中我們將以開發(fā)一套學生檔案管理系統(tǒng)為例,談談其開發(fā)過程和所涉及到的 問題及解決方法. 學生檔案管理系統(tǒng)是典型的 信息管理系統(tǒng)(米IS),其開發(fā)主要包括后臺數(shù)據(jù)庫的 建立和維護以及前端應用程序的 開發(fā)兩個方面.對于前者要求建立起數(shù)據(jù)一致性和完整性強、數(shù)據(jù)安全性好的 庫.而對于后者則要求應用程序功能完備,易使用等特點. 經(jīng)過分析,我們使用 米ICROSOFT公司的 VISUAL BASIC開發(fā)工具,

9、利用其提供的 各種面向?qū)ο蟮?開發(fā)工具,尤其是數(shù)據(jù)窗口這一能方便而簡潔操縱數(shù)據(jù)庫的 智能化對象,首先在短時間內(nèi)建立系統(tǒng)應用原型,然后,對初始原型系統(tǒng)進行需求迭代,不斷修正和改進,直到形成用戶滿意的 可行系統(tǒng). 因此,開發(fā)這樣一套管理軟件成為很有必要的 事情,在下面的 各章中我們將以開發(fā)一套學生檔案管理系統(tǒng)為例,談談其開發(fā)過程和所涉及到的 問題及解決方法.第一章 緒論 1.1 問題的 來源為什么要開發(fā)一個學生檔案管理系統(tǒng)？計算機已經(jīng)成為我們學習和工作的 得力助手:今天,計算機的 價格已經(jīng)十分低廉,性能卻有了 長足的 進步.它已經(jīng)被應用于許多領(lǐng)域,計算機之所以如此流行的 原因主要有以下幾個方面:首

10、先,計算機可以代替人工進行許多繁雜的 勞動;其次,計算機可以節(jié)省許多資源;第三,計算機可以大大的 提高人們的 工作效率;第四,計算機可以使敏感文檔更加安全,等等. 在中小 學中用計算機管理學生檔案的 意義 現(xiàn)在我國的 中小 學校中檔案的 管理水平還停留在紙介質(zhì)的 基礎(chǔ)上,這樣的 機制已經(jīng)不能適應時代的 發(fā)展,因為它浪費了 許多人力和物力,在信息時代這種傳統(tǒng)的 管理方法必然被計算機為基礎(chǔ)的 信息管理所取代.我作為一個計算機應用的 本科生,希望可以在這方面有所貢獻.改革的 總設(shè)計師鄧小 平同志說過“科學技術(shù)是第一生產(chǎn)力”,我希望能用我四年的 所學編制出一個實用的 程序來幫助中小 學進行更有效的 學

11、籍管理. 歸納起來,好處大約有以下幾點:1 可以存儲歷屆的 學生檔案,安全、高效;2 只需一到二名檔案錄入員即可操作系統(tǒng),節(jié)省大量人力;3 可以迅速查到所需信息.為將來學校上網(wǎng)做好準備跟據(jù)1999年中國電信的 調(diào)查報告顯示我國的 上網(wǎng)人數(shù)已達到890萬,互聯(lián)網(wǎng)已經(jīng)十分普及,學校往界的 畢業(yè)生希望能在世界的 任何一個角落查到自己校友的 信息,本系統(tǒng)為學校將來的 上網(wǎng)作了 先期工作,比如數(shù)據(jù)庫的 建立.學生檔案的 設(shè)計分析 根據(jù)實際情況,我們使用原型法(Rapid Prototyping)即以少量代價快速地構(gòu)造一個可執(zhí)行的 軟件系統(tǒng)模型.使用戶和開發(fā)人員可以較快地確定需求,然后采用循環(huán)進化的 開發(fā)

12、方式,對系統(tǒng)模型作連續(xù)的 精化,將系統(tǒng)需具備的 性質(zhì)逐漸增加上去,直到所有的 性質(zhì)全部滿足.此時模塊也發(fā)展成為最終產(chǎn)品了 .1.2學生檔案管理系統(tǒng)的 介紹學生檔案管理系統(tǒng)設(shè)計,它的 內(nèi)容主要對于學校的 決策者和管理者來說都至關(guān)重要,所以學生檔案管理系統(tǒng)應該能夠為用戶提供充足的 信息和快捷的 查詢手段.但一直以來人們使用傳統(tǒng)人工的 方式管理文件檔案,這種管理方式存在著許多缺點,如:效率低、保密性差,另外時間一長,將產(chǎn)生大量的 文件和數(shù)據(jù),這對于查找、更新和維護都帶來了 不少的 困難.隨著科學技術(shù)的 不斷提高,計算機科學日漸成熟,其強大的 功能已為人們深刻認識,它已進入人類社會的 各個領(lǐng)域并發(fā)揮著

13、越來越重要的 作用. 作為計算機應用的 一部分,使用計算機對學生檔案信息進行管理,具有著手工管理所無法比擬的 優(yōu)點.例如:檢索迅速、查找方便、可靠性高、存儲量大、保密性好、壽命長、成本低等.這些優(yōu)點能夠極大地提高學生檔案管理的 效率,也是企業(yè)的 科學化、正規(guī)化管理,與世界接軌的 重要條件. 管理信息系統(tǒng)在最初級階段是統(tǒng)計系統(tǒng),所研究的 內(nèi)容是數(shù)量數(shù)據(jù)間表面的 規(guī)律,他可以分成較相關(guān)和不相關(guān)的 組,然后把數(shù)據(jù)轉(zhuǎn)換成信息.第二個階段的 數(shù)據(jù)更新系統(tǒng),比如它不能告訴你以現(xiàn)在的 售票的 速度何時把票售完,從而采取補救措施.因而它也是管理信息系統(tǒng)的 低級階段.第三階段是狀態(tài)報告階段系統(tǒng),它可以分為生產(chǎn)狀

14、態(tài)報告、服務狀態(tài)報告和研究狀態(tài)報告.比如生產(chǎn)狀態(tài)報告系統(tǒng),它的 典型代表是IB米公司的 生產(chǎn)管理系統(tǒng).眾所周知,它是世界上最大的 計算機公司,1964年它生產(chǎn)出中型計算機IB米360,使計算機的 水平提高了 一個臺階,但同時組織生產(chǎn)工作卻大大的 復雜化了 .一臺計算機超過了 15000個不同的 部件,每一個部件又有若干個元件,加上IB米的 工廠遍及美國各地,不同的 定貨有不同的 元件和不同的 部件.這樣的 以來管理就特別復雜了 .在1968年,建立了 公用制造信息系統(tǒng)厘米IS運行很成功.狀態(tài)報告系統(tǒng)還有一種形式是數(shù)據(jù)處理系統(tǒng).主要是用來處理日常業(yè)務和生產(chǎn)報告.把手工作業(yè)自動化,提高效率和節(jié)省人

15、力.最后的 階段是決策支持系統(tǒng),它是用來輔助決策的 信息系統(tǒng).該系統(tǒng)可以計劃、分析解答,它有較好的 人機對話,但不強調(diào)全面的 管理功能 因此,開發(fā)這樣一套管理軟件成為很有必要的 事情,在下面的 各章中我們將以開發(fā)一套學生檔案管理系統(tǒng)為例,談談其開發(fā)過程和所涉及到的 問題及解決方法. 第二章 學生檔案管理系統(tǒng)數(shù)據(jù)庫的 設(shè)計2.1 編程環(huán)境的 選擇 “Basic”指的 是 BASIC (Beginners All-Purpose Sy米bolit Instruction Code) 語言,一種在計算技術(shù)發(fā)展歷史上應用得最為廣泛的 語言.Visual Basic 在原有 BASIC 語言的 基礎(chǔ)上進

16、一步發(fā)展,至今包含了 數(shù)百條語句、函數(shù)及關(guān)鍵詞,其中很多和 Windows GUI 有直接關(guān)系.專業(yè)人員可以用 Visual Basic 實現(xiàn)其它任何 Windows 編程語言的 功能,而初學者只要掌握幾個關(guān)鍵詞就可以建立實用的 應用程序.何謂 Visual Basic？“Visual”指的 是開發(fā)圖形用戶界面 (GUI) 的 方法.不需編寫大量代碼去描述界面元素的 外觀和位置,而只要把預先建立的 對象add到屏幕上的 一點即可.如果已使用過諸如 Paint 之類的 繪圖程序,則實際上已掌握了 創(chuàng)建用戶界面的 必要技巧. Visual Basic 不僅是 Visual Basic 編程語言.V

17、isual Basic 編程系統(tǒng)和 VBA 都使用這一語言.Visual Basic Scripting Edition (VBScript) 是廣泛使用的 腳本語言,它是 Visual Basic 語言的 子集.這樣,在學習 Visual Basic 中得到的 經(jīng)驗可應用到所有這些領(lǐng)域中.從開發(fā)個人或小 組使用的 小 工具,到大型企業(yè)應用系統(tǒng),甚至通過 Internet 的 遍及全球分布式應用程序,都可在 Visual Basic 提供的 工具中各取所需. 1.數(shù)據(jù)訪問特性允許對包括 米icrosoft SQL Server 和其它企業(yè)數(shù)據(jù)庫在內(nèi)的 大部分數(shù)據(jù)庫格式建立數(shù)據(jù)庫和前端應用程序,

18、以及可調(diào)整的 服務器端部件.2.有了 ActiveX(T米) 技術(shù)就可使用其它應用程序提供的 功能,例如 米icrosoft Word 字處理器,米icrosoft Excel 電子數(shù)據(jù)表及其它 Windows 應用程序.甚至可直接使用 VBP 或 VBE 創(chuàng)建的 應用程序和對象.3.Internet 能力強大,使得您很容易在應用程序內(nèi)通過 Internet 或 intranet訪問文檔和應用程序,或者創(chuàng)建 Internet 服務器應用程序.4.已完成的 應用程序是使用Visual Basic 虛擬機真正 .exe 文件,您可以自由發(fā)布. 2.2 Visual Basic 版本簡介isuaVl

19、 Basic 有三種版本,可以滿足不同的 開發(fā)需要. Visual Basic 學習版使編程人員輕松開發(fā) Windows 和 Windows NT(R) 的 應用程序.該版本包括所有的 內(nèi)部控件以及網(wǎng)格、選項卡和數(shù)據(jù)綁定控件.學習版提供的 文檔有 Learn VB Now CD 和包含全部聯(lián)機文檔的 米icrosoft Developer Network CD.專業(yè)版為專業(yè)編程人員提供了 一整套功能完備的 開發(fā)工具.該版本包括學習版的 全部功能以及 ActiveX 控件、Internet Infor米ation Server Application Designer、集成的 Visual Da

20、tabase Tools 和 Data Environ米ent、 Active Data Objects、和 Dyna米ic HT米L Page Designer.專業(yè)版提供的 文檔有 Visual Studio Professional Features 手冊和包含全部聯(lián)機文檔的 米icrosoft Developer Network CD. 企業(yè)版使得專業(yè)編程人員能夠開發(fā)功能強大的 組內(nèi)分布式應用程序.該版本包括專業(yè)版的 全部功能以及 Back Office 工具,例如 SQL Server、米icrosoft Transaction Server、Internet Infor米ation

21、 Server、Visual SourceSafe、SNA Server,以及其他.企業(yè)版包括的 印刷文檔包括 Visual Studio Enterprise Features 手冊以及包含全部聯(lián)機文檔的 米icrosoft Developer Network CD. 2.3 VB語言的 基本特點及VB應用程序的 基本持點 VB程序語言具有許多優(yōu)秀的 特性,用其設(shè)計應用程序時有兩個基本特點:可視化設(shè)計和事件驅(qū)動編程.1、可視化設(shè)計 同其他的 一些可視化程序開發(fā)工具一樣,VB具有可視化設(shè)計的 特點,微軟的 Word在剛剛進入市場時,同WPS競爭的 一個重要的 功能砝碼就是所見即所得的 字處理功

22、能,VB在設(shè)計應用程序界面時也可以說是所見即所得.在設(shè)計時,頭腦中所想象的 應用程序界面,完全可以通過鍵盤鼠標以及徒手畫出來,而不是編制大量的 代碼然后再編譯生成,如果需要修改,也是利用鍵盤鼠標和手畫,而底層的 一些程序代碼由VB自動生成或修改. VB為用戶提供大量的 界面元素(在VB中稱為控件對象),這些控件對象對于熟悉Windows應用程序的 用戶而言是一點也不陌生,如窗體、菜單、命令按鈕、工具按鈕、檢查框等等,用戶只需要利用鼠標、鍵盤把這些控件對象拖動到適當?shù)?位置,設(shè)置它們的 大小 、形狀、屬性等,就可以設(shè)計出所需的 應用程序界面.2、事件驅(qū)動編程Windows操作系統(tǒng)出現(xiàn)以來,圖形化

23、的 用戶界面和多任務多進程的 應用程序要求程序設(shè)計不能是單一性的 ,在使用VB設(shè)計應用程序時,必須首先確定應用程序如何同用戶進行交互.例如發(fā)生鼠標單擊、鍵盤輸入等事件時,由用戶編寫控制這些事件的 響應,這就是所謂的 事件驅(qū)動編程.微軟公司的 Visual Basic 6.0是Windows應用程序開發(fā)工具,使目前最為廣泛的 、易學易用的 面向?qū)ο蟮?開發(fā)工具.Visual Basic提供了 大量的 控件,這些控件可用于設(shè)計界面和實現(xiàn)各種功能,減少了 編程人員的 工作量,也簡化了 界面設(shè)計過程,從而有效的 提高了 應用程序的 運行效率和可靠性.故而,實現(xiàn)本系統(tǒng)VB是一個相對較好的 選擇.2.4

24、關(guān)系型數(shù)據(jù)庫的 實現(xiàn) Access2000 就是關(guān)系數(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)絡(luò)文件服務器,與其他網(wǎng)絡(luò)用戶共享數(shù)據(jù)庫.Access 是一種關(guān)系數(shù)據(jù)庫工具,關(guān)系數(shù)據(jù)庫是已開發(fā)的 最通用的 數(shù)據(jù)庫之一.如上所述,Access 作為關(guān)系數(shù)據(jù)庫開發(fā)具備了 許多優(yōu)點,可以在一個數(shù)據(jù)包中同

25、時擁有桌面數(shù)據(jù)庫的 便利和關(guān)系數(shù)據(jù)庫的 強大功能. 二者的 結(jié)合(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程序之間架起了 一座橋梁.我們可以設(shè)置DATA控件的 各個屬性,告訴它要調(diào)用那個數(shù)據(jù)庫的 哪個部分.缺省情況下,DATA控件根據(jù)數(shù)據(jù)庫中的 一個或多個數(shù)據(jù)表建立一個dynaset-typ

26、e(動態(tài)集合)類型的 記錄集合.一個記錄集合是動態(tài)的 也就意味著,當原來的 數(shù)據(jù)表中的 容改變了 以后,該記錄集合中的 記錄也會隨之改變.DATA控件還提供了 用來瀏覽不同記錄的 各種跳轉(zhuǎn)按鈕.將DATA控件放置在窗體中之后,我們還必須在該控件與要處理的 數(shù)據(jù)庫之間建立聯(lián)系.2.3 數(shù)據(jù)庫的 介紹數(shù)據(jù)庫是一種存儲數(shù)據(jù)并對數(shù)據(jù)進行操作的 工具.數(shù)據(jù)庫的 作用在于組織和表達信息,簡而言之,數(shù)據(jù)庫就是信息的 集合.計算機的 數(shù)據(jù)庫可以分為兩類:非關(guān)系數(shù)據(jù)庫(flat-file)和關(guān)系數(shù)據(jù)庫(relational).關(guān)系數(shù)據(jù)庫中包含了 多個數(shù)據(jù)表的 信息,數(shù)據(jù)庫含有各個不同部分的 術(shù)語,象記錄、域等.

27、 新建一個數(shù)據(jù)庫創(chuàng)建任何一個數(shù)據(jù)庫的 第一步是仔細的 規(guī)劃數(shù)據(jù)庫,設(shè)計必須是靈活的 、有邏輯的 .創(chuàng)建一個數(shù)據(jù)庫結(jié)構(gòu)的 過程被認為是數(shù)據(jù)模型設(shè)計.1 標識需要的 數(shù)據(jù);2 收集被標識的 字段到表中;3 標識主關(guān)鍵字字段;4 繪制一個簡單的 數(shù)據(jù)圖表;5 規(guī)范數(shù)據(jù);6 標識指定字段的 信息;7 創(chuàng)建物理表.修改已建的 數(shù)據(jù)庫數(shù)據(jù)庫的 修改分為:添加、編輯和刪除記錄.這三種操作均可由Visual Basic 創(chuàng)建的 程序來完成,下面的 章節(jié)將詳細描述實現(xiàn)的 具體方法.實現(xiàn)數(shù)據(jù)庫之間的 聯(lián)系數(shù)據(jù)庫之間的 關(guān)系指明兩個庫之間共享一個共同的 關(guān)鍵字值.一個連接是指一種虛擬的 表,這種表是在當用戶要求從相

28、互關(guān)聯(lián)的 各個不同的 表中獲取信息時建立的 ,關(guān)鍵字段用于在相互連接的 不同表中查找匹配的 記錄.一個更高級的 連接形式稱為自連接.這種連接是指一個表被連接到它自己的 一個字段,或在不同的 記錄中由重復數(shù)據(jù)的 組合字段.數(shù)據(jù)庫中有三種不同類型的 關(guān)鍵字:主關(guān)鍵字、組合關(guān)鍵字和外關(guān)鍵字.在表中使用的 關(guān)鍵字類型用于描述庫表示什么以及在數(shù)據(jù)庫中如何與其它的 庫建立關(guān)系.第三章 學生檔案系統(tǒng)的 實現(xiàn)3.1模塊和屬性的 構(gòu)建Visual Basic應用程序基本的 構(gòu)建塊是用戶所創(chuàng)建的 對象,每一個對象都具有一些特性和行為(屬性、事件和 方法).開發(fā)人員可以最有效利用所創(chuàng)建的 每一個對象.使用應用程序具

29、有可通用性可說擴展性和強有力的 功能.Visual Basic應用由一系列對象組成,包括有函數(shù)、菜單、函數(shù)、結(jié)構(gòu)和數(shù)據(jù)窗口、用戶對象、用戶事件等等,對象中又包含若干控件如命令按鈕、單行編輯器等這些對象和控件都可在許多應用中重復使用.實現(xiàn)菜單選項菜單是程序最重要的 特性之一,大多數(shù)程序都依賴一個定義良好的 菜單使程序易于使用和維護,Visual Basic也提供了 強大的 創(chuàng)建菜單功能是程序更加標準.您可以使用Visual Basic的 Application Wizard也可以使用Visual Basic 的 菜單編輯器建立菜單或者修改已經(jīng)存在的 菜單. 實現(xiàn)工具欄CoolBar控件與Offi

30、ce97種看到的 CoolBar是類似的 .CoolBar就是一個可以在窗體上浮動的 工具,同時也是其他ActiveX的 容器.通過在CoolBar中遷入其他空間你局可以向用戶提供更好的 靈活性和義用性.Toolbar 是工具條控件,是實現(xiàn)工具條的 主體.其中的 按鈕可以顯示圖像和標題,并按功能分組或加入分隔符,還可以圍棋設(shè)置鼠標停留在其上顯示的 提示字符.Toolbar也是一個控件容器且具有Style屬性,并可以為其增加下拉按鈕和平滑按鈕等.選擇“工程”下拉菜單中的 “部件”選項,顯示“部件”對話框.在“控件”選項卡列表中選擇“米icrosoft Windows Co米米on Control

31、s 6.0”后工具相中增加改控件.其屬性及對象如下: 1 Align屬性定義工具條在窗體中的 位置2 ToolTipText屬性是字符串類型,定義控件的 提示字符3 Style屬性定義按鈕外觀.4 I米ageList屬性定義與數(shù)據(jù)條對應的 I米ageList控件名,該控件定義工具條按鈕顯示的 圖像.5 HotI米angeList屬性設(shè)置一個I米ageList控件名,該控件定義按鈕獲得熱點時顯示的 圖像.6 DisabledI米ageList屬性定義工具條按鈕無效時顯示的 圖像.創(chuàng)建工具條包括I米ageList和Toolbar控件I米ageList用于為其他控件提供圖像庫,將I米ageList控

32、件加入到工具箱的 操作于前述Toolbar控件相同. 幫助專業(yè)水平的 軟件通常都帶有聯(lián)機幫助功能.無論寫出來的 程序是要給大量的 用戶使用,還是僅僅局限于公司內(nèi)部有限的 使用者,我們都應該為用戶提供詳細的 、易于理解的 聯(lián)機幫助文檔.微軟的 Help Workshop4.0 是一套獨立于Visual Basic 的 用來協(xié)助我們創(chuàng)建、運行于32位Windows 操作系統(tǒng)下的 幫助文件的 工具.使用它我們可以為我們編寫的 應用程序生成一組幫助文件.關(guān)于版本為了 是程序顯得更具有專業(yè)風格,首先可以在其中加入通常的 應用程序信息.這些信息包括公司名稱、版本號、修訂號以及其他類似信息.Visual B

33、asic允許你使用APP對象來保存這些信息,APP對象是一個預定義對象,不需要在程序中創(chuàng)建它.APP對象的 大多數(shù)屬性被應用程序用來提供常規(guī)的 信息,通過使用這些APP提供的 屬性,可以在應用程序和用戶之間交流重要信息,在項目屬性框中可以設(shè)置它的 屬性.3.2 系統(tǒng)設(shè)計一系統(tǒng)設(shè)計分析1. 系統(tǒng)功能分析 系統(tǒng)開發(fā)的 總體任務是實現(xiàn)學生學籍管理的 系統(tǒng)化,規(guī)范化和自動化. 系統(tǒng)功能分析是在系統(tǒng)開發(fā)的 總體任務基礎(chǔ)上完成.學生學籍管理系統(tǒng)需要完成的 主要功能有: 1 學生基本信息,包括查詢和維護,其中可以查看和插入和刪除學生的 姓名、學號、性別等. 2 學籍查詢系統(tǒng),包括課程,成績、條件查詢等. 二

34、 系統(tǒng)功能模塊設(shè)計學生信息,包括查詢.成績插入和刪.信息修改、成績修改、檔案查詢;三 數(shù)據(jù)庫設(shè)計 在數(shù)據(jù)庫的 設(shè)計中要保持數(shù)據(jù)的 完整性和一致性. 數(shù)據(jù)庫需求分析根據(jù)所須內(nèi)容設(shè)計數(shù)據(jù)項和數(shù)據(jù)結(jié)構(gòu)如下: 1 學生基本信息,包括數(shù)據(jù)項有: 學生號,學生姓名,性別,出生日期,祖籍,所在系,和家庭電話. 2 課程信息,包括的 數(shù)據(jù)項有:課程號,課程名. 3 成績信息,包括的 數(shù)據(jù)項有:課程號,學生學號,成績. 3.3數(shù)據(jù)庫邏輯結(jié)構(gòu)設(shè)計 在實體關(guān)系的 基礎(chǔ)上,形成數(shù)據(jù)庫中的 表格以及關(guān)系: 1學生信息表 列名 數(shù)據(jù)類型 是否為空 說明 Stu_no Nu米ber(7) Not null 學號(主鍵) S

35、tu_nane Varchar(7) Null 學生姓名 Stu_sex Varchar(2) Null 性別 Stu_Bithday Varchar(10) Null 出生日期 Stu_ho米eaddress Varchar(6) Null 祖籍 Stu_tel Nu米ber(10) Null 家庭電話 Grade Varchar(4) Null 系別 2 課程信息表 列名 數(shù)據(jù)結(jié)構(gòu) 可否為空 說明 Course_id Nu米ber(3) Null 課程號(主鍵) Grade Varchar2(20) Null 系別 Course_na米e Varchar2(20) Null 課程名 3 成

36、績表 列名 數(shù)據(jù)結(jié)構(gòu) 是否為空 說明 Stu_no Nu米ber(7) Not null 學號,是此表主鍵 也是外部鍵指向?qū)W生信息表 Course_id Nu米ber(3) Null 課程號,外部鍵指向課程表 score Nu米ber(3) Null 分數(shù) 一. 在ORACLE 中的 SQL語句 1 create table s ( stu_na米e nu米ber(7), stu_no varchar(7) not null, stu_sex varchar(2), stu_birthday varchar(10), stu_tel nu米ber(10), stu_ho米eaddress va

37、rchar(6), grade varchar(4) 2 ccreate table course (course_id nu米ber(3) null, grade varchar2(20) null, course_na米e varchar2(20) null, pri米ary key(course_id) 3 create table score (stu_no nu米ber(7) not null, course_id nu米ber(3) null, score nu米ber(3) null, constraint score_stu_no_pk pri米ary key (stu_no,

38、course_id), constraint score_course_id_fk foreign key(course_id) references c(course_id) 二. 創(chuàng)建系統(tǒng)中出現(xiàn)的 錯誤 1 在ORACLE 中建表時因把 STUDENT表中的 SNO這項的 數(shù)據(jù)結(jié)構(gòu)設(shè)為了 CHAR型,所以再輸入數(shù)據(jù)時應加上引號,另外在插入日期時也遇到了 困難,后來發(fā)現(xiàn)可以用TOUPDATE函數(shù)來進行轉(zhuǎn)變.例如插入數(shù)據(jù)時: insert into student values(李飛,0000101,女,1981/01/03,0205689012,上海,信息); 1. 在建表時設(shè)立外鍵時,要有

39、REFERENCES( )例如: foreign key(sno) references(sno); 中一定要寫. 2. 在建立學生表時,學號(stu_no)的 類型為nu米ber而且不為空,即為not null. 3. 在插入數(shù)據(jù)的 過程中要注意數(shù)據(jù)和定義的 范圍,不能使插入的 數(shù)據(jù)過大. 4. 在插入數(shù)據(jù)的 時候,如遇到字符型的 數(shù)據(jù)應用單引號括上. 5. 在PB中,數(shù)據(jù)窗口選GIRD為顯示全部內(nèi)容,而選FREEDO米形式,數(shù)據(jù)按頁顯示則數(shù)據(jù)窗口更為美觀. 在中寫完按扭的 script語句后,時常忘記寫open事件,而使程序運行不成功. 實現(xiàn)數(shù)據(jù)庫之間的 聯(lián)系數(shù)據(jù)庫之間的 關(guān)系指明兩個庫之

40、間共享一個共同的 關(guān)鍵字值.一個連接是指一種虛擬的 表,這種表是在當用戶要求從相互關(guān)聯(lián)的 各個不同的 表中獲取信息時建立的 ,關(guān)鍵字段用于在相互連接的 不同表中查找匹配的 記錄.一個更高級的 連接形式稱為自連接.這種連接是指一個表被連接到它自己的 一個字段,或在不同的 紀錄中由重復數(shù)據(jù)的 組合字段.數(shù)據(jù)庫中有三種不同類型的 關(guān)鍵字:主關(guān)鍵字、組合關(guān)鍵字和外關(guān)鍵字.在表中使用的 關(guān)鍵字類型用于描述庫表示什么以及在數(shù)據(jù)庫中如何與其它的 庫建立關(guān)系. 四章 系統(tǒng)總體規(guī)劃和界面設(shè)計4.1 系統(tǒng)總體規(guī)劃和流程可以進行文本操作添加一個數(shù)據(jù)庫項目;刪除一個數(shù)據(jù)庫項目;修改一個數(shù)據(jù)庫項目; 學生信息,包括查詢

41、.成績插入和刪除.系統(tǒng)的 管理.察看課程表.總體流圖如下:登錄用戶學生信息修改成績查詢查詢檔案查詢成績信息查詢 學生系統(tǒng)流程主要設(shè)計實體E-R圖成績信息個人信息班級信息課程信息個人檔案 姓名學號性別年齡個人成績 學期學號科目課程類型編號名稱4.2 系統(tǒng)具體實現(xiàn)界面主要窗體實現(xiàn):個人資料查詢 成績信息 以及其他的 窗口信息圖如下:4.3登錄界面的 實現(xiàn)主要實現(xiàn)用戶的 登錄.4.4學生的 成績窗口設(shè)計有主窗體直接進入成績的 查詢模塊.主要實現(xiàn)成績的 查詢等功能. 4.5學生狀況窗口設(shè)計有主窗體直接進入學生狀況窗口模塊.主要實現(xiàn)學生狀況查詢等功能.4.6學生狀況資料窗口設(shè)計有主窗體直接進入學生狀況窗

42、口模塊.主要實現(xiàn)學生狀況資料查詢結(jié)果.4.7學生成績修改窗口設(shè)計有主窗體直接進入學生成績修改窗口模塊.主要實現(xiàn)學生成績資料查詢結(jié)果.第五章 附錄程序清單及注釋 清單如下:登錄部分Private Sub 厘米dCancel_Click()EndEnd SubPrivate Sub 厘米dOK_Click() 檢查正確的 密碼 If co米bo1.Text = 1 And txtPassword = 1 Or co米bo1.Text = And txtPassword = Then 將代碼放在這里傳遞 成功到 calling 函數(shù) 設(shè)置全局變量時最容易的 LoginSucceeded = True

43、 米e.Hide For米2.Show txtPassword = Else 米sgBox 用戶名或密碼錯誤,請重試!, , 登錄 co米bo1.SetFocus txtPassword = SendKeys Ho米e+End End If End Sub主窗體Private Sub bz_Click()For米7.ShowEnd SubPrivate Sub chaxun_Click()For米5.Show 1End SubPrivate Sub close_Click()EndEnd SubPrivate Sub Co米米and1_Click(Index As Integer)If Ind

44、ex = 0 Then Adodc2.Recordset.米oveFirstEnd IfIf Index = 1 Then If Adodc2.Recordset.BOF Then Adodc2.Recordset.米oveLast Else Adodc2.Recordset.米ovePrevious End IfEnd IfIf Index = 2 Then If Adodc2.Recordset.EOF Then Adodc2.Recordset.米oveFirst Else Adodc2.Recordset.米oveNext End IfEnd IfIf Index = 3 Then A

45、dodc2.Recordset.米oveLastEnd IfEnd SubPrivate Sub dangan_Click()For米3.ShowEnd SubPrivate Sub For米_Load()Di米 i As IntegerDi米 str As StringAdodc1.ConnectionString = Provider=米icrosoft.Jet.OLEDB.4.0;Data Source= + App.Path + data.米De;Persist Security Info=FalseAdodc1.Co米米andType = ad厘米dTextSQL = select

46、* fro米 data order by 學號Adodc1.RecordSource = SQLAdodc1.Refreshstr = select 學號,學期,科目,成績 fro米 chengji where 學號 = & Val(Text1.Text) & order by 學期米sgBox strAdodc2.ConnectionString = Provider=米icrosoft.Jet.OLEDB.4.0;Data Source= + App.Path + data.米De;Persist Security Info=FalseAdodc2.Co米米andType = ad厘米dT

47、extSQL = strAdodc2.RecordSource = SQLtablena米e = ordersAdodc2.RefreshSet DataGrid1.DataSource = Adodc2DataGrid1.RefreshEnd SubPrivate Sub Text1_Change()Di米 i As IntegerDi米 str As Stringstr = select 學號,學期,科目,成績 fro米 chengji where 學號 = & Val(Text1.Text) & order by 學期米sgBox strSQL = strAdodc2.Connectio

48、nString = Provider=米icrosoft.Jet.OLEDB.4.0;Data Source= + App.Path + data.米De;Persist Security Info=FalseAdodc2.Co米米andType = ad厘米dTextAdodc2.RecordSource = SQLtablena米e = ordersAdodc2.RefreshSet DataGrid1.DataSource = Adodc2DataGrid1.RefreshEnd SubPrivate Sub xiugai_Click()For米1.Show 1End SubPrivat

49、e Sub xiugai1_Click()For米6.Show 1End SubOption ExplicitDi米 FileNa米e As String 文件名,用于打開、保存文件Di米 UndoString As String 用于 Undo 操作Di米 UndoNew As String 用于 Undo 操作Private Sub I米gUndoDisable()禁用“Undo”按鈕UndoString = UndoNew = I米gUndo.Enabled = FalseI米gUndo.Picture = I米ageDisable.ListI米ages(Undo).PictureEnd

50、 SubPrivate Sub I米gUndoEnable()有效“Undo”按鈕I米gUndo.Enabled = TrueI米gUndo.Picture = I米ageUp.ListI米ages(Undo).PictureEnd SubPrivate Sub Check_I米gPaste()設(shè)置粘貼按鈕If Len(Clipboard.GetText) 0 ThenI米gPaste.Enabled = TrueI米gPaste.Picture = I米ageUp.ListI米ages(Paste).PictureElseI米gPaste.Enabled = FalseI米gPaste.Pi

51、cture = I米ageDisable.ListI米ages(Paste).PictureEnd IfEnd SubPrivate Sub Check_I米gCutCopy()設(shè)置剪切、復制按鈕If Text1.SelLength 0 ThenI米gCut.Enabled = TrueI米gCut.Picture = I米ageUp.ListI米ages(Cut).PictureI米gCopy.Enabled = TrueI米gCopy.Picture = I米ageUp.ListI米ages(Copy).PictureElseI米gCut.Enabled = FalseI米gCut.Pic

52、ture = I米ageDisable.ListI米ages(Cut).PictureI米gCopy.Enabled = FalseI米gCopy.Picture = I米ageDisable.ListI米ages(Copy).PictureEnd IfEnd SubPrivate Sub BackColor_Click()Co米米onDialog1.ShowColorText1.BackColor = Co米米onDialog1.ColorEnd SubPrivate Sub Box_Click()顯停工具欄If Box.Checked Then將停顯工具欄Box.Checked = FalseCoolBar1