【正文】 lexGrid, ByVal sql As String) 39。 39。對(duì) MSHFlexGrid1 控件錄入數(shù)據(jù)信息 Dim i As Integer sql, n, , , adCmdText With MSF .Rows = 10 .Row = 1 Do While Not .Rows = .Rows + 1 For i = 1 To .TextMatrix(.Row, i) = (i 1) Next i 第四章 系統(tǒng)實(shí)現(xiàn) 32 .Row = .Row + 1 Loop .Refresh End With End Sub Private Sub Form_Unload(Cancel As Integer) Unload Me End Sub 普通用戶學(xué)生成績(jī)查詢窗口 普通用戶根據(jù)需要選擇所要查詢的對(duì)象，單擊“確定”按鈕查詢成功。 End If str, n, , , adCmdText If = 0 Then MsgBox 該學(xué)生不存在，請(qǐng)重新輸入查詢條件！ , , 錯(cuò)誤 = Else MSHFlexGrid1, str End If End Sub Private Sub Command2_Click() = False = End Sub Private Sub Command3_Click() Hide 信息管理 .Show End Sub Private Sub Form_Load() 學(xué)號(hào) 性別 = False Set n = New strn = Provider=。 Option Explicit Dim i As Integer, j As Integer 第四章 系統(tǒng)實(shí)現(xiàn) 30 Private n As New Private rs As New Dim strn Dim x1 As String, x2 As String, str As String Private Sub Combo1_Click() = End Sub Private Sub Command1_Click() x1 = Trim() x2 = Trim() If StrComp(x1, 學(xué)號(hào) ) = 0 Then str = select * from 學(xué)生信息表 where 學(xué)號(hào) =39。 kl amp。 amp。 amp。 amp。 amp。 x6 response = MsgBox(str1, vbYesNo, 數(shù)據(jù)校驗(yàn) ) If response = 6 Then inputBase End If = = = = = = End Sub Private Sub Command4_Click() 27 Hide 信息管理 .Show End Sub Private Sub Form_Load() Set n = New strn = Provider=。 x2 amp。 amp。 Else str = select * from 學(xué)生成績(jī)表 where 姓名 =39。 amp。 amp。 amp。 amp。 x6 response = MsgBox(str1, vbYesNo, 數(shù)據(jù)校驗(yàn) ) If response = 6 Then inputBase End If = = = = = = End Sub Private Sub Command4_Click() Hide 信息管理 .Show End Sub Private Sub Form_Load() Set n = New strn = Provider=。 x2 amp。 amp。 Else str = select * from 學(xué)生信息表 where 性別 =39?！肮芾韱T”需輸入密碼登錄“信息管理”窗口；而普通用戶則直接單擊“登錄”按鈕進(jìn)入“普通用戶學(xué)生學(xué)籍窗口”。 （ 3）數(shù)據(jù)流 :數(shù)據(jù)流是數(shù)據(jù)結(jié)構(gòu)在系統(tǒng)內(nèi)傳輸?shù)穆窂健? (5).系統(tǒng)應(yīng)具備數(shù)據(jù)庫(kù)維護(hù)功能，及時(shí)根據(jù)用戶需求進(jìn)行數(shù)據(jù)添加、刪除、修改、統(tǒng)計(jì)等操作。 系統(tǒng)的總體設(shè)計(jì) 系統(tǒng)的總體設(shè)計(jì)是指在系統(tǒng)調(diào)查與分析的基礎(chǔ)上，對(duì)整個(gè)系統(tǒng)在結(jié)構(gòu)上的劃分，硬軟件環(huán)境的配置和確定子系統(tǒng)與模塊的處理流程。系統(tǒng)設(shè)計(jì)包括兩方面的工作：首先是系統(tǒng)總體結(jié)構(gòu)的設(shè)計(jì)，即把系統(tǒng)的功能分解成許多基本的功能模塊 ，取得它們之間的聯(lián)系，規(guī)定它們的功能和處理流程；其次是系統(tǒng)的詳細(xì)設(shè)計(jì)。用戶可根據(jù)，學(xué)號(hào)，姓名，班級(jí)來(lái)查詢自己所需的信息，方便而簡(jiǎn)單。 普通用戶可查詢。它主要包括新系統(tǒng)的業(yè)務(wù)流程、數(shù)據(jù)流程，以及對(duì)數(shù)據(jù)和功能的詳細(xì)分析與描述。 根據(jù)用戶權(quán)限對(duì)數(shù)據(jù)信息進(jìn)行相應(yīng)處理（如查詢、錄入、修改 ）。第三章 學(xué)生學(xué)籍管理信息系統(tǒng)設(shè)計(jì) 6 軟件的開發(fā)應(yīng)能在較長(zhǎng)時(shí)間內(nèi)滿足學(xué)校的發(fā)展需要。此活動(dòng)的主要目標(biāo)是：進(jìn)一步明確系統(tǒng)的目標(biāo)、規(guī)模與功能，對(duì)系統(tǒng)開發(fā)背景、必要性和意義進(jìn)行調(diào)查分析并根據(jù)需要和可能提出開發(fā)系統(tǒng)的初步方案與計(jì)劃。 系統(tǒng)分析階段的主要活動(dòng)有：系統(tǒng)初步調(diào)查、可行性研究、系統(tǒng)詳細(xì)調(diào)查、新系統(tǒng)邏輯方案的提出。將學(xué)生學(xué)籍管理系統(tǒng)分為：學(xué)生信息管理，學(xué)生成績(jī)管理，學(xué)生學(xué)籍檔案管理 和用戶管理四個(gè)功能模塊?？傮w設(shè)計(jì)中主要對(duì)系統(tǒng)的功能結(jié)構(gòu)進(jìn)行劃分，確定了計(jì)算機(jī)的處理流程。也讓我 們 鞏固了一些以前所學(xué)的知識(shí)。配合組長(zhǎng)和組員們一起討論。 隨著科學(xué)技術(shù)的不斷提高 ,計(jì)算機(jī)科學(xué)日漸成熟 ,其強(qiáng)大的功能已為人們深刻認(rèn)識(shí) ,它已進(jìn)入人類社會(huì)的各個(gè)領(lǐng)域并發(fā)揮著越來(lái)越重要的作用。與此同時(shí)，學(xué)校是培養(yǎng)國(guó)家棟梁之材的場(chǎng)所，無(wú)論是在教育，還是在管理上都應(yīng)走在最前列，而其中管理又是學(xué)校運(yùn)轉(zhuǎn)良好的關(guān)鍵。 1 第一章 緒論 管理信息系統(tǒng)的概要 隨著學(xué)校規(guī)模的不斷擴(kuò)大，學(xué)生數(shù)量的急劇增加，有關(guān)學(xué)生的各種信息資料也成倍增長(zhǎng)。這就造成工作效率低、誤差大，也造成了人力、物力、財(cái)力資源的浪費(fèi)。但一直以來(lái)人們使用傳統(tǒng)人工的方式管理文件檔案，這種管理方式存在著許多缺點(diǎn) ,如 :效率低、保密性差 ,另外時(shí)間一長(zhǎng) ,將產(chǎn)生大量的文件和數(shù)據(jù) ,這對(duì)于查找 、更新和維護(hù)都帶來(lái)了不少的困難。 所做的工作 第二章系統(tǒng)需求分析階段，重要是找資料分析學(xué)籍管理需要做到那些功能。這次的設(shè)計(jì)我 們 學(xué)到了很多，比如說(shuō)怎樣排版，做一個(gè)設(shè)計(jì)的思路，應(yīng)該從什么地方著手。系統(tǒng)的總體設(shè)計(jì)，系統(tǒng)詳細(xì)設(shè)計(jì)。 第三章 學(xué)生學(xué)籍管理信息系統(tǒng)設(shè)計(jì) 4 第二章 學(xué)生學(xué)籍管理信息系統(tǒng)分析 系統(tǒng)的需求分析 本系統(tǒng)為了實(shí)現(xiàn)學(xué)校在校學(xué)生、離校學(xué)生各項(xiàng)信息資源的查詢、統(tǒng)計(jì)、添加、刪除、維護(hù)與管理，方便用戶的管理與需求。因此，這個(gè)階段又稱邏輯設(shè) 計(jì)階段。 系統(tǒng)的可行性研究 可行性研究是系統(tǒng)分析階段的第二項(xiàng)活動(dòng)。 (2).面對(duì)于系統(tǒng)設(shè)計(jì)還應(yīng)該以 “ 標(biāo)準(zhǔn)性、安全性、高效性、保密性、可維護(hù)性 ” 為標(biāo)準(zhǔn)，在著眼于當(dāng)前實(shí)用的基礎(chǔ)上，為將來(lái)系統(tǒng)的擴(kuò)展，升級(jí)留有余地。對(duì) 新生注冊(cè)，并建立相關(guān)的學(xué)生 個(gè)人 信息 （如學(xué)號(hào)、姓名、性別、專業(yè)和班級(jí)、家庭 住址等）， 由 本班班主任配合 學(xué)校 學(xué)生 管理處負(fù)責(zé)人 （學(xué)生科）統(tǒng)一審核 并保存 。 新系統(tǒng)邏輯方案 新系統(tǒng)的邏輯模型，從本質(zhì)上說(shuō)，是規(guī)定系統(tǒng)應(yīng)該做什么，即系統(tǒng)的邏輯描述。 (3).根據(jù)學(xué)生學(xué)號(hào)對(duì)應(yīng)查找，該生在校的情況（如健康狀況、活動(dòng)情況、獎(jiǎng)懲情況等）和該生報(bào)名時(shí)登記的本人基本情況， 由學(xué) 生 管理處人員審閱 并維護(hù) ，最后保存。 圖 24學(xué)生信息管理數(shù)據(jù)流圖 S01 檔案單 成績(jī)單 P03 P02 P01 D3 D2 D1 信息單 學(xué)生學(xué)籍信息管理員 學(xué)生信息錄入 成績(jī)信息錄入 檔案信息錄入 信息數(shù)據(jù)表 成績(jī)數(shù)據(jù)表 檔案數(shù)據(jù)表 數(shù)據(jù)庫(kù) F05 F04 F03 F02 F01 按班級(jí) 按學(xué)號(hào) 按姓名 P01 D1 S01 信息錄入 學(xué)生信息管理員 學(xué)生信息查詢 信息數(shù)據(jù)表 F06 9 ，建立信息數(shù)據(jù)表。在這一階段中我們將根據(jù)系統(tǒng)調(diào)查與分析階段的結(jié)果，進(jìn)行新系統(tǒng)的設(shè)計(jì)工作。 (2).數(shù)據(jù)庫(kù)的邏輯設(shè)計(jì)。 (4).系統(tǒng)采用模塊化程序設(shè)計(jì)方法，即便于系統(tǒng)功能的各種組合和修改、又便于未參與開發(fā)的設(shè)計(jì)維護(hù)人員補(bǔ)充、維護(hù)。一個(gè)數(shù)據(jù)結(jié)構(gòu)可以由若干個(gè)數(shù)據(jù)結(jié)構(gòu)組成，或由若干數(shù)據(jù)項(xiàng)和數(shù)據(jù)結(jié)構(gòu)混合組成。顯示登錄界面 End Sub 登錄窗口 此登錄界面分為“管理 員”和“普通用戶”登錄。 39。 amp。 姓名： amp。 聯(lián)系電話： amp。退出前恢復(fù)主工資文件的數(shù)據(jù) str = delete from 學(xué)生信息表 str 學(xué)生信息表 backup, n, , , adCmdTable While Not 學(xué)號(hào) = Trim(rs!學(xué)號(hào) ) 姓名 = Trim(rs!姓名 ) 性別 = Trim(rs!性別 ) 出生年月 = rs!出生年月 家庭住址 = rs!家庭住址 聯(lián)系電話 = rs!聯(lián)系電話 str = insert into 學(xué)生信息表 values(39。,39。,39。) 23 str Wend End Sub Private Sub inputBase() str = select * from 學(xué)生信息表 where 學(xué)號(hào) =39。 39。 amp。 姓名： amp。 辦公軟件： amp。退出前恢復(fù)主工資文件的數(shù)據(jù) str = delete from 學(xué)生成績(jī)表 str 學(xué)生成績(jī)表 backup, n, , , adCmdTable While Not 班級(jí) = Trim(rs!班級(jí) ) 姓名 = Trim(rs!姓名 ) 計(jì)算機(jī) = rs(rs!計(jì)算機(jī) ) 英語(yǔ) = rs!英語(yǔ) 管理 = rs!管理 辦公軟件 = rs!辦公軟件話 str = insert into 學(xué)生成績(jī)表 values(39。,39。,39。) str Wend End Sub Private Sub inputBase() str = select * from 學(xué)生成績(jī)表 where 班級(jí) =39。 amp。 Private Sub Command1_Click() Hide 登錄界面 .Show End Sub Private Sub 學(xué)生成績(jī)查詢 _Click() Hide 查詢學(xué)生成績(jī) End Sub Private Sub 學(xué)生檔案查詢 _Click() Hide 查詢學(xué)生檔案 End Sub Private Sub 學(xué)生信息查詢 _Click() Hide 查詢學(xué)生信息 End Sub 普通用戶學(xué)生信息查詢窗口 普通用戶根據(jù)需要選擇所要查詢的對(duì)象，單擊“確定”按鈕查詢成功。 39。初始化 MSHFlexGrid1