《VB 學(xué)生選課系統(tǒng)》由會(huì)員分享,可在線閱讀,更多相關(guān)《VB 學(xué)生選課系統(tǒng)(9頁(yè)珍藏版)》請(qǐng)?jiān)谘b配圖網(wǎng)上搜索。
1、大型數(shù)據(jù)庫(kù)系統(tǒng)開(kāi)發(fā)實(shí)驗(yàn)課程論文 題 目: 學(xué)生選課系統(tǒng)的設(shè)計(jì) 姓 名: 學(xué) 號(hào): 院 系: 專 業(yè): 二一一 年 六 月 五日一 背景分析隨著科學(xué)技術(shù)的不斷提高,計(jì)算機(jī)科學(xué)日漸成熟,其強(qiáng)大的功能已為人們深刻認(rèn)識(shí),它已進(jìn)入人類社會(huì)的各個(gè)領(lǐng)域并發(fā)揮著越來(lái)越重要的作用。計(jì)算機(jī)的最大好處在于利用它能夠進(jìn)行信息管理。使用計(jì)算機(jī)進(jìn)行信息控制,不僅提高了工作效率,而且大大的提高了其安全性。尤其對(duì)于復(fù)雜的信息管理,計(jì)算機(jī)能夠充分發(fā)揮它的優(yōu)越性。學(xué)校作為一種信息資源的集散地,學(xué)生和課程繁多,包含很多的信息數(shù)據(jù)的管理。學(xué)生選課是一個(gè)學(xué)校不可缺少的部分,它的內(nèi)容對(duì)于學(xué)校的決策者和管理者來(lái)說(shuō)都至關(guān)重要,所以學(xué)生選課系
2、統(tǒng)應(yīng)該能夠?yàn)橛脩籼峁┏渥愕男畔⒑涂旖莸牟樵兪侄巍5恢币詠?lái)人們使用傳統(tǒng)人工的方式管理文件檔案,由于信息比較多,選課信息的管理工作混亂而又復(fù)雜;一般選課情況是記錄在文件上,課程的數(shù)目和代號(hào)也記錄在文件中,時(shí)間長(zhǎng)了,如再要進(jìn)行查詢,造成查詢費(fèi)時(shí)、費(fèi)力。這種管理方式存在著許多缺點(diǎn),如:效率低、保密性差,另外時(shí)間長(zhǎng),將產(chǎn)生大量的文件和數(shù)據(jù),這對(duì)于查找、更新和維護(hù)都帶來(lái)了不少的困難。作為計(jì)算機(jī)應(yīng)用的一部分,使用計(jì)算機(jī)對(duì)學(xué)生選課信息進(jìn)行管理,有著手工管理所無(wú)法比擬的優(yōu)點(diǎn).例如:檢索迅速、查找方便、可靠性高、存儲(chǔ)量大、保密性好、壽命長(zhǎng)、成本低等。這些優(yōu)點(diǎn)能夠極大地提高人事勞資管理的效率,也是科學(xué)化、正規(guī)化管
3、理,與世界接軌的重要條件。基于這些問(wèn)題,有必要建立一個(gè)學(xué)生選課系統(tǒng),使選課管理工作規(guī)范化,系統(tǒng)化,程序化,避免選課管理的隨意性,提高信息處理的速度和準(zhǔn)確性,能夠及時(shí)、準(zhǔn)確、有效的查詢和修改選課情況。二 需求分析目前計(jì)算機(jī)管理在日常生活中的地位變得越來(lái)越重要。它能夠代替人做各種重復(fù)、繁瑣的勞動(dòng),并且擁有操作簡(jiǎn)單、可信度好、不易出錯(cuò)等優(yōu)點(diǎn),大大減少了不必要的人力消耗,提高個(gè)人的工作效率。學(xué)生信息查詢是每個(gè)學(xué)校必須面臨的問(wèn)題,所以,如何開(kāi)發(fā)一個(gè)應(yīng)用簡(jiǎn)單、界面友好、容易操作、數(shù)據(jù)安全性好的管理系統(tǒng)就成為非常重要的技術(shù)問(wèn)題。本系統(tǒng)是為了管理好學(xué)生選課信息而設(shè)計(jì)的,系統(tǒng)開(kāi)發(fā)的總體任務(wù)是實(shí)現(xiàn)學(xué)生選課信息的系
4、統(tǒng)化、規(guī)范化和程序化,建立學(xué)生選課系統(tǒng)對(duì)于減輕管理人員的勞動(dòng)強(qiáng)度、提高工作質(zhì)量和效率、可以快捷、方便的對(duì)相關(guān)信息進(jìn)行查詢、提高了信息資源的利用率和管理水平。三 總體設(shè)計(jì)31 系統(tǒng)功能模塊劃分及說(shuō)明學(xué)生選課系統(tǒng)需要實(shí)現(xiàn)的功能主要有:(1)用戶登陸:分為以管理員身份登陸和以學(xué)生身份登陸,用戶登陸后,可進(jìn)行相關(guān)操作。若用戶不存在,可進(jìn)行新用戶注冊(cè),然后再登陸。(2)學(xué)生選課,需以學(xué)生身份登陸后,學(xué)生可對(duì)課程號(hào)、課程名稱、任課老師、學(xué)分、課程性質(zhì)等信息進(jìn)行查詢,同時(shí)也可進(jìn)行選課、退選等操作。(3)選課情況查詢,學(xué)生可輸入自己學(xué)號(hào)查詢自己所選課程情況。(4)審核,需以管理員身份登陸后,管理員可查看學(xué)生的
5、選課相關(guān)情況,對(duì)選課情況進(jìn)行審核。其主要系統(tǒng)功能模塊圖,如圖3.1所示。學(xué)生選課系統(tǒng)用戶登錄學(xué)生選課情況查詢審 核圖3.1 學(xué)生選課系統(tǒng)功能圖32 數(shù)據(jù)庫(kù)系統(tǒng)設(shè)計(jì) 數(shù)據(jù)庫(kù)采用了Microsoft推出的Access數(shù)據(jù)庫(kù),這是微軟集成到Office中的一個(gè)桌面數(shù)據(jù)庫(kù),能夠快速方便的和Office的其他套件綜合使用。由于Microsoft Access具有顯著的簡(jiǎn)易性和有效性,大量的桌面數(shù)據(jù)庫(kù)系統(tǒng)都采用Microsoft Access作為后臺(tái)數(shù)據(jù)庫(kù)。使用Microsoft Access的好處還在于,如果你的系統(tǒng)擴(kuò)展到Client/Server模式的時(shí)候,可以使用Microsoft的數(shù)據(jù)庫(kù)服務(wù)器軟件
6、SQL Server,此時(shí),程序只需要簡(jiǎn)單的修改一下鏈接就可以,這樣,為程序的平滑擴(kuò)展提供了非常有力的條件。用戶的需求具體體現(xiàn)在各種信息的提供、保存、修改、查詢等方面,經(jīng)調(diào)查和分析,針對(duì)一般學(xué)生選課系統(tǒng)的需求和對(duì)系統(tǒng)流程圖的分析,設(shè)計(jì)成如下的邏輯結(jié)構(gòu)。(1) 學(xué)生信息表:Student表,用來(lái)提供學(xué)生的基本信息及選課情況。表3-1 學(xué)生信息表字段名字段字段類型數(shù)據(jù)長(zhǎng)度學(xué)號(hào)sno文本10姓名sname文本10性別ssex文本2專業(yè)sdept文本20課程1cname文本20課程2cname文本20課程3cname文本20(2) 課程信息表:Course表,用來(lái)提供課程的基本信息。表3-1 課程信息
7、表字段名字段字段類型數(shù)據(jù)長(zhǎng)度課程號(hào)cno文本10課程名cname文本20任課老師ctname文本10學(xué)分grade文本2課程性質(zhì)xingzhi文本2具體數(shù)據(jù)表如下圖3.2,圖3.3圖3.2 Student表圖3.3 Course表四 詳細(xì)設(shè)計(jì)41 系統(tǒng)登錄界面系統(tǒng)登錄界面的主要功能是為了對(duì)系統(tǒng)進(jìn)行安全性管理,本系統(tǒng)的用戶名和密碼保存在Student表中,本系統(tǒng)根據(jù)不同的用戶而設(shè)置了不同的權(quán)限,分為管理員登陸和學(xué)生登陸。登陸界面如圖4.1,圖4.2。 圖4.1 管理員登錄界面圖 圖4.2 學(xué)生登錄界面如有需要,新用戶也可注冊(cè)后再登陸。代碼如下:Private Sub Command1_Click
8、()NAME1$ = Text1.TextNAME2$ = Text2.TextData1.RecordSource = SELECT * FROM Student WHERE 姓名= & & NAME1$ & AND 學(xué)號(hào)= & & NAME2$ & Data1.RefreshIf Data1.Recordset.EOF = True ThenMsgBox 用戶名或密碼錯(cuò)誤!, 64, 提示Text1.Text = Text2.Text = Text1.SetFocusElseForm4.Data1.RecordSource = SELECT * FROM Student WHERE 姓名=
9、 & & NAME1$ & Form4.Data1.RefreshForm4.ShowUnload MeEnd IfIf 管理員_Click = ture ThenForm4.Command4.Enabled = TrueForm4.Command2.Enabled = FlaseForm4.Command3.Enabled = FlaseEnd IfEnd SubPrivate Sub Command2_Click()Form1.ShowUnload MeEnd Sub42 學(xué)生登陸以學(xué)生身份登陸后的主窗體界面如圖4.3。圖4.3 系統(tǒng)主界面登陸后,點(diǎn)擊“學(xué)生選課”后,顯示其窗口,如圖4.4
10、。學(xué)生可進(jìn)行選課操作。圖4.4 “學(xué)生選課”窗口代碼如下:Private Sub Command1_Click()If Option1 And Option2 = False And Option3 = False ThenText6.Text = Trim(Text1.Text)Data2.Recordset.EditData2.RefreshMsgBox 請(qǐng)輸入第二個(gè)要選擇的課程, 64, 提示End IfIf Option1 = False And Option2 And Option3 = False ThenText7.Text = Trim(Text1.Text)If Text7.
11、Text = Text6.Text ThenMsgBox 此課程已選!, 64, 提示ElseData2.Recordset.EditData2.RefreshMsgBox 請(qǐng)輸入第三個(gè)要選擇的課程, 64, 提示End IfEnd IfIf Option1 = False And Option2 = False And Option3 ThenText8.Text = Trim(Text1.Text)If Text8.Text = Text7.Text Or Text8.Text = Text6.Text ThenMsgBox 此課程已選!, 64, 提示ElseData2.Recordse
12、t.EditData2.RefreshMsgBox 選課成功, 64, 提示End IfEnd IfEnd SubPrivate Sub Command2_Click()If Option1 And Option2 = False And Option3 = False ThenText6.Text = Data2.Recordset.EditData2.RefreshMsgBox 退選成功!, 64, 提示End IfIf Option1 = False And Option2 And Option3 = False ThenText7.Text = Data2.Recordset.Edit
13、Data2.RefreshMsgBox 退選成功!, 64, 提示End IfIf Option1 = False And Option2 = False And Option3 ThenText8.Text = Data2.Recordset.EditData2.RefreshMsgBox 退選成功!, 64, 提示End IfEnd SubPrivate Sub Command3_Click()NAME1$ = Form3.Text1.TextIf 學(xué)生_Click = True ThenForm4.Data1.RecordSource = SELECT * FROM Student WH
14、ERE 姓名= & & NAME1$ & Form4.Data1.RefreshEnd IfIf 管理員_Click = Flase ThenForm4.Command4.Enabled = FlaseForm4.Command2.Enabled = TrueForm4.Command3.Enabled = TrueElseForm4.Command4.Enabled = TrueForm4.Command2.Enabled = FlaseForm4.Command3.Enabled = FlaseEnd IfForm4.ShowUnload MeEnd Sub登陸后,點(diǎn)擊“已選課程信息”后,
15、顯示其窗口,如圖4.5。學(xué)生可對(duì)自己選課情況進(jìn)行查詢。圖4.5 “已選課程信息”窗口代碼如下:Private Sub Command1_Click()NAME1$ = Text1.TextData1.RecordSource = SELECT * FROM Student WHERE 學(xué)號(hào)= & & NAME1$ & Data1.RefreshEnd Sub43 管理員登陸以管理員身份登陸后的主窗體界面如圖4.6。圖4.6 系統(tǒng)主窗體登陸后,點(diǎn)擊“審核”后,顯示其窗口,如圖4.7。管理員可進(jìn)行選課的審核操作。圖4.7 “審核”窗口五 總結(jié)經(jīng)過(guò)幾天的努力,學(xué)生管理系統(tǒng)終于設(shè)計(jì)完成,基本上實(shí)現(xiàn)所需要的學(xué)生選課,課程管理,管理員審核等相關(guān)功能。在本系統(tǒng)的開(kāi)發(fā)過(guò)程中,由于初次設(shè)計(jì)系統(tǒng),在知識(shí)、經(jīng)驗(yàn)方面都存在著不足,系統(tǒng)也必然會(huì)存在一些缺陷和不足。但還是能實(shí)現(xiàn)所需基本功能。同時(shí),通過(guò)學(xué)生管理系統(tǒng)的設(shè)計(jì),我學(xué)會(huì)了如何使用Microsoft Access和VB來(lái)創(chuàng)建數(shù)據(jù)庫(kù)系統(tǒng),從而進(jìn)一步加深了我對(duì)VB、Access的了解,為今后的學(xué)習(xí)發(fā)展積累了知識(shí)、經(jīng)驗(yàn)。在這次系統(tǒng)設(shè)計(jì)中,我學(xué)會(huì)了設(shè)計(jì)系統(tǒng)的基本思維方法,以及與同學(xué)們之間相互幫助的精神。