【正文】
流程。l3.MIS的相關(guān)學(xué)科MIS是一個(gè)交叉性的綜合性學(xué)科,組成部分有:計(jì)算機(jī)學(xué)科(網(wǎng)絡(luò)通信、數(shù)據(jù)庫、計(jì)算機(jī)語言等)、數(shù)學(xué)(統(tǒng)計(jì)學(xué)、運(yùn)籌學(xué)、線性規(guī)劃等)、管理學(xué)、仿真等多學(xué)科。信息的采集、傳輸、加工和利用成為人們特別是信息工作者的主要活動。然而,隨著計(jì)算機(jī)科學(xué)的不斷發(fā)展和進(jìn)步,是它跨越了數(shù)值計(jì)算領(lǐng)域,進(jìn)入管理領(lǐng)域,成為信息處理的重要工具。信息工作的迅速增長,使計(jì)算機(jī)的應(yīng)用范圍越來越廣泛,應(yīng)用的功能由一般的數(shù)據(jù)處理走向支持決策。也非常重要。本學(xué)生信息管理系統(tǒng)包括學(xué)籍信息管理、班級信息管理、課程信息管理、成績信息管理四大模塊。隨著科學(xué)技術(shù)的不斷提高,計(jì)算機(jī)科學(xué)日漸成熟,其強(qiáng)大的功能已為人們深刻認(rèn)識,它已進(jìn)入人類社會的各個(gè)領(lǐng)域并發(fā)揮著越來越重要的作用。因此,開發(fā)這樣一套學(xué)籍管理軟件成為很有必要的事情。不僅僅浪費(fèi)了大量的人力物力,而且由于人工管理存在著大量的不可控因素,造成了學(xué)籍管理的某些不規(guī)范,使得學(xué)籍管理陷入“事倍功半”的地步。 事件驅(qū)動的編程機(jī)制VB中通過事件來執(zhí)行對對象的操作,一個(gè)對象可以有許多事件過程,不同的事件過程對應(yīng)不同過程代碼。而Visual Basic使用交互式方法開發(fā)應(yīng)用程序,3個(gè)步驟之間沒有明顯的界限。 得心應(yīng)手的應(yīng)用程序向?qū)B中使用了許多應(yīng)用程序向?qū)В蔀橛脩糇詣觿?chuàng)建多種類型和不同功能的應(yīng)用程序的初始輪廓,另外還有安裝向?qū)?、?shù)據(jù)窗體向?qū)?、IIS應(yīng)用程序DHTML等,使用起來得心應(yīng)手,省去了一些煩瑣的工作。該系統(tǒng)主要提供了六部分,功能分別為導(dǎo)入學(xué)生數(shù)據(jù),增加刪除學(xué)生,住宿分配,住宿調(diào)整,退房管理,走讀管理,學(xué)生情況查詢,房源使用情況,空床統(tǒng)計(jì)情況,分類統(tǒng)計(jì)情況,衛(wèi)生成績錄入,衛(wèi)生查詢與統(tǒng)計(jì),公寓違紀(jì)錄入,公寓違紀(jì)查詢,添加用戶,修改密碼,退出系統(tǒng),這些功能基本上覆蓋了學(xué)生公寓管理的主要部分??梢暬挠脩艚缑嬖O(shè)計(jì)功能,把程序設(shè)計(jì)人員從繁瑣復(fù)雜的截面設(shè)計(jì)中解脫出來;可視化編程環(huán)境的“所見即所得(WYSIWYG)”功能,是界面設(shè)計(jì)如積木游戲一般,編程變成了一種享受;強(qiáng)大的多媒體功能可輕而易舉地開發(fā)出集聲音,動畫,影像和圖片于一體的多媒體應(yīng)用程序;新增的網(wǎng)絡(luò)功能提供了編寫Internet程序的能力。在應(yīng)用程序內(nèi)可以通過Internet 或Intranet訪問其他計(jì)算機(jī)中的文檔和應(yīng)用程序;可以創(chuàng)建Internet服務(wù)器應(yīng)用程序,包括IIS應(yīng)用程序;支持HTML技術(shù)(DHTML)的應(yīng)用程序;具有Web應(yīng)用程序發(fā)布功能等。:用戶自定義類型可以作為參數(shù)或作為公共屬性和方法的返回值;函數(shù)可以返回?cái)?shù)組變量;動態(tài)數(shù)組可以賦值;文件系統(tǒng)對象;按名調(diào)用(Call By Name);增強(qiáng)的創(chuàng)建對象函數(shù)(CreateObject Function Enhancements);增強(qiáng)的StrConv函數(shù)。 Visual Basic 語言的特點(diǎn)Visual Basic 語言用其設(shè)計(jì)應(yīng)用程序時(shí)具有兩個(gè)基本特點(diǎn):可視化設(shè)計(jì)和事件驅(qū)動編程。其基本含義如下:(1)視窗(Form)視窗是進(jìn)行人機(jī)交互的界面或接口,也叫窗體。當(dāng)把這些工具放置到用戶界面對應(yīng)的窗體上時(shí),被稱為對象或控件。用戶通過適當(dāng)?shù)卦O(shè)置或改變對象的屬性來確定對象的外觀及性能特征,從而有效地使用系統(tǒng)提供的對象。程序所用的鍵盤事件有KeyPress(按鍵)事件,KeyDown事件和KeyUp事件;鼠標(biāo)事件有Click(單擊鼠標(biāo))事件,DbDlicd(雙擊鼠標(biāo))。(6)過程(Procedure)過程是指經(jīng)過定義或說明的,或基于某一對象對應(yīng)的事件所引發(fā)的程序段。Visual Basic 作為一種面向?qū)ο蟮木幊谭椒?,把程序和?shù)據(jù)封裝起來作為一個(gè)對象,并為每個(gè)對象賦予相應(yīng)的屬性。使用應(yīng)用程序具有可通用性可說擴(kuò)展性和強(qiáng)有力的功能。 實(shí)現(xiàn)工具欄CoolBar控件與Office2000 中看到的CoolBar是類似的。在“控件”選項(xiàng)卡列表中選擇“Microsoft Windows Common Controls ”后工具相中增加改控件。計(jì)算機(jī)的數(shù)據(jù)庫可以分為兩類:非關(guān)系數(shù)據(jù)庫(flatfile)和關(guān)系數(shù)據(jù)庫(relational)。1. 標(biāo)識需要的數(shù)據(jù);2. 收集被標(biāo)識的字段到表中; 3. 標(biāo)識主關(guān)鍵字字段; 4. 繪制一個(gè)簡單的數(shù)據(jù)圖表; 5. 規(guī)范數(shù)據(jù);6. 標(biāo)識指定字段的信息; 7. 創(chuàng)建物理表。一個(gè)連接是指一種虛擬的表,這種表是在當(dāng)用戶要求從相互關(guān)聯(lián)的各個(gè)不同的表中獲取信息時(shí)建立的,關(guān)鍵字段用于在相互連接的不同表中查找匹配的記錄。在表中使用的關(guān)鍵字類型用于描述庫表示什么以及在數(shù)據(jù)庫中如何與其它的庫建立關(guān)系。 “ order by 學(xué)號 desc” grid1pz 39。 tkbase)grid1pz For i = 1 To fnumber (0, i).Text = (i1).Name Next = 1 = 21 gridsave = True gridedit = False griddel = False (1).Locked = False (2).Locked = True (3).Locked = False (4).Locked = True End SubPrivate Sub asPopup7_Click(Cancel As Boolean) = False = True tkbase = “學(xué)生與課程” fnumber = 6 sql = “select * from ” amp。 (1) Loop (3).CellType = cellComboBox Set qy1 = (“select 學(xué)號,名字 from 學(xué)生信息”)(3).Clear Do While Not (3).AddItem (0)amp。菜單智能移動函數(shù)代碼S代表菜單的總數(shù),i代表當(dāng)前移動的是數(shù)組名稱 Dim j As Integer Dim X, Y, z, x1, y1 As Integer X = s 39。X1沒用上 j = 0 39。這里是記憶上次移動的按鈕數(shù)組編號 End SubPrivate Sub cgdel_Click()Call XPButton6_Click End SubPrivate Sub cgedit_Click()Call XPButton4_Click End SubPrivate Sub delstudent_Click()Call XPButton6_Click End SubPrivate Sub editstudent_Click()Call XPButton4_Click End SubPrivate Sub findcg_Click()If hang = 0 Then Exit Sub End If = False = True tkbase = “學(xué)生與課程” fnumber = 5 sql = “select * from 學(xué)生與課程 where 學(xué)號=39?!?gridpz2 datagrid gridsave = False gridedit = True griddel = True (1).Locked = True (2).Locked = True (3).Locked = True End SubPrivate Sub Frame2_DragDrop(Source As Control, X As Single, Y As Single)End SubPrivate Sub Grid1_MouseUp(Button As Integer, Shift As Integer, X As Single, Y As Single)If Button = 2 Then If gridsave = True Then = True Else = False End If If gridedit = True Then = True Else = False End If If griddel = True Then = True Else = False End If If admin = False Then = False = False = False = False End If PopupMenu student End If End SubPrivate Sub Grid1_RowColChange(ByVal Row As Long, ByVal Col As Long)hang = Row If gridsave = True And Col = 5 Then 39。 Year(Date)amp。 Day(Date)amp。課程管理 = False 39。表狀態(tài) End If sql, n, adOpenStatic, adLockReadOnly, adCmdText For i = 1 To fnumber (0, i).Text = (i1)Is Nothing Then 39。 numpage amp。讀取下一記錄 Else Exit Sub End If Next End If End SubPrivate Sub Grid2_Validate(Cancel As Boolean)Dim nActiveRow As Long, nActiveCol As LongConst VK_TAB = 9If GetKeyState(VK_TAB) 0 ThennActiveRow = nActiveCol = If nActiveCol = numpage = 1 = 21 For i = 1 To 20 39。 nnum amp??罩档奶幚?(i, j).Text = ”“ Else (i, j).Text = (j1)= Null Then 39。 ” set “For j = 2 To fnumber1).Name amp。 ”39。 ” set “For j = 2 To fnumber1).Name amp。 ”39。 ”39。 ”39。 amp。 amp。 ” 成績統(tǒng)計(jì)表“ tbsql2 = ”select 成績 from 學(xué)生與課程,學(xué)生信息 where = and 班級=39。 and 課程名稱=39?!?ElseIf ”“ Then tbsql1 = ”select 姓名,avg(成績)as平均成績,max(成績)as 最高分,min(成績)as 最低分 from 學(xué)生與課程,學(xué)生信息 where = and = and 班級=39。 Group by 姓名 order by avg(成績)desc“ tbbm1 = amp。 ”39。 amp。 amp。 ” 成績統(tǒng)計(jì)表“ tbsql2 = ”select 成績 from 學(xué)生與課程,學(xué)生信息 where = and 班級=39。 and 課程名稱=39?!?ElseIf ”“ Then tbsql1 = ”select 姓名,avg(成績)as平均成績,max(成績)as 最高分,min(成績)as 最低分 from 學(xué)生與課程,學(xué)生信息 where = and = and 班級=39。 Group by 姓名 order by avg(成績)desc“ tbbm1 = amp。 ”39。設(shè)置單元格文字(1, 1).Text = tbbm1 39。設(shè)置單元格格式(17, 1). = 11(17, 1, 17, 5).Merge(17, 1, 17, 5).Alignment = cellCenterCenter(18, 1, 19, 5).Alignment = cellCenterCenter(18, 1, 18, 5).BackColor = vbYellowWith (18, 1, 18, 5).Borders(cellEdgeLeft)= cellThin.Borders(cellEdgeRight)= cellThin.Borders(cellEdgeTop)= cellThin.Borders(cellEdgeBottom)= cellThin.Borders(cellInsideHorizontal)= cellThin.Borders(cellInsideVertical)= cellThinEnd With39。因此,通過畢業(yè)設(shè)計(jì)實(shí)現(xiàn)了預(yù)期目標(biāo)致謝我由衷的感謝我的指導(dǎo)老師杜濤對我的學(xué)習(xí)、工作、以及課題的研究和論文撰寫過程中面臨的問題所給的細(xì)心指導(dǎo)和無私幫助感謝和我一起做畢業(yè)設(shè)計(jì)的何愛云 常旭存同學(xué)給我的幫主和啟迪 使我們正確按時(shí)地完成了此次畢業(yè)設(shè)計(jì)的全部內(nèi)容,也感謝機(jī)電工程系教研室全體老師、支持我的其他老師和同學(xué)對我的熱心幫助。所以學(xué)生信息管理信息系統(tǒng)的開發(fā)和應(yīng)用是必要的,它能夠?yàn)楣芾砣藛T提供充足的信息和快捷的查詢手段,提高學(xué)校對學(xué)生信息的管理效率。學(xué)校在管理、教學(xué)、辦公各個(gè)方面也在悄悄地變化。但一直以來人們使用傳統(tǒng)人工的方式管理文件檔案,這種管理方式存在著許多缺點(diǎn),如:效率低、保密性差,另外時(shí)間一長,將產(chǎn)生大量的文件和數(shù)據(jù),這對于查找、更新和維護(hù)都帶來了不少的困難。該學(xué)生成績管理系統(tǒng)能有效的處理在校學(xué)生的成績管理,具有成績輸入、成績查詢、成績統(tǒng)計(jì)及打印功能。第一章 相關(guān)技術(shù)簡介 java語言簡介Java語言是sun公司與1995年5月正式發(fā)布的程序設(shè)計(jì)語言,他的前身是sun公司為智能消費(fèi)類家用電器研究而開發(fā)的項(xiàng)目的一部分。2)高效率的執(zhí)行方式Java語言的執(zhí)行方式是采用先經(jīng)過編譯器編譯,在通過解釋器解釋執(zhí)行的 方式來運(yùn)行的。5)豐富的API文檔和類庫Java為用戶提供了詳盡的API(Application Program Interface)文檔說明。該軟件用java語言編寫,用access數(shù)據(jù)庫作為后臺的數(shù)據(jù)庫進(jìn)行信息的存儲,用SQL語句完成學(xué)生學(xué)籍信息的添加,查詢,修改,刪除的操作以及成績的錄入,修改,刪除等。并于數(shù)據(jù)庫相連接,能夠?qū)W(xué)生的學(xué)號、姓名、性別、班級、專業(yè)進(jìn)行查詢、添加和刪除等,簡捷方便,容易使用。圖 學(xué)生信息ER圖界面的友好與否是用戶評價(jià)一個(gè)軟件優(yōu)劣的重要方面。多用窗口和控件,充分體現(xiàn)窗口的多元化格局。部分文本框使用了下拉式,使用戶可以不用花費(fèi)大量的時(shí)間去輸入信息。import .*。import 。import .