【正文】 信息。如果為空，彈出對話框 Else 39。 39。 amp。Data Source=E:\zlf\。顯示相應字段的內容 = (2).Value = (3).Value = (4).Value = (5).Value = (6).Value = (7).Value = (8).Value = (9).Value = (10).Value = (11).Value = (12).Value MsgBox (查詢成功) End If End SubPrivate Sub Command2_Click()Unload MeEnd Sub圖411注冊查詢窗口(1) 注冊查詢界面說明管理員根據(jù)需要選擇所要查詢的對象，單擊“查詢”得到該對象的注冊信息。如果為空，彈出對話框 Else 39。 39。 amp。Data Source=E:\zlf\。 a, db, adOpenStatic, adLockOptimisticMsgBox ( 修改成功)End SubPrivate Sub Command2_Click()Unload MeEnd Sub圖410檔案查詢窗口(1) 檔案查詢界面說明管理員根據(jù)需要選擇所要查詢的對象，單擊“查詢”按鈕即可查詢成功。 z amp。 where 姓名= 39。 amp。,備注= 39。 amp。,辦公軟件= 39。 amp。,信息法律規(guī)程= 39。 amp。,管理信息系統(tǒng)=39。 amp。,計算機應用與提高= 39。 amp。,計算機組成原理= 39。 amp。,計算機網(wǎng)絡=39。 amp。,姓名= 39。 amp。,學號= 39。 amp。,班級= 39。 amp。Persist Security Info=Falsesql = select * from 學生成績表1 sql, db, adOpenStatic, adLockOptimistica = update 學生成績表1 set 專業(yè)= 39。(2) 修改學生成績界面代碼Private Sub Command1_Click()Dim db As New Dim rs As New Dim gg As New Dim sql, rt As StringDim z, a As StringDim zy, bj, xh, xm, jsjwl, jsjzcyl, jsjyyytg, glxxxt, xxfgc, bgrj, bz As String = Provider=。Data Source=E:\zlf\。顯示相應字段的內容 = (2).Value = (3).Value = (4).Value = (5).Value = (6).Value = (7).Value = (8).Value = (9).Value MsgBox (查詢成功) End IfEnd SubPrivate Sub Command2_Click()Unload MeEnd Sub圖48添加學生成績窗口(1) 添加學生成績界面說明管理員在空白欄中正確輸入所要添加的信息，單擊“添加”按鈕即可添加成功。如果為空，彈出對話框 Else 39。 39。 amp。Data Source=E:\zlf\。 a, db, adOpenStatic, adLockOptimisticMsgBox ( 修改成功)End SubPrivate Sub Command2_Click()Unload MeEnd Sub圖47成績查詢窗口(1) 成績查詢界面說明管理員根據(jù)需要選擇所要查詢的對象，單擊“查詢”按鈕即可查詢成功。 z amp。 where 姓名= 39。 amp。,備注= 39。 amp。,政治面貌= 39。 amp。,聯(lián)系電話=39。 amp。,家庭住址= 39。 amp。,出生年月= 39。 amp。,性別=39。 amp。,姓名= 39。 amp。,學號= 39。 amp。,班級= 39。 amp。Persist Security Info=Falsesql = select * from 學生信息表 sql, db, adOpenStatic, adLockOptimistica = update 學生信息表 set 專業(yè)= 39。(2) 修改學生信息界面代碼Private Sub Command1_Click()Dim db As New Dim rs As New Dim gg As New Dim sql, rt As StringDim z, a As StringDim zy, bj, xh, xm, xb, jg, csny, jtzz, lxdh, zzmm, bz As String = Provider=。Data Source=E:\zlf\。顯示相應字段的內容 = (2).Value = (3).Value = (4).Value = (5).Value = (6).Value = (7).Value = (8).Value = (9).Value MsgBox (查詢成功) End IfEnd SubPrivate Sub Command2_Click()End Sub圖45 添加學生信息窗口(1) 添加學生信息界面說明管理員在空白欄中正確輸入所要添加的信息，單擊“添加”按鈕即可添加成功。如果為空，彈出對話框 Else 39。 39。 amp。Data Source=E:\zlf\。(2) 信息管理界面代碼a.（學生學籍信息管理）信息查詢窗口彈出代碼：Private Sub xxcx_Click(Index As Integer)End Subb.（學生學籍信息管理）信息添加窗口彈出代碼：Private Sub xxtj_Click(Index As Integer)End Subc.（學生學籍信息管理）信息修改窗口彈出代碼：Private Sub xxg_Click(Index As Integer)End Subd.（學生學籍成績管理）成績查詢窗口彈出代碼：Private Sub chjcx_Click(Index As Integer)End Sube.（學生學籍成績管理）成績添加窗口彈出代碼：Private Sub chjtj_Click(Index As Integer)End Subf.（學生學籍成績管理）成績修改窗口彈出代碼：Private Sub chjxg_Click(Index As Integer)End Subg.（學生學籍檔案管理）檔案查詢窗口彈出代碼：Private Sub dacx_Click(Index As Integer)End Subh.（學生學籍檔案管理）注冊查詢窗口彈出代碼：Private Sub dazccx_Click(Index As Integer)End Subi.（用戶管理）用戶修改窗口彈出代碼：Private Sub yhxg_Click(Index As Integer)End Subj.（用戶管理）用戶添加窗口彈出代碼：Private Sub yhtj_Click(Index As Integer)End Sub：Private Sub Command1_Click()End Sub圖44 查詢學生信息窗口(1) 查詢學生信息界面說明用戶選擇所要查詢的對象，單擊“確定”按鈕，得出相應信息。Persist Security Info=Falsesql = select * from 用戶管理表 sql, db, adOpenStatic, adLockReadOnlyWhile = False If (0).Value = Then If (1).Value = Then Else MsgBox (密碼錯誤,請重新輸入！) End If End If WendEnd SubPrivate Sub Command2_Click()End SubPrivate Sub Command3_Click()End SubPrivate Sub Command4_Click()End Sub圖43信息管理窗口(1) 信息管理界面說明信息管理包括“學生學籍信息管理、學生學籍成績管理、學生學籍檔案管理、用戶管理”，下設相應的子菜單。(2) 登錄窗口界面代碼：Private Sub Command1_Click()Dim db As New Dim rs As New Dim sql As String=Provider=。顯示登錄界面End Sub圖42 登錄窗口(1) 登錄窗口界面說明此登錄界面分為“管理員”和“普通用戶”登錄。(2) 主窗口界面代碼：Private Sub Command1_Click() 39。:是關于數(shù)據(jù)庫中數(shù)據(jù)的描述，即對原數(shù)據(jù)的描述。:數(shù)據(jù)存儲是數(shù)據(jù)及結構停留或保存的地方，也是數(shù)據(jù)流的來源和去向之一。一個數(shù)據(jù)結構可以由若干個數(shù)據(jù)結構組成，或由若干數(shù)據(jù)項和數(shù)據(jù)結構混合組成。數(shù)據(jù)字典通常包括以下幾部分：:數(shù)據(jù)項是不可在分的數(shù)據(jù)單位。ER圖是系統(tǒng)的概念設計，對系統(tǒng)前期分析相當重要，它可以正確直觀的反映出一個業(yè)務系統(tǒng)過程。學生信息表（專業(yè)，班級，學號，姓名，性別，出生年月，家庭住址，聯(lián)系電話，備注）學生成績表（專業(yè)，班級，學號，姓名，課程名稱，備注）學生檔案表（專業(yè)，班級，學號，姓名，民族，籍貫，政治面貌，獎懲，是否留級，表現(xiàn)情況，備注）學生注冊表（專業(yè)，班級，學號，姓名，出生年月，家庭住址，聯(lián)系電話，備注）用戶管理表（用戶名，密碼，備注）是希望通過數(shù)據(jù)庫管理系統(tǒng)提供的功能與描述工具，設計出規(guī)模恰當，能正確反映實際信息關系，重復數(shù)據(jù)少，存取效率高并能滿足用戶數(shù)據(jù)要求的數(shù)據(jù)模型。(4).系統(tǒng)采用模塊化程序設計方法，即便于系統(tǒng)功能的各種組合和修改、又便于未參與開發(fā)的設計維護人員補充、維護。(3).系統(tǒng)采用C/S體系結構，Client(客戶端)負責提供表達邏輯、顯示用戶界面信息、訪問數(shù)據(jù)庫服務器；Server(服務器)則用于提供數(shù)據(jù)服務。本學籍管理信息系統(tǒng)的計算機處理流程圖如下：圖32計算機處理流程圖本系統(tǒng)的總體設計思想有一下幾點：(1).盡量采用學?，F(xiàn)有的軟硬件環(huán)境，及先進的管理系統(tǒng)開發(fā)方案，從而達到充分利用學?，F(xiàn)有資源，提高系統(tǒng)開發(fā)水平和應用的目的。學生學籍管理信息系統(tǒng)功能結構圖（圖31）學生信息錄入學生學籍管理信息系統(tǒng)學生信息管理學生成績管理學生學籍檔案學生信息修改刪除學生信息查詢學生成績錄入學生成績查詢學生成績修改學生報名注冊登記表錄入在校生檔案查詢學生成績統(tǒng)計學生獎懲情況查詢圖31 學生學籍管理信息系統(tǒng)功能結構圖目的是讓開發(fā)人員明確子系統(tǒng)或功能模塊中信息的流動、轉換、存儲和處理等情況，以便進一步明確模塊物理設計及日后模塊實現(xiàn)的任務和工作要點，從而把系統(tǒng)的總體設計思想落實到每一個子系統(tǒng)和功能模塊之中。系統(tǒng)的總體設計是指在系統(tǒng)調查與分析的基礎上，對整個系統(tǒng)在結構上的劃分，硬軟件環(huán)境的配置和確定子系統(tǒng)與模塊的處理流程。(2) 系統(tǒng)詳細的設計。系統(tǒng)設計包括如下工作內容(1) 系統(tǒng)總體結構設計。因此，如果說系統(tǒng)研制人員在系統(tǒng)調查與分析階段的任務是在邏輯上弄清楚系統(tǒng)“做什么”的話，在系統(tǒng)設計階段的認為則是在物理上確定系統(tǒng)“如何去做”。系統(tǒng)設計包括兩方面的工作：首先是系統(tǒng)總體結構的設計，即把系統(tǒng)的功能分解成許多基本的功能模塊，取得它們之間的聯(lián)系，規(guī)定它們的功能和處理流程；其次是系統(tǒng)的詳細設計。第三章 學生學籍管理信息系統(tǒng)設計系統(tǒng)設計是管理系統(tǒng)開發(fā)的第二個階段。維護數(shù)據(jù)查詢管理添加設置DF06F05F04D03D02D01CVF03F02F01S01系統(tǒng)管理員用戶用戶信息錄入用戶權限系統(tǒng)數(shù)據(jù)表圖27系統(tǒng)管理數(shù)據(jù)流圖5．系統(tǒng)管理員根據(jù)用戶需要設置用戶及權限，建立系統(tǒng)數(shù)據(jù)表。F07F06DP2P1按姓名按班級F05F04F03按學號F02檔案單F01S01學生檔案管理人員檔案信息錄入檔案