【正文】
全套包括 :開(kāi)題報(bào)告 ,論文 ,源程序 ,源代碼 ,答辯PPT,萬(wàn)余套設(shè)計(jì) ,歡迎咨詢選購(gòu) ,價(jià)格最低質(zhì)量最好 2 第六章 詳細(xì)設(shè)計(jì)說(shuō)明書(shū) 14 ⒈ 引言 14 ⒉過(guò)程設(shè)計(jì) 14 第七章 軟件實(shí)現(xiàn) 17 ⒈ 引言 17 ⒉編碼實(shí)現(xiàn) 17 ⒊系統(tǒng)測(cè)試 34 第八章 結(jié)束語(yǔ) 36 致謝 37 參考 文獻(xiàn) 38 附錄 39 購(gòu)買(mǎi)設(shè)計(jì) : 382540551 全套包括 :開(kāi)題報(bào)告 ,論文 ,源程序 ,源代碼 ,答辯PPT,萬(wàn)余套設(shè)計(jì) ,歡迎咨詢選購(gòu) ,價(jià)格最低質(zhì)量最好 3 摘要 學(xué)生檔案管理系統(tǒng)是典型的信息管理系統(tǒng) (MIS),其開(kāi)發(fā)主要包括后臺(tái)數(shù)據(jù)庫(kù)的建立和維護(hù)以及前端應(yīng)用程序的開(kāi)發(fā)兩個(gè)方面。 學(xué)生信息管理系統(tǒng)主要是完成學(xué)生各種信息的管理工作 (包括基本信息、成績(jī)、課程等 ),通過(guò)對(duì)不同的用戶設(shè)置不同的權(quán)限來(lái)完成整個(gè)系統(tǒng)的管理,這樣不但方便了老師和學(xué)生查閱自己所想得到的信息而且還有效的保證了系統(tǒng)數(shù)據(jù)的安全性 . 關(guān)鍵字:控件、窗體、域。目的是通過(guò)對(duì)用戶的調(diào)查訪問(wèn),寫(xiě)出關(guān)于軟件性質(zhì)的書(shū)面報(bào)告,經(jīng)過(guò)討論修改得到用戶的確認(rèn),為以后的工作確定方向。學(xué)生信息 管理 系統(tǒng)需要完成的功能主要 包括對(duì)學(xué)生基本信息、課程、成績(jī)的輸入、查詢、修改、統(tǒng)計(jì)和維護(hù)等操作。 c、 課程子系統(tǒng)應(yīng)該包括 對(duì) 課程信息、開(kāi)課時(shí) 間、選課人數(shù)等 的管理。 ⑵ 項(xiàng)目背景 該項(xiàng)目為學(xué)校學(xué)生信息管理系統(tǒng)軟件 , 是 為了更好的方便對(duì)學(xué)生各項(xiàng)信息進(jìn)行綜合的管理。 隨著 目前社會(huì)上信息管理系統(tǒng) 的飛快發(fā)展, 各個(gè)企事業(yè)單位都引入了信息管理軟件來(lái)管理自己日益增長(zhǎng)的各種信息 , 學(xué)生管理系統(tǒng)也是有了很大的發(fā)展 , 商業(yè)化的學(xué)生信息管理軟件也不少 。 (2)經(jīng)濟(jì)可行性分析中最重要的內(nèi)容之一是 對(duì) 成本--效益 問(wèn)題的 分析。所以在法律方面不會(huì)存在侵權(quán)等問(wèn)題 。 第三章 軟件項(xiàng)目計(jì)劃 ⒈ 引 言 經(jīng)過(guò)可行性分析 階段的研究 ,得出項(xiàng)目可進(jìn)一步進(jìn)行下去的結(jié)論,在軟件繼續(xù)進(jìn)一步的開(kāi)發(fā)之前首先給出此軟件項(xiàng)目計(jì)劃 , 以使軟件 開(kāi)發(fā)者 理解軟件開(kāi)發(fā)要求,進(jìn)行開(kāi)發(fā)。在需求分析階段結(jié)束之前,系統(tǒng)分析員應(yīng)該寫(xiě)出軟件需求規(guī)格說(shuō)明書(shū),以書(shū)面形式準(zhǔn)確的描述軟件需求。 ⒉ 任務(wù)概 述 (1)確定對(duì)系統(tǒng)的綜合要求,包括功能需求,性能需求,可靠性和可用性需求,出錯(cuò)處理需求,接口需求,約束及將來(lái)可能提出的要求。 ⒊ 數(shù)據(jù) 庫(kù) ⑴ 數(shù)據(jù)庫(kù)描述 根據(jù)上面的分析就可以設(shè)計(jì)出能夠滿足用戶需求的各種數(shù)據(jù)實(shí)體以及它們之間的關(guān)系 , 為后面的邏輯結(jié)構(gòu)設(shè)計(jì)打下基礎(chǔ) 。在時(shí)間方 面,由于 本系統(tǒng)的數(shù)據(jù)庫(kù)較小,所以程序在響應(yīng)時(shí)間,數(shù)據(jù)更新處理時(shí)間上性能比較突出 ??傮w設(shè)計(jì) 的基本目的就是回答“概括的說(shuō),系統(tǒng)應(yīng)該如何實(shí)現(xiàn)”這個(gè)問(wèn)題。軟件運(yùn)行時(shí)有較友好的界面,基本能夠?qū)崿F(xiàn)用戶的數(shù)據(jù)處理要求 。 軟件設(shè)計(jì)是把軟件需求變換成為軟件的具體設(shè)計(jì)方案,即模塊結(jié)構(gòu)的過(guò)程。內(nèi)部過(guò)程描述是模塊內(nèi)部 的算法設(shè)計(jì)。 b、 算法 在本文檔中都統(tǒng)一使用 PAD 圖 即樹(shù)形問(wèn)題分析圖 (Problem Analysis Diagram)作為描述程序處理過(guò)程的工具 。 (4)課程 設(shè)置模塊 a、 課程設(shè)置模塊 主要實(shí)現(xiàn) 添加課程信息、修改課程信息以及設(shè)置年級(jí)課程信息的 功能 。 輸出記錄 姓名有效? 輸出記錄 出錯(cuò)處理 購(gòu)買(mǎi)設(shè)計(jì) : 382540551 全套包括 :開(kāi)題報(bào)告 ,論文 ,源程序 ,源代碼 ,答辯PPT,萬(wàn)余套設(shè)計(jì) ,歡迎咨詢選購(gòu) ,價(jià)格最低質(zhì)量最好 17 第七章 軟件實(shí)現(xiàn) ⒈ 引言 通常把編碼和測(cè)試統(tǒng)稱為實(shí)現(xiàn)。這樣設(shè)計(jì)更好的維護(hù)了系統(tǒng)數(shù)據(jù)的正確性。 Trim(Combo1(1).Text) amp。 amp。判斷是否日期格式 ssss = MsgBox(應(yīng)輸入日期 mmddyy, vbInformation + vbOKOnly, 警告) Text1(2).SetFocus Text1(2).SelStart = 0 Text1(2).SelLength = Len(Text1(2).Text) Exit Sub End If If Not IsDate(Text1(6).Text) Then ssss = MsgBox(應(yīng)輸入日期 mmddyy, vbInformation + vbOKOnly, 警告) Text1(6).SetFocus Text1(6).SelStart = 0 Text1(6).SelLength = Len(Text1(6).Text) Exit Sub End If If modi = True Then 購(gòu)買(mǎi)設(shè)計(jì) : 382540551 全套包括 :開(kāi)題報(bào)告 ,論文 ,源程序 ,源代碼 ,答辯PPT,萬(wàn)余套設(shè)計(jì) ,歡迎咨詢選購(gòu) ,價(jià)格最低質(zhì)量最好 22 txtsql1 = update xj set 學(xué)號(hào) =39。,姓 名 =39。,性別 =39。,班級(jí) =39。,出生年月 = amp。 Trim(Text1(3).Text) amp。 Trim(Text1(4).Text) amp。 Trim(Text1(5).Text) amp。 ,備注=39。where 學(xué)號(hào) =39。 Set mrc = ExecuteSQL(txtsql1) txtsql1 = update cj set 學(xué)號(hào) =39。 where 學(xué)號(hào) =39。 Set mrc = ExecuteSQL(txtsql1) txtsql1 = update jf set 學(xué)號(hào) =39。 where 學(xué)號(hào) =39。 39。 Trim((, 1)) amp。 購(gòu)買(mǎi)設(shè)計(jì) : 382540551 全套包括 :開(kāi)題報(bào)告 ,論文 ,源程序 ,源代碼 ,答辯PPT,萬(wàn)余套設(shè)計(jì) ,歡迎咨詢選購(gòu) ,價(jià)格最低質(zhì)量最好 25 圖 學(xué)生信息查詢 窗口 所有用戶都可以進(jìn)行學(xué)生信息查詢操作,用戶可以根據(jù)自己的要求進(jìn)行查詢,也可按姓名關(guān)鍵字查詢(如上圖所示)。超級(jí)用戶可以對(duì)課程進(jìn)行添加操作和刪除操作,將課程所學(xué)專(zhuān)業(yè),課程名,開(kāi)始學(xué)習(xí)時(shí)間及任課教師等信息輸入數(shù)據(jù)庫(kù)中,刪除操作必須在該課程沒(méi)有 成績(jī)時(shí)才能進(jìn)行。具體操作同上??坑? Next i .FillStyle = flexFillSingle .Col = 0 .Row = 0 .RowSel = 1 .ColSel = .Cols 1 .CellAlignment = 4 .Row = 1 End With End Sub Public Sub xuefeidata() jfshowtitle max Dim mrc As Dim mrc2 As txtsql = select , , , , , , , from jf inner join xj on = where =39。 and =39。 order by , Set mrc = ExecuteSQL(txtsql) 購(gòu)買(mǎi)設(shè)計(jì) : 382540551 全套包括 :開(kāi)題報(bào)告 ,論文 ,源程序 ,源代碼 ,答辯PPT,萬(wàn)余套設(shè)計(jì) ,歡迎咨詢選購(gòu) ,價(jià)格最低質(zhì)量最好 29 If = True Then txtsql = select , , , , , , , from jf inner join xj on = where =39。 and =39。 order by , Set mrc = ExecuteSQL(txtsql) If = True Then Exit Sub Else maxx = maxx amp。 amp。 amp。 amp。Set mrc1 = ExecuteSQL(txtsql) txtsql = select 學(xué)號(hào) ,sum(欠費(fèi) ) from jf where 學(xué)號(hào) in (select 學(xué)號(hào) from xj where 班級(jí) =39。) group by 學(xué)號(hào) Set mrc2 = ExecuteSQL(txtsql) Dim j As Integer Dim i As Integer If = True Then Exit Sub End If With MSF1 .Rows = 20 .Row = 1 Do Until .Rows = .Rows + 1 .TextMatrix(.Row, 1) = (0) .TextMatrix(.Row, 2) = (1) .TextMatrix(.Row, 3) = (2) .TextMatrix(.Row, 4) = (3) .TextMatrix(.Row, 5) = ¥ amp。 .MergeCol(7) = True 購(gòu)買(mǎi)設(shè)計(jì) : 382540551 全套包括 :開(kāi)題報(bào)告 ,論文 ,源程序 ,源代碼 ,答辯PPT,萬(wàn)余套設(shè)計(jì) ,歡迎咨詢選購(gòu) ,價(jià)格最低質(zhì)量最好 30 .TextMatrix(.Row, 6) = ¥ amp。jfshowtitle jftree End Sub Private Sub max() Dim mrc As txtsql = select max(學(xué)期 ) from jf where 學(xué)號(hào) in (select 學(xué)號(hào) from class where 班級(jí)=39。) Set mrc = ExecuteSQL(txtsql) If = True Then Exit Sub Else If IsNull((0)) Then Exit Sub End If 購(gòu)買(mǎi)設(shè)計(jì) : 382540551 全套包括 :開(kāi)題報(bào)告 ,論文 ,源程序 ,源代碼 ,答辯PPT,萬(wàn)余套設(shè)計(jì) ,歡迎咨詢選購(gòu) ,價(jià)格最低質(zhì)量最好 31 End If maxx = Left((0), 11) g = 1 End Sub Private Sub Form_Load() jfshowtitle End Sub Private Sub MSF1_DblClick() If Trim((, 1)) = Then sssss = MsgBox(無(wú)當(dāng)前選擇記錄! , vbOKOnly + vbExclamation, 警告 ) Exit Sub End If 1 End Sub Public Sub jftree() Dim nodex As Node Dim mrc As Dim mrc1 As Dim str As String Dim a As String a = 年級(jí) = tvwRootLines str = select distinct 年級(jí) from class order by 年級(jí) Set mrc = ExecuteSQL(str) str = select distinct 年級(jí) ,班級(jí) from class order by 年級(jí) ,班級(jí) Set mrc1 = ExecuteSQL(str) Do Until Set nodex =