【文章內(nèi)容簡(jiǎn)介】 豐富的數(shù)據(jù)庫(kù)開發(fā)組件，使數(shù)據(jù)庫(kù)應(yīng)用開發(fā)功能更強(qiáng)大，控制更靈活，編譯后的程序運(yùn)行速度更快， VB 是微軟公司出品的一個(gè)快速可視化程序開發(fā)工具軟件，借助微軟在操作系統(tǒng)和辦公軟件的壟斷地位， VB在短短的幾年內(nèi)風(fēng)靡全球。 VB 是極有和功能強(qiáng)大的軟件，主要表現(xiàn)在：所見即所得的界面設(shè)計(jì)，基于對(duì)象的設(shè)計(jì)方法，極短的軟件開發(fā)周期，較易維護(hù)的生成代碼。 美國(guó)微軟公司在 1991年推出 6個(gè)版本， win9x或 winme， win2021，winxp， windowsNT 等操作系統(tǒng)下，是一個(gè) 32 位的應(yīng)用程序開發(fā)工具。 故而，實(shí)現(xiàn)本系統(tǒng) VB 是一個(gè)相對(duì)好的選擇 。 數(shù)據(jù)庫(kù)： MicrosoftAccess2021 Access 是微軟公司推出的基于 Windows 的桌面關(guān)系數(shù)據(jù)庫(kù)管理系統(tǒng)（ RDBMS，即 Relational Database Management System），是 Office 系列應(yīng)用軟件之一。它提供了表、查詢、窗體、報(bào)表、頁(yè)、宏、模塊 7 種用來建立數(shù)據(jù)庫(kù)系統(tǒng)的對(duì)象；提供了多種向?qū)?、生成器、模板，把?shù)據(jù)存儲(chǔ)、數(shù)據(jù)查詢、界面設(shè)計(jì)、報(bào)表生成等操作規(guī)范化；為建立功能完善的數(shù)據(jù)庫(kù)管理系統(tǒng)提供了方便，也使得普通用戶不必編寫代碼，就可以完成大部分?jǐn)?shù)據(jù)管理的任務(wù)。 Access 能夠存取 Access/Jet、 Microsoft SQL Server、 Oracle(甲骨文軟件公司 )，或者任何 ODBC 兼容數(shù)據(jù)庫(kù)內(nèi)的資料。熟練的軟件設(shè)計(jì)師和資料分析師利用它來開發(fā)應(yīng)用軟件，而一些不熟練的程序員和非程序員的 進(jìn)階用戶 則能使用它來開發(fā)簡(jiǎn)單的應(yīng)用軟件。 Access2021是 Microsoft Office2021 套件產(chǎn)品之一，是世界上最流行的桌面數(shù)據(jù)庫(kù)系統(tǒng)之一。相比其他數(shù)據(jù)庫(kù)開發(fā)系統(tǒng)， Access的顯著優(yōu)點(diǎn)在于：不用編寫一行代碼， 就可以在很短的時(shí)間里開發(fā)出一個(gè)功能強(qiáng)大的數(shù)據(jù)庫(kù)應(yīng)用程序，并且這一過程是完全可視化的。該軟件界面友好，操作簡(jiǎn)單，功能強(qiáng)大，受到越來越多用戶的喜愛。 操作系統(tǒng)： WINDOWS XP WINDOWS VISTA 運(yùn)行環(huán)境： 數(shù)據(jù)庫(kù)支持 ： MicrosoftAccess2021 操作系統(tǒng)： WINDOWS系列 7 硬件要求：內(nèi)存最低為 256MB，硬盤空間至少 20G 本系統(tǒng) 即 班級(jí)管理信息系統(tǒng) 采用上述技術(shù)十分合理、可行， VB 簡(jiǎn)單易學(xué)、功能強(qiáng)大、編譯速度快 ，Access2021能 建立功能完善的數(shù)據(jù)庫(kù)管理系統(tǒng) ， 使得普通用戶不必編寫代碼，就可以完成大部分?jǐn)?shù)據(jù)管理的任務(wù) ，十分方便。 因此 vb+Access 是很好的搭檔，示我開發(fā)的班級(jí)管理信息系統(tǒng)界面友好、操作簡(jiǎn)單、功能強(qiáng)大。 3 數(shù)據(jù)庫(kù)設(shè)計(jì) 班級(jí)管理信息系統(tǒng) ER 圖 ● 用戶屬性 ER圖 包括 username、 password、 admin、 readonly、 qx qx qx qx4。 圖 用戶屬性 ER圖 ● 學(xué) 生檔案 ER圖 包括學(xué)生 學(xué)號(hào)、 姓名 、 性別 、 班級(jí)、入學(xué)時(shí)間 、 出生年月、聯(lián)系電話、郵編、家庭住址 等信息，是 1：N的關(guān)系。 學(xué)生 班級(jí) 姓名雷轉(zhuǎn) 性別 出生年月 家庭住址 聯(lián)系電話 學(xué)號(hào) 郵編 入學(xué)時(shí)間 用戶 username admin qx4 password readonly qx1 qx2 qx3 8 圖 學(xué) 生檔案 ER圖 ● 成績(jī)信息 ER圖 包括 學(xué)號(hào) 、 學(xué)期 、 類型（期中，期末） 、 課程名稱、分?jǐn)?shù)等信息， 是 1： N的關(guān)系 圖 成績(jī)信息 ER圖 ● 課程信息 ER圖 包括年級(jí) 、 專業(yè) 、 年制 、 學(xué)期 、 課程名稱 等信息， 是 1： N的關(guān)系 圖 課程信息 ER圖 ● 班級(jí)信息 ER圖 包括年級(jí) 、 班級(jí) 、 教室 、 年制 、 班主任 、 專業(yè) 、 備注等信息，是 1： N的關(guān)系 成績(jī) 學(xué)號(hào) 學(xué)期 類型 分?jǐn)?shù) 課程名稱 課程 年級(jí) 年制 專業(yè) 學(xué)期 課程名稱 9 圖 班級(jí)信息 ER圖 ● 學(xué)生繳費(fèi)信息 ER圖 包括 學(xué)號(hào)、姓名、班級(jí)、學(xué)期、本次繳費(fèi)（元）、本次欠費(fèi)（元）、累計(jì)欠費(fèi)（元）等信息，是 1： N的關(guān)系 圖 學(xué)生繳費(fèi)信息 ER圖 ● 系統(tǒng)總 ER圖 一個(gè)管理員可以管理所有信息，具體的是管理員可以管理課程，學(xué)生，學(xué)生成績(jī)， 學(xué) 生繳 費(fèi)，班級(jí)等，這些都是 1： N的關(guān)系。 實(shí)體間關(guān)系如圖所示 ： 班級(jí) 年級(jí) 備注 班級(jí) 專業(yè) 教室 班主任 年制 學(xué)生繳費(fèi) 學(xué)號(hào) 累計(jì)欠費(fèi) 姓名 本次欠費(fèi) 班級(jí) 本次繳費(fèi) 學(xué)期 10 圖 總 ER圖 數(shù)據(jù)庫(kù)邏輯結(jié)構(gòu)設(shè)計(jì) 班級(jí)信息管理系統(tǒng) 主要 使用了 以下幾 張數(shù)據(jù)表，分別為 用戶屬性表、 學(xué)生 檔案 表、 學(xué)生成績(jī)表 、 班級(jí)信息 表 、課程信息表、學(xué)生繳費(fèi)信息表， 如 下表 ： ● 用戶屬性表主要是設(shè)定用戶管理的相關(guān)信息 。 表 用戶屬性表 屬性名 類型 長(zhǎng)度 備注 username 文本 20 用戶名 password 文本 20 口令 admin 文本 2 管理員 readonly 文本 2 只讀 qx1 文本 2 權(quán)限 1 qx2 文本 2 權(quán)限 2 qx3 文本 2 權(quán)限 3 qx4 文本 2 權(quán)限 4 ● 學(xué)生檔案表 主要是存儲(chǔ)學(xué)生檔案的相關(guān)信息，以學(xué)號(hào)為主鍵。 管理 管理 管理 管理 N N N 1 1 1 1 管理 N N 1 課程 學(xué)生 學(xué)生繳費(fèi) 成績(jī) 用戶 班級(jí) 11 表 學(xué)生 檔案 表 屬性名 類型 長(zhǎng)度 備注 學(xué)號(hào) 文本 5 學(xué)生學(xué)號(hào) 姓名 文本 20 學(xué)生姓名 性別 文本 2 性別 班級(jí) 文本 10 所在班級(jí) 出生年月 日期 /時(shí)間 出生年月 家庭住址 文本 30 家庭住址 郵政編碼 數(shù)字 長(zhǎng)整型 郵編 聯(lián)系電話 數(shù)字 長(zhǎng)整型 聯(lián)系電話 入學(xué)時(shí)間 日期 /時(shí)間 學(xué)生 入學(xué)時(shí)間 備注 備注 備注 ● 學(xué)生 成績(jī) 表 主要是存儲(chǔ)學(xué)生成績(jī)的相關(guān)信息，以學(xué)號(hào)為主鍵。 表 學(xué)生成績(jī)表 屬性名 類型 長(zhǎng)度 備注 學(xué)號(hào) 文本 10 學(xué)生學(xué)號(hào) 學(xué)期 文本 50 第幾學(xué)期 類型 文本 16 課程性質(zhì) 課程名稱 文本 20 課程名稱 分?jǐn)?shù) 數(shù)字 單精度型 考試成績(jī) ● 班級(jí)信息 表 主要是存儲(chǔ)班級(jí)的相關(guān)信息，以班級(jí)為主鍵。 表 班級(jí)信息表 屬性名 類型 長(zhǎng)度 備注 年級(jí) 文本 16 所在年級(jí) 班級(jí) 文本 20 所在班級(jí) 教室 文本 16 所在教室 年制 文本 20 幾年制 專業(yè) 文本 16 所學(xué)專業(yè) 班主任 文本 8 班主任 備注 備注 備注說明 ● 課程信息 表 主要是存儲(chǔ)課程的相關(guān)信息。 12 表 課程信息表 屬性名 類型 長(zhǎng)度 備注 年級(jí) 文本 16 所在年級(jí) 專業(yè) 文本 12 所學(xué)專業(yè) 年制 文本 8 幾年制 學(xué)期 文本 50 第幾學(xué)期 課程名稱 文本 20 所學(xué)課程 ● 學(xué)生繳費(fèi)信息 表 主要是存儲(chǔ)學(xué)生繳費(fèi)的相關(guān)信息，以學(xué)號(hào) 作為主鍵。 表 學(xué)生繳費(fèi)信息表 屬性名 類型 長(zhǎng)度 備注 學(xué)號(hào) 文本 16 學(xué)生學(xué)號(hào) 學(xué)期 文本 12 第幾學(xué)期 交費(fèi) 文本 8 所交學(xué)費(fèi) 欠費(fèi) 貨幣 50 所欠學(xué)費(fèi) 日期 日期 /時(shí)間 交費(fèi)日期 操作員 文本 20 操作員 數(shù)據(jù)庫(kù)的 開發(fā)過程 打開 Microsoft Access2021，在出現(xiàn)的對(duì)話框里選擇“空 Access數(shù)據(jù)庫(kù)”，數(shù)據(jù)庫(kù)命名為“班級(jí)管理信息系統(tǒng)”，保存在程序目錄下面，在出現(xiàn)的對(duì)話框中雙擊“使用設(shè)計(jì)器創(chuàng)建表”，如下圖所示： 13 圖 使用設(shè)計(jì)器創(chuàng)建表 下 圖為“學(xué)生 檔案 表”，在表設(shè)計(jì)對(duì)話框中的字段名稱一欄內(nèi)，分別填上“學(xué)號(hào)” ，“姓名”，“性別”，“ 班級(jí) ” ， “ 出生年月 ” ，“家庭住址”，“郵政編碼”，“聯(lián)系電話”，“入學(xué)時(shí)間”，“備注” 等內(nèi)容 。 圖 學(xué)生 檔案表 同理可以建立 學(xué)生成績(jī)表 、 班級(jí)信息 表 、課程信息表、學(xué)生繳費(fèi)信息表 等 。 數(shù)據(jù)庫(kù)與 VB 的連接 VB的連接 ： Visual Basic 提供了與底層數(shù)據(jù)庫(kù)系統(tǒng)緊密的連接。 它 支持不同的關(guān)系數(shù)據(jù)庫(kù)管理系統(tǒng)并充分發(fā)揮每一個(gè)數(shù)據(jù)庫(kù)的特長(zhǎng) ， 生成獨(dú)立應(yīng)用或脫離服務(wù)器運(yùn)行 的 應(yīng)用 程序。 Visual Basic連接數(shù)據(jù)庫(kù)的方式有兩種： 14 方式一， 通過使用 Visual Basic 的 DATA控件 ；方式二， 通過使用由 Visual Basic 提供的專用的直接與數(shù)據(jù)庫(kù)相連的接口 。 數(shù)據(jù)庫(kù)引擎 ：它 提供了與數(shù)據(jù)庫(kù)打交道的途徑， 可以 通過它以及 Visual Basic 來訪問數(shù)據(jù)庫(kù)并對(duì)其進(jìn)行各種操作。 Visual Basic、 Access以及其他的軟件產(chǎn)品 很多都是 通過共用 JET數(shù)據(jù)庫(kù)引擎 的 ，這 給用戶提供了豐富的數(shù)據(jù)類型。 控件 的橋梁作用： DATA在數(shù)據(jù)庫(kù)中的信息與將信息顯示給用戶看的 Visual Basic程序之間架起了一座橋梁。 可以設(shè)置 DATA控件的各個(gè)屬性，告訴它要調(diào)用 哪 個(gè)數(shù)據(jù)庫(kù)的哪個(gè)部分。缺省情況下， DATA控件根據(jù)數(shù)據(jù)庫(kù)中的一個(gè)或多個(gè)數(shù)據(jù)表建立一個(gè) dynasettype（動(dòng)態(tài)集合）類型的記錄集合。一個(gè)記錄集合是動(dòng)態(tài)的也就意味著，當(dāng)原來的數(shù)據(jù)表中的 內(nèi) 容改變了以后，該記錄集合中的記錄也會(huì)隨之改變。 DATA 控件還提供了用來瀏覽不同記錄的各種跳轉(zhuǎn)按鈕。將 DATA控件放置在窗體中之后，我們還必須在該控件與要處理的數(shù)據(jù)庫(kù)之間建立聯(lián)系 。 本系統(tǒng) 使用 Visual Basic 的 DATA 控件 連接數(shù)據(jù)庫(kù)，主要是 DATA 控件使用簡(jiǎn)單，操作方便，其它方法雖然也很好，但是操作起來比較復(fù)雜，沒有使用 DATA控件操作方便，所以選擇這種方法。 4 模塊設(shè)計(jì) 前臺(tái)主要功能模塊詳細(xì)設(shè)計(jì) 主 模塊 主模塊是用來導(dǎo)航到系統(tǒng)的各個(gè)功能模塊的。 主 模塊在班級(jí)管理信息系統(tǒng)中占有非常中要的地位，運(yùn)行班級(jí)管理信息系統(tǒng)的程序，進(jìn)入登陸界面，輸入正確的用戶名和密碼就會(huì)出現(xiàn)如下圖 模塊所示的內(nèi)容，包括系統(tǒng)管理、班級(jí)管理、學(xué)生檔案管理、學(xué)生繳費(fèi)管理、課程管理、成績(jī)管理等內(nèi)容。 進(jìn)入 主 模塊之后才可以實(shí)現(xiàn)其他模塊的功能。 圖 主 模塊 15 實(shí)現(xiàn)該模塊功能的主要代碼： Private Declare Function SetWindowPos Lib user32 (ByVal hwnd As Long, ByVal hWndInsertAfter As Long, ByVal X As Long, ByVal Y As Long, ByVal cx As Long, ByVal cy As Long, ByVal wFlags As Long) As Long Dim find1 As Integer Dim liulan1 As Integer Private Sub add_Click() qxstr = Executeqx(2) If qxstr = false Or qxstr = readonly Then ss = MsgBox(對(duì)不起，你沒有管理本功能的權(quán)限，請(qǐng)與管理員聯(lián)系！ , vbInformation + vbOKOnly, 警告 ) Exit Sub 班級(jí)瀏覽，查詢模塊 班級(jí)瀏覽，查詢 模塊 在班級(jí)管理信息系統(tǒng)中占有非常重要的作用，一個(gè)學(xué)校是由很多個(gè)班級(jí)組成的，一個(gè)管理 員也要管好幾個(gè)班級(jí)，所以有了班級(jí)瀏覽，查詢模塊，無論是學(xué)生自己，還是管理員本身，亦或是學(xué)校領(lǐng)導(dǎo)視察班級(jí)，都能帶來很多的方便。只要單擊班級(jí)管理模塊中的班級(jí)瀏覽、查詢模塊，就會(huì)出現(xiàn)下圖的班級(jí)瀏覽、查詢模塊。班級(jí)瀏覽、查詢模塊 主要 應(yīng)用于 瀏覽，查詢各個(gè)班級(jí)的信息。如圖 ，每個(gè)年級(jí)里分不同的專業(yè)，每個(gè)專業(yè)包括很多的信息，如學(xué)生所在的年級(jí)，班級(jí)，教室，年制，專業(yè)，班主任以及備注等等信息。 班級(jí)查詢模塊在查詢時(shí)是按條件查詢， 可按年級(jí)、班級(jí)、專業(yè)這些條件查詢， 可以選擇其中任意一項(xiàng)查詢，也可全部選擇查詢， 如圖 ，在年級(jí)、班級(jí)、專業(yè)這幾個(gè)選項(xiàng)里分別填上相應(yīng)的信息，然后點(diǎn)“確定”按鈕，就會(huì)出現(xiàn)相應(yīng)的查詢結(jié)果 ，如班級(jí)查詢結(jié)果圖 。 圖 班級(jí)瀏覽圖 實(shí)現(xiàn)班級(jí)瀏覽功能的主要代碼 ： Public printstr As Stri