學(xué)生社團(tuán)信息管理系統(tǒng)-閱讀頁(yè)
2024-09-04 19:55本頁(yè)面
【正文】 生成報(bào)表等。當(dāng)管理員登錄到系統(tǒng)的時(shí)候?qū)⒔o管理員呈現(xiàn)的界面如圖36所示。圖36 管理員登錄窗體圖37 管理員管理社團(tuán)圖38 管理員管理社員 第四章 設(shè)計(jì)結(jié)果及分析 登陸結(jié)果通過(guò)查看學(xué)生表里的權(quán)限值來(lái)呈現(xiàn)不同的窗體，擁有不同的操作，具體及代碼如下，可能出現(xiàn)的結(jié)果如圖41所示。 amp。 39。If = ThenMsgBox 輸入不能為空, vbOKOnly + vbinfromation = FalseExit SubEnd IfIf IsNumeric(Text1) Then = select , from sa full join admin on = full join Shetuan on = where =39。 Trim() amp。Set = Else = select , from sa full join admin on = full join Shetuan on = where =39。 Trim() amp。Set = If = 0 Then = select , , from sa full join admin on = full join Shetuan on = where =39。 Trim() amp。Set = Else = TrueEnd IfEnd IfIf 0 Then = TrueEnd IfIf = 0 ThenMsgBox 找不到你要的記錄, vbOKOnly + vbinfromationEnd If = 圖42 查詢(xún)操作 添加記錄 管理員可以添加社團(tuán)或社員，通過(guò)程序可以對(duì)數(shù)據(jù)庫(kù)里的表實(shí)現(xiàn)增刪改查，具體增加記錄代碼如下，管理員添加了一個(gè)新社員的截圖如圖43所示。 = s1 = adCmdText = select * from Shetuan where =39。 Trim() amp。(ST_TIME).Value = Trim()(ST_EVENTS).Value = Trim()MsgBox 修改成功圖44 修改社團(tuán) 刪除記錄 管理員可以刪除不存在的社團(tuán)，通過(guò)程序可以對(duì)數(shù)據(jù)庫(kù)里的表實(shí)現(xiàn)增刪改查，具體刪除記錄代碼如下,截圖如圖45所示。 amp。 39。其使用功能基本符合所給要求，具有一定的實(shí)用性。通過(guò)此次的系統(tǒng)開(kāi)發(fā)，我不僅鞏固了對(duì)Visual Basic，SQL Server2000的使用，而且學(xué)到了很多書(shū)本上所沒(méi)有學(xué)到過(guò)的知識(shí)，對(duì)軟件工程的一整套管理方法也有了或多或少的認(rèn)識(shí)。在這次的課程設(shè)計(jì)中，我深深地體會(huì)到進(jìn)行軟件開(kāi)發(fā)不是一件簡(jiǎn)單的事情，它需要設(shè)計(jì)者具有全面的專(zhuān)業(yè)知識(shí)、縝密的思維、嚴(yán)謹(jǐn)?shù)膽B(tài)度以及較高的分析問(wèn)題、解決問(wèn)題的能力，還需要團(tuán)隊(duì)的合作，而我在很多方面還
畢業(yè)設(shè)計(jì)相關(guān)推薦
鄂ICP備17016276號(hào)-1