基于vb的學(xué)生信息管理系統(tǒng)設(shè)計(jì)與實(shí)現(xiàn)-wenkub
2022-12-18 09:47:45 本頁(yè)面
【正文】 而且必須有強(qiáng)有力的學(xué)科支持，以便培 養(yǎng)數(shù)以千萬(wàn)計(jì)、幾千萬(wàn)計(jì)的管理人才、 IT 人才及其綜合型的復(fù)合人才。用我五年的所學(xué)編制了一個(gè)實(shí)用的程序來(lái)幫助我們學(xué)校進(jìn)行更有效的學(xué)生信息管理。 研究目的及意義 在各大中 小學(xué)校，用計(jì)算機(jī)管理學(xué)校的信息已經(jīng)越來(lái)越普遍了。 隨著科學(xué)技術(shù)的不斷提高 ,計(jì)算機(jī)科學(xué)技術(shù)日漸成熟 ,其強(qiáng)大的功能已為人們深刻認(rèn)識(shí) ,它已進(jìn)入人類(lèi)社會(huì)的各個(gè)領(lǐng)域并發(fā)揮著越來(lái)越重要的作用。 課題研究背景與研究目的、意義 研究背景 隨著學(xué)校規(guī)模不斷擴(kuò)大，學(xué)生數(shù)量急劇增加，有關(guān)學(xué)生的各種信息量也成倍增長(zhǎng)。 系統(tǒng)的開(kāi)發(fā)采用 SQLServer2021 為數(shù)據(jù)庫(kù)管理平臺(tái)、 為客戶(hù)端開(kāi)發(fā)工具，系統(tǒng)架構(gòu)為客戶(hù)機(jī) /服務(wù)器（ C/S）兩層結(jié)構(gòu)。學(xué)生信息管理系統(tǒng) （系統(tǒng)登陸及學(xué)籍管理模塊） 【摘要】 隨著學(xué)校規(guī)模不斷擴(kuò)大，學(xué)生數(shù)量急劇增加，有關(guān)學(xué)生的各種信息量也成倍增長(zhǎng)。應(yīng)用軟件工程原則，嚴(yán)格按照項(xiàng)目計(jì)劃、需求分析、概念設(shè)計(jì)、邏輯設(shè)計(jì)、物理設(shè)計(jì)、編碼、實(shí)現(xiàn)與維護(hù) 等步驟進(jìn)行。而對(duì)龐大的信息量，需要有學(xué)生管理系統(tǒng)來(lái)提高學(xué)生管理工作的效率。 作為計(jì)算機(jī)應(yīng)用的一部分 ,使用計(jì)算機(jī)對(duì)學(xué)生的各項(xiàng)信息進(jìn)行管理，有著手工管理所無(wú)法比擬的優(yōu)點(diǎn)。用計(jì)算機(jī)不但可以提高工作效率，而且還節(jié)省了許多人力物力，增強(qiáng)了學(xué)校資料的安全性。 本課題的發(fā)展前景及趨勢(shì) 21 世紀(jì)是信息科學(xué)技術(shù)飛躍發(fā)展的時(shí)代，信息技術(shù)在經(jīng)濟(jì)管理領(lǐng)域應(yīng)用廣泛，網(wǎng)絡(luò)經(jīng)濟(jì)的發(fā)展對(duì)電子商務(wù)、金融工程等人才的需求勢(shì)必增加，隨著全球經(jīng)濟(jì)一體化形勢(shì)的發(fā)展 ，信息管理與信息系統(tǒng)專(zhuān)業(yè)培養(yǎng)的人才將受到人才市場(chǎng)的青睞。 系統(tǒng)內(nèi)容簡(jiǎn)介及課題調(diào)研 系統(tǒng)內(nèi)容簡(jiǎn)介 學(xué)生信息管理系統(tǒng)使針對(duì)當(dāng)代社會(huì)，教育越來(lái)越成為社會(huì)的主流這一市場(chǎng)需要而應(yīng)運(yùn)而生的。 一個(gè)好的信息管理軟件，應(yīng)構(gòu)建在一個(gè)好的數(shù)據(jù)庫(kù)、程序語(yǔ)言和操作系統(tǒng)平臺(tái)上。在物業(yè)管理系統(tǒng)中，為了避免多個(gè)用戶(hù)同時(shí)對(duì)同一數(shù)據(jù)進(jìn)行操作，減少系統(tǒng)開(kāi)銷(xiāo)，系統(tǒng)采用客戶(hù) /服務(wù)器結(jié)構(gòu)。 學(xué)籍管理模塊：包括添加學(xué)籍信息，查詢(xún)和修改學(xué)籍信息等。 幫助模塊：包括使用說(shuō)明。 班級(jí)信息管理模塊的主要功能是系統(tǒng)建成后班級(jí)信息的添加，班級(jí)信息的查詢(xún)。 系統(tǒng)數(shù)據(jù)模型設(shè)計(jì) 數(shù)據(jù)庫(kù)的設(shè)計(jì) 表 31用戶(hù)信息表 (userinfo) 字段名稱(chēng) 字段類(lèi)型 字段大小 是否可為空 user_name nvarchar 10 no password int 4 no 表 32學(xué)籍信息表（ studentinfo） 字段名稱(chēng) 字段類(lèi)型 字段大小 是否可為空 stu_no varchar 10 no name varchar 12 no class_no varchar 10 no birthdata datetime 8 no sex varchar 4 no address varchar 50 no telno varchar 20 YES memo varchar 20 YES nianzhi varchar 20 no 系統(tǒng)開(kāi)發(fā)與運(yùn)行環(huán)境確定 系統(tǒng)開(kāi)發(fā) (1)此系統(tǒng)是基于 Windows 2021 網(wǎng)絡(luò)環(huán)境的數(shù)據(jù)庫(kù)管理，后臺(tái)數(shù)據(jù)庫(kù)采用 SQL Server2021，前端使用 進(jìn)行開(kāi)發(fā)。 (4)為了方便領(lǐng)導(dǎo)對(duì)信息的查詢(xún)，引入了下拉組合框控件用于選擇查詢(xún)條件，盡量做到查詢(xún)的智能化和多樣性。它的功能可以與龐大的VisualC++媲美；它易學(xué)易用。 Vb 確定了高效率和快速開(kāi)發(fā)高性能的客戶(hù)端 /服務(wù)器（ Client/Server）及 Enterprise 和 Inter 上的多層體系結(jié)構(gòu)應(yīng)用的標(biāo)準(zhǔn)，其快速應(yīng)用開(kāi)發(fā)、可伸縮的多層數(shù)據(jù)庫(kù)開(kāi)發(fā)、真正的面向?qū)ο蟮目芍赜眯约氨镜卮a優(yōu)化編譯技術(shù)，為企業(yè)范圍內(nèi)的 Client/Server 開(kāi)發(fā)及 Inter 應(yīng)用創(chuàng)造了條件。目前，為 SQL Server 2021（ 64位）計(jì)劃開(kāi)發(fā)的硬件產(chǎn)品最大可以支持 64GB 線(xiàn)性 物理內(nèi)存，將來(lái)的硬件產(chǎn)品將可以支持多達(dá) 4TB 的線(xiàn)性物理內(nèi)存。此外，對(duì)其它軟件幾乎沒(méi)有依賴(lài)性，程序健壯性較好?？煽啃酝ǔ０ㄕ_性和健壯性。另外界面中設(shè)置了下拉列表方便用戶(hù)進(jìn)行身份選擇。database=luhengxiu。 39。********************連接數(shù)據(jù)庫(kù) 39。User ID=sa。 amp。***********************添加用戶(hù) select * from userinfo , , adOpenDynamic, adLockPessimistic With rst .AddNew .Fields(user_name).Value = Trim(Text1) .Fields(password).Value = Trim(Text2) .Update MsgBox 添加新用戶(hù)成功！ , vbOKOnly + vbExclamation, 添加新用戶(hù) End With End Sub 修 改密碼界面如下： 圖 修改密碼界面 核心代碼如下： Private Sub Command1_Click() Dim As New Dim rst As New If Trim() = Then MsgBox 請(qǐng)輸入用戶(hù)名！ , vbExclamation + vbOKOnly, 警告 Exit Sub End If If Trim() = Then MsgBox 請(qǐng)輸入您的原始密碼！ , vbExclamation + vbOKOnly, 警告 Exit Sub End If If Trim() = Then MsgBox 請(qǐng)輸入新密碼！ , vbExclamation + vbOKOnly, 警告 Exit Sub End If If Trim() = Then MsgBox 請(qǐng)確認(rèn)新密碼！ , vbExclamation + vbOKOnly, 警告 Exit Sub End If If (Trim() Trim()) Then MsgBox 您輸入的第二次密碼不正確，請(qǐng)重新輸入！ , vbExclamation + vbOKOnly, 警告 = Exit Sub End If = Provider=。server=(local) UserName = Trim() mysql = select * from userinfo where user_name=39。and password=39。 mysql, If Then MsgBox 您輸入的用戶(hù)名或密碼不正確，請(qǐng)重新輸入！ , vbExclamation + vbOKOnly, 警告 = = Exit Sub Else 39。 MsgBox 恭喜您已成功修改密碼！ , vbOKOnly + v
研究報(bào)告相關(guān)推薦
鄂ICP備17016276號(hào)-1