【正文】 戶名和密碼后單擊“確認”即可向系統(tǒng)中添加一個新用戶。 amp。 End If End If End If 25 If Check1(2).Value Then If Trim() = Then sMeg = 班號不能為空 MsgBox sMeg, vbOKOnly + vbExclamation, 警告 Exit Sub Else dd(2) = True If dd(0) Or dd(1) Then txtSQL = txtSQL amp。 amp。具體的代碼如下所示。具體的代碼如下所示。 Set mrc = ExecuteSQL(txtSQL, MsgText) If = True Then MsgBox 沒有這個用戶，請重新輸入用戶名 !, vbOKOnly + vbExclamation, 警告 Else If Trim((1)) = Trim() Then OK = True UserName = Trim() Else MsgBox 輸入密碼不正確，請重新輸入！ , vbOKOnly + vbExclamation, 警告 = End If End If End If miCount = miCount + 1 13 If miCount = 3 Then End If Exit Sub End Sub 用戶管理模塊 本模塊是本系統(tǒng)的安全性設置模塊， 由管理員根據(jù)學校不同部門以及不同使用人員對本系統(tǒng)的要求和需要為其分配 權(quán)限 ，并且添加新用戶。 11 系統(tǒng)登陸界面 本界面的主要功能是為了對系統(tǒng)進行安全性管理，本系統(tǒng)的用戶名和密碼保存在 Use 表中，本系統(tǒng)根據(jù)不同的 用戶而設置了不同的權(quán)限 。 圖 43 系統(tǒng)主界面圖 系統(tǒng)管理模塊 界面設計 該模塊的主要任務是維護系統(tǒng)的正常運行和安全性設置 ,包括添加用戶、修改密碼、 退出系統(tǒng)三個模塊。 系統(tǒng) 結(jié)構(gòu)設計 本系統(tǒng)在執(zhí)行時，先根據(jù)不同的操作人員的需要來進行相應的模塊，然后可以輸入數(shù)據(jù)或者進行其它的查詢或瀏覽等操作；總體來說，本系統(tǒng)屬于一個事務型管理系統(tǒng)。課程與學生這兩個實體是多對多聯(lián)系；一位學生要學習多門課程，一門課程有多位學生共同學習。在 Visual Basic 環(huán)境下，利用事件驅(qū)動的編程機制、新穎易用的可視化設計工具，使用Windows 內(nèi)部的應用程序接口 (API)函數(shù)，以及動態(tài)鏈接庫 (DLL)、動態(tài)數(shù)據(jù)交換(DDE)、對象的鏈接與嵌入 (OLE)、開放式數(shù)據(jù)訪問 (ODBC)等技術(shù)，可以高效、快速地開發(fā)出 Windows 環(huán) 境下功能強大、圖形界面豐富的應用軟件系統(tǒng)。在技術(shù)難度方面，由于有指導老師的指導、 相關(guān)參考文獻 和 網(wǎng)上資料，特別是參考其它程序的功能，因此完全可以實現(xiàn)。 系統(tǒng) 需求 及可行性 分析 系統(tǒng)需求 通過調(diào)查和分析 ,要求該系統(tǒng)需要有以下幾個功能 : （ 1） 由于操作人員的計算機知識各不相同 ,要求必須有良好的人機界面以便于不同的用戶來操作。 （ 2）學籍管理模塊的功能是實現(xiàn)對學生的學籍信息 的 管理，包括添加學籍信息、修改學籍信息和查詢學籍信息三個模塊，這三個功能模塊 能夠各自 獨立完成學生學籍信息的 相應 管理。 致 謝 .............................................................................................. 錯誤 !未定義書簽。而對于后者則要求應用程序功能完備 ,易使用等特點。文章主要介紹了學生管理信息系統(tǒng)的四個個部分：系統(tǒng)概述部分包括系 統(tǒng)需求和設計背景等；系統(tǒng)分析部分分析了實體聯(lián)系圖和功能層次圖；系統(tǒng)設計部分主要介紹了系統(tǒng)結(jié)構(gòu)設計和數(shù)據(jù)庫設計等；代碼分析與實現(xiàn)部分主要介紹一些重要的窗口及一些比較重要的代碼。為此 在這里 將在 Windows XP操作系統(tǒng)環(huán)境下 利用 Visual Basic 簡體中文版與 Access 數(shù)據(jù)庫 相 結(jié)合開發(fā)一個簡單的學生管理信息系統(tǒng)。該模塊包括添加課程信息、修改課程信息和設置班級課程三個模塊。 （ 4） 方便的數(shù)據(jù)查詢，并且支持多條件查詢。 而且， 目前已有很多成 3 功的學生管理信息系統(tǒng)的先例，因此，該系統(tǒng)具有可行性。使用 Access 的好處還在于： 如果系統(tǒng)擴展到 Client/Server 模式的時候也 可以使用Microsoft 的數(shù)據(jù)庫服務器軟件 SQL Server，此時，程序只需要簡單的修改一下鏈接（ ADO 的數(shù)據(jù)源）就可以，這樣 為程序的平滑擴展提 供了非常有力的條件。這個 ER 圖可畫成 圖 31。 涉及的數(shù)據(jù) 庫 表 本系統(tǒng)中所涉及到的主要實體共有九個數(shù)據(jù) 庫 表： Allkecheng 表： {課程名稱，教材 } Cj表： {學號，學期，類型，課程名稱，分數(shù) } Class 表： {年級，班級，教室，年制，專業(yè)，班主任，備注 } Classkecheng 表： {年級，專業(yè)，年制，學期，課程名稱 } Kaoshileixing 表： {類型 } Use 表： {username,password,admin,readonly,qx1,qx2,qx3,qx4} Xj 表： {學號，姓名，性別，班級，出生年月，家庭住址，郵政編碼，聯(lián)系電話，入學時 間，備注 } 表的物理結(jié)構(gòu) 各表的物理結(jié)構(gòu)如表所示 ： 接受數(shù)據(jù) 處理中心 系統(tǒng)管理 理 理理 學籍管理 班級管理 課程管理 成績管理 打印報表 7 Cj表 如表 41所示 ： 表 41 成績表 字段名稱 類型 寬度 小數(shù)位 學號 文本 10 學期 文本 50 類型 文本 16 課程名稱 文本 20 分數(shù) 單精度型數(shù)字 自動 Class 表 如表 42所示： 表 42 班級 表 字段名稱 類型 寬度 小數(shù)位 年級 文本 16 班級 文本 20 教室 文本 5 年制 文本 8 專業(yè) 文本 16 班主任 文本 8 備注 備注 Classkecheng表 如表 43所示 ： 表 43 班級課程表 字段名稱 類型 寬度 小數(shù)位 年級 文本 16 專業(yè) 文本 12 年制 文本 8 學期 文本 50 課程名稱 文本 20 8 Use 表 如表 44 所示 ： 表 44 用戶表 字段名稱 類型 寬度 小數(shù)位 username 文本 20 password 文本 20 Admin 文本 2 Readonly 文本 2 Qx1 文本 2 Qx2 文本 2 Qx3 文本 2 Qx4 文本 2 Xj表 如表 45所示 ： 表 45 學籍表 字段名稱 類型 寬度 小數(shù)位 學號 文本 9 姓名 文本 8 性別 文本 2 班級 文本 10 出生年月 日期 /時間 家庭住址 文本 30 郵政編碼 數(shù)字（長整型） 聯(lián)系電話 數(shù)字（長整型） 入學時間 日期 /時間 備注 備注 系統(tǒng)的 界面設計 系統(tǒng)登錄界面及主界面設計 進行完一些必要的分析后就要考慮界面的設計了。 班級 管理模塊 界面設計 該模塊的主要功能是實現(xiàn)對 全校班級信息的管理 ，包括 添加班級信息和修改班級信息兩個模塊 ，從而方便學校管理部門對學校的 班級 情況 進行管理。ToDo: create test for correct password 12 39。 amp。 16 Trim() amp。 amp。 Else txtSQL = txtSQL amp。 amp。 order by student_ID Set mrc = ExecuteSQL(txtSQL, MsgText) With myflexgrid .Rows = 2 .CellAlignment = 4 .TextMatrix(1, 0) = 學號 .TextMatrix(1, 1) = 姓名 .TextMatrix(1, 2) = 性別 .TextMatrix(1, 3) = 出生日期 26 .TextMatrix(1, 4) = 班號 .TextMatrix(1, 5) = 聯(lián)系電話 .TextMatrix(1, 6) = 入校日期 .TextMatrix(1, 7) = 家庭住址 Do While Not .Rows = .Rows + 1 .CellAlignment = 4 .TextMatrix(.Rows 1, 0) = (0) .TextMatrix(.Rows