【正文】 套設(shè)計(jì) ,歡迎咨詢選購 ,價(jià)格最低質(zhì)量最好 18 圖 用戶登入窗口 系統(tǒng)把用戶分成超級(jí)用戶和普通用戶兩類，超級(jí)用戶登入需要用戶名和密碼，可以對(duì)系統(tǒng)進(jìn)行添加、刪除以及查詢等操作，而普通用戶可直接登入系統(tǒng)進(jìn)行簡單的查詢工作。 39。 amp。 39。 39。選中列表框中條目點(diǎn)擊刪除鈕即可刪除選中條目。 39。 and 學(xué)號(hào) in (select 學(xué)號(hào) from jf where 學(xué)期 =39。 .MergeRow(0) = True 39。 Set mrc = ExecuteSQL(txtsql) If = False Then MsgBox 已存在該用戶！ , vbExclamation + vbOKOnly, 警告 Text1(0).SetFocus Text1(0).SelStart = 0 Text1(0).SelLength = Len(Text1(0).Text) Exit Sub End If txtsql = select * from use Set mrc = ExecuteSQL(txtsql) (0) = Trim(Text1(0).Text) (1) = Trim(Text1(1).Text) For i = 0 To 2 If Option1(i).Value = True Then Select Case i Case 0 (admin) = y Case 1 (readonly) = y Case 2 For j = 0 To 3 If Check1(j).Value = 1 Then Select Case j Case 0 (qx1) = y 購買設(shè)計(jì) ： 382540551 全套包括 :開題報(bào)告 ,論文 ,源程序 ,源代碼 ,答辯PPT,萬余套設(shè)計(jì) ,歡迎咨詢選購 ,價(jià)格最低質(zhì)量最好 35 Case 1 (qx2) = y Case 2 (qx3) = y Case 3 (qx4) = y End Select End If Next j End Select End If Next i MsgBox 用戶添加成功！ , vbExclamation + vbOKOnly, 警告 Text1(0).Text = Text1(1).Text = Text1(2).Text = End Sub Private Sub Command2_Click() Unload Me End Sub Private Sub Form_Load() Option1(2).Value = True End Sub Private Sub Form_Resize() Text1(0).SetFocus End Sub Private Sub Option1_Click(Index As Integer) If Index 2 Then For i = 0 To 3 Check1(i).Enabled = False Next i Else For i = 0 To 3 Check1(i).Enabled = True Next i End If 購買設(shè)計(jì) ： 382540551 全套包括 :開題報(bào)告 ,論文 ,源程序 ,源代碼 ,答辯PPT,萬余套設(shè)計(jì) ,歡迎咨詢選購 ,價(jià)格最低質(zhì)量最好 36 End Sub (9)打印報(bào)表 與打印機(jī)相連直接輸出內(nèi)容。 e、 查詢學(xué) 生 信息窗口的測(cè)試 該測(cè)試的目的是保證查詢學(xué) 生 信息窗口的正確性與在數(shù)據(jù)輸入不正確時(shí)的容錯(cuò)與糾錯(cuò)性 。成功的系統(tǒng)設(shè)計(jì)必須通過以上的要求。同時(shí)，也要感謝我的老師和同學(xué)們?cè)诒鞠到y(tǒng)的 設(shè)計(jì)過程中給予我的支持和幫助。 i、 刪除用戶窗口的測(cè)試 該測(cè)試的目的是保證添加用戶窗口的正確性及糾錯(cuò)性。要求系統(tǒng)在遇到這些情況時(shí)能給出正確的錯(cuò)誤提示。 購買設(shè)計(jì) ： 382540551 全套包括 :開題報(bào)告 ,論文 ,源程序 ,源代碼 ,答辯PPT,萬余套設(shè)計(jì) ,歡迎咨詢選購 ,價(jià)格最低質(zhì)量最好 33 圖 添加用戶窗口 代碼如下： Private Sub Command1_Click() If Trim(Text1(0).Text) = Then MsgBox 用戶名不能為空！ , vbExclamation + vbOKOnly, 警告 Text1(0).SetFocus Exit Sub End If If Trim(Text1(1).Text) = Then MsgBox 密碼不能為空！ , vbExclamation + vbOKOnly, 警告 Text1(1).SetFocus Exit Sub End If If Trim(Text1(2).Text) = Then MsgBox 確認(rèn)密碼不能為空！ , vbExclamation + vbOKOnly, 警告 Text1(2).SetFocus Exit Sub End If If Trim(Text1(1).Text) Trim(Text1(2).Text) Then MsgBox 確認(rèn)密碼不正確！ , vbExclamation + vbOKOnly, 警告 Text1(2).SetFocus 購買設(shè)計(jì) ： 382540551 全套包括 :開題報(bào)告 ,論文 ,源程序 ,源代碼 ,答辯PPT,萬余套設(shè)計(jì) ,歡迎咨詢選購 ,價(jià)格最低質(zhì)量最好 34 Exit Sub End If Dim aa As Integer aa = 0 If Option1(2).Value = True Then For i = 0 To 3 If Check1(i).Value = 1 Then aa = 1 Exit For End If Next i If aa = 0 Then MsgBox 普通用戶至少要有一項(xiàng)權(quán)限！ , vbExclamation + vbOKOnly, 警告 Exit Sub End If End If Dim mrc As txtsql = select * from use where username=39。 39。txtsql = select 學(xué)號(hào) ,sum(欠費(fèi) ) from jf where 學(xué)期 39。 年度第二學(xué)期 39。課程信息錄入同上。 39。 Trim(Text1(6).Text) amp。 39。 Set mrc = ExecuteSQL(txtsql1) If modi = False Then If = False Then sss = MsgBox(已經(jīng)存在該學(xué)號(hào)的記錄 ,學(xué)號(hào)不能重復(fù)！ , vbExclamation + vbOKOnly, 警告 ) Text1(0).SetFocus Text1(0).SelStart = 0 Text1(0).SelLength = Len(Text1(0).Text) Exit Sub End If End If If Not IsDate(Text1(2).Text) Then 39。 b、 算法 與班級(jí)和學(xué) 生基本信息 的添加與修改類似。 購買設(shè)計(jì) ： 382540551 全套包括 :開題報(bào)告 ,論文 ,源程序 ,源代碼 ,答辯PPT,萬余套設(shè)計(jì) ,歡迎咨詢選購 ,價(jià)格最低質(zhì)量最好 14 第六章 詳細(xì)設(shè)計(jì)說明書 ⒈ 引言 詳細(xì)設(shè)計(jì)階段的根本目標(biāo)是確定應(yīng)該怎樣具體實(shí)現(xiàn)所要求的系統(tǒng)，也就是說經(jīng)過這個(gè)階段的設(shè)計(jì)工作，應(yīng)該得出對(duì)目標(biāo)系統(tǒng)的精確描述，詳細(xì)設(shè)計(jì)階段的任務(wù)還不是具體的編寫程序，而是要設(shè)計(jì)出程序的“藍(lán)圖”。 (4)修正系統(tǒng)開發(fā)計(jì)劃。 (3)該項(xiàng)目為獨(dú)立開發(fā)，在技術(shù)上沒有使用任何現(xiàn)有的軟件與方法。 b、 學(xué)生子系統(tǒng)的結(jié)構(gòu)圖應(yīng)該包括學(xué)生基本信息、所在班級(jí)、所學(xué)課程 及 成績等以及相對(duì)應(yīng)的數(shù)據(jù)結(jié)構(gòu) 。購買設(shè)計(jì) ： 382540551 全套包括 :開題報(bào)告 ,論文 ,源程序 ,源代碼 ,答辯PPT,萬余套設(shè)計(jì) ,歡迎咨詢選購 ,價(jià)格最低質(zhì)量最好 1 學(xué)生檔案管理系統(tǒng) 目 錄 摘要 3 第一章 系統(tǒng)規(guī)約說明書 4 ⒈引言 4 ⒉ 系統(tǒng)功能和數(shù)據(jù)描述及子系統(tǒng)描述 4 第二章 軟件項(xiàng)目計(jì)劃 5 ⒈引 言 5 ⒉ 可行性分析 5 ⒊系統(tǒng)數(shù)據(jù)流圖 6 ⒋ 數(shù) 據(jù)字典 6 ⒌ 結(jié)論意見 6 第三章 軟件項(xiàng)目計(jì)劃 7 ⒈引 言 7 ⒉實(shí) 施計(jì) 劃 7 第四章 需求規(guī)格說明書 8 ⒈ 引言 8 ⒉ 任務(wù)概述 8 ⒊ 數(shù)據(jù) 庫 8 ⒋各種需求描述 10 第五章 總體 設(shè)計(jì)說明書 11 ⒈ 引言 11 ⒉任務(wù)概述 11 ⒊ 總體 結(jié)構(gòu)圖 11 ⒋ 數(shù)據(jù) 邏輯 結(jié)構(gòu)設(shè)計(jì) 12 ⒌ 運(yùn)行設(shè)計(jì) 13 ⒍其他 13 購買設(shè)計(jì) ： 382540551 全套包括 :開題報(bào)告 ,論文 ,源程序 ,源代碼 ,答辯PPT,萬余套設(shè)計(jì) ,歡迎咨詢選購 ,價(jià)格最低質(zhì)量最好 2 第六章 詳細(xì)設(shè)計(jì)說明書 14 ⒈ 引言