學(xué)生信息管理系統(tǒng)的設(shè)計(jì)與實(shí)現(xiàn)論文(編輯修改稿)
2025-07-25 03:50 本頁(yè)面
【文章內(nèi)容簡(jiǎn)介】 本校內(nèi)部查詢(xún)學(xué)生信息、教務(wù)信息、學(xué)生選課各個(gè)環(huán)節(jié)進(jìn)行有效地計(jì)劃、組織和控制。通過(guò)本校內(nèi)部的信息，依據(jù)統(tǒng)一數(shù)據(jù)信息進(jìn)行管理，把任何一塊信息所產(chǎn)生的數(shù)據(jù)變動(dòng)及時(shí)地反映給其它相關(guān)信息，做到數(shù)據(jù)共享。本系統(tǒng)主要信息流程為：教務(wù)信息維護(hù)接受學(xué)生的信息，學(xué)生信息查詢(xún)根據(jù)教務(wù)信息維護(hù)的學(xué)生信息做出對(duì)所接收的信息合理性進(jìn)行判斷，并交于信息維護(hù)進(jìn)行相應(yīng)的修改，再把信息存入數(shù)據(jù)庫(kù)中。學(xué)生選課是對(duì)學(xué)生進(jìn)行相應(yīng)選擇自己相關(guān)的課程。最后進(jìn)行打印。采用本系統(tǒng)，能夠使整個(gè)系統(tǒng)內(nèi)部所有信息的工作簡(jiǎn)化，提高工作效益。由于采用統(tǒng)一的數(shù)據(jù)信息，使相關(guān)資料能夠快速地查詢(xún)所需的數(shù)據(jù)、資料及其它信息的，使信息快速高效運(yùn)行。本系統(tǒng)中使用到的數(shù)據(jù)表主要有班級(jí)表、成績(jī)表、科目表、學(xué)生基本信息表、用戶(hù)表，由這五個(gè)表，組成了名為信息的數(shù)據(jù)庫(kù)（如圖一）。其中學(xué)生檔案是本系統(tǒng)主要的（圖一）一張表，所有信息都是根據(jù)這張學(xué)生檔案進(jìn)行有關(guān)的操作，主要的字段有：學(xué)號(hào)、姓名、年級(jí)、專(zhuān)業(yè)、性別、出生年月、民族、籍貫、政治面貌、家庭地址、郵政編碼、聯(lián)系電話、入學(xué)時(shí)間、備注。其中日期的數(shù)據(jù)類(lèi)型為日期/時(shí)間天型，其它的數(shù)據(jù)類(lèi)型為文本型；成績(jī)表中字段為：學(xué)號(hào)、姓名、年級(jí)、專(zhuān)業(yè)、學(xué)期、考試時(shí)間、考試科目、考試地點(diǎn)、課程性質(zhì)、科目分?jǐn)?shù)、違紀(jì)類(lèi)型、備注；課程表中字段為：專(zhuān)業(yè)、年級(jí)、學(xué)期、課程名稱(chēng)、教材、任課老師、課時(shí)、上課地點(diǎn)、課程性質(zhì)、考試性質(zhì)；用戶(hù)資料中的字段包括：用戶(hù)名、密碼、身份。數(shù)據(jù)庫(kù)與VB的連接：本系統(tǒng)的數(shù)據(jù)鏈接采用的是ADO方法，打開(kāi)控制面板，打開(kāi)ODBC數(shù)據(jù)源圖標(biāo)，選擇“系統(tǒng)DSN”標(biāo)簽，點(diǎn)擊“添加”按鈕，在彈出的“創(chuàng)建新數(shù)據(jù)源”對(duì)話框中選擇名稱(chēng)為“Microsoft Access Drive（*.mdb）”，點(diǎn)擊“完成”按鈕，在ODBC Microsoft Access 安裝對(duì)話框中在數(shù)據(jù)源名中輸入信息，在數(shù)據(jù)庫(kù)這個(gè)框中， 單擊“選擇”按鈕，在彈出的選擇數(shù)據(jù)庫(kù)這一對(duì)話框架中，在驅(qū)動(dòng)器下拉列表框中選擇本系統(tǒng)數(shù)據(jù)庫(kù)所在驅(qū)動(dòng)器，在目錄中選擇庫(kù)所在的文件夾，在文件類(lèi)型中選擇選“Access數(shù)據(jù)庫(kù)（*.mdb）”，在數(shù)據(jù)庫(kù)名中選擇本系統(tǒng)的數(shù)據(jù)庫(kù)，點(diǎn)擊“確定”按鈕即完成數(shù)據(jù)鏈接。 在VB中，用ADODC鏈接數(shù)據(jù)庫(kù)，用DataGrid或DATA將庫(kù)中的數(shù)據(jù)在界面中顯示出來(lái)，本系統(tǒng)采用DataGrid。在界面上右擊Adodc控制，在彈出的快捷菜單中選擇屬性，在屬性對(duì)話框中，在“屬性”這一標(biāo)簽中， 選中單選框“Use ODBC Data Source Name”，并在下拉文本框中選擇已經(jīng)配置好的數(shù)據(jù)源名信息，再在“RecordSoure”標(biāo)簽中，在Commard Text（SQL）文本框中輸入查詢(xún)語(yǔ)句，如：select * from 學(xué)生檔案。同時(shí)，將桌面的DataGrid控件選中，在屬性框中，將它的Datasoure設(shè)為Adodc。我們可以設(shè)置DataGrid控件的外觀：選中該控件，右擊，在彈出的快捷菜單中選擇“檢索字段”，在彈出的對(duì)話框中單擊“確定”，這時(shí)，表格中出現(xiàn)了表的字段。然后再右擊，同樣，在彈出的快捷菜單中選擇“編輯”，我們就可以所在的表格的寬度進(jìn)行調(diào)整。 第六章 系統(tǒng)（查詢(xún)模塊）總體規(guī)劃6．1系統(tǒng)功能（查詢(xún)模塊）查詢(xún)信息的情況；判斷信息是否符合要求；將符合條件的信息進(jìn)行；6．2流程圖學(xué)生注冊(cè)基本信息輸入學(xué)籍信息管理班級(jí)管理班級(jí)課程設(shè)置課程基本信息班級(jí)課程管理成績(jī)信息輸入成績(jī)信息管理班級(jí)設(shè)置 第七章 系統(tǒng)的具體實(shí)現(xiàn)7．1系統(tǒng)登錄模塊的實(shí)現(xiàn)1．流程圖YN開(kāi)始輸入登錄密碼是否正確主界面 2．界面： 界面包括的控件有標(biāo)簽、文本框、命令按鈕等控件。3．實(shí)現(xiàn)過(guò)程：第一步將所需的控件放到窗體的相應(yīng)位置；方法：首先在“工具箱”中選中所需的控件圖標(biāo)，然后在表單的恰當(dāng)位置上單擊鼠標(biāo)并拖動(dòng)鼠標(biāo)，即可把由所選取的控件生成的對(duì)象添加到窗體上。如下圖：第二步，選擇窗體或控件進(jìn)行屬性設(shè)置，如圖為窗體的屬性設(shè)置界面: 第三步雙擊相應(yīng)的控件，在控件的相應(yīng)過(guò)程中編寫(xiě)代碼：如此窗體上“進(jìn)入”與“退出”按鈕的代碼如下：７．2主界面的實(shí)現(xiàn)主界面是用菜單形式表現(xiàn)的，如圖 菜單的制作過(guò)程如下：首先通過(guò)“工具”菜單中的“菜單編輯器”調(diào)出菜單編輯器，然后進(jìn)行菜單的設(shè)置，如下圖： 此過(guò)程中要注意各菜單的名稱(chēng)唯一，還要注意菜單的級(jí)別，另外此設(shè)計(jì)過(guò)程中我們還可以給菜單加快捷鍵。最后設(shè)置如下的代碼（只要單擊菜單即可設(shè)置各菜單代碼），代碼如下：主要是通過(guò)Show方法調(diào)用相應(yīng)的窗體。7．3各功能的實(shí)現(xiàn)7．3．1學(xué)科管理模塊的實(shí)現(xiàn)：１、運(yùn)行界面： 2．實(shí)現(xiàn)過(guò)程： 第一步將所需的控件放到窗體的相應(yīng)位置；方法：首先在“工具箱”中選中所需的控件圖標(biāo)，然后在表單的恰當(dāng)位置上單擊鼠標(biāo)并拖動(dòng)鼠標(biāo)，即可把由所選取的控件生成的對(duì)象添加到窗體上。第二步，選擇窗體或控件進(jìn)行屬性設(shè)置，同上一小結(jié)。 其它屬性和控件的設(shè)置方法類(lèi)似。第三步雙擊相應(yīng)的控件，在控件的相應(yīng)過(guò)程中編寫(xiě)代碼：窗體的load事件為：Private Sub Command1_Click()Dim myCon As New Dim myRs As New Dim ZhuanYe, NianJi, XueQi, KeCheng, JiaoCai, RenKLS, KeShi, ShangKeDD, KeChengXZ, KaoShiXZ As StringZhuanYe = NianJi = XueQi = KeCheng = JiaoCai = RenKLS = KeShi = ShangKeDD = KeChengXZ = KaoShiXZ = If Trim(ZhuanYe) = Or Trim(NianJi) = Or Trim(XueQi) = Or Trim(KeCheng) = Or Trim(JiaoCai) = Or Trim(RenKLS) = Or Trim(KeShi) = Or Trim(ShangKeDD) = Or Trim(KeChengXZ) = Or Trim(KaoShiXZ) = Then MsgBox 請(qǐng)?zhí)顚?xiě)要修改課程資料的內(nèi)容！ = = Exit SubEnd If dsn=信息 select * from 課程表 where 專(zhuān)業(yè)=39。 amp。 amp。 39。, myCon, 3, 2 myRs!年級(jí) = myRs!學(xué)期 = myRs!課程名稱(chēng) = myRs!教材 = myRs!任課老師 = myRs!課時(shí) = myRs!上課地點(diǎn) = myRs!課程性質(zhì) = myRs!考試性質(zhì) = MsgBox 您確定要修改嗎？, vbYesNo, 提示 = = 39。 = = = = = = = = End SubPrivate Sub Command2_Click() Unload MeEnd SubPrivate Sub Command3_Click() Unload Me 1
黨政相關(guān)相關(guān)推薦
鄂ICP備17016276號(hào)-1