【正文】
的挑戰(zhàn)是使用計(jì)算機(jī)神秘般的能力開始信息管理工作,包括高層管理活動(dòng)和決策等。信息作為一種資源,使得人們的工作、生活以及思維方式發(fā)生了重大的變革,為企業(yè)的生產(chǎn)與經(jīng)營提供了日益完善的手段。只有在合理的管理體制、完善的規(guī)章制度、穩(wěn)定的生產(chǎn)秩序、科學(xué)的管理方法和準(zhǔn)確的原始數(shù)據(jù)的基礎(chǔ)上,才能進(jìn)行MIS的開發(fā)。(3)管理信息由信息的采集、信息的傳遞、信息的儲(chǔ)存、信息的加工、信息的維護(hù)和信息的使用等五個(gè)方面組成。 管理信息系統(tǒng)的概念管理信息系統(tǒng)(Management Information Systems,簡稱MIS),是一個(gè)不斷發(fā)展的新型學(xué)科,MIS的定義隨著計(jì)算機(jī)技術(shù)和通信技術(shù)的進(jìn)步也在不斷更新,在現(xiàn)階段普遍認(rèn)為MIS 是人為或計(jì)算機(jī)設(shè)備以及其他信息處理手段組成并用于管理信息的系統(tǒng)。因此為提高工作效率,減輕校方人員的工作負(fù)擔(dān),決定開發(fā)學(xué)生檔案管理系統(tǒng)軟件。當(dāng)今社會(huì),計(jì)算機(jī)已經(jīng)成為我們學(xué)習(xí)和工作的得力助手,計(jì)算機(jī)的價(jià)格已經(jīng)十分低廉,性能卻有了長足的進(jìn)步。本系統(tǒng)主要包括學(xué)生信息查詢、教務(wù)信息維護(hù)和學(xué)生選課三部分。作為計(jì)算機(jī)應(yīng)用的一部分,使用計(jì)算機(jī)對(duì)學(xué)生檔案進(jìn)行管理,有著手工管理所無法比擬的優(yōu)點(diǎn),如:檢索迅速、查找方便、可靠性高、存儲(chǔ)量大、保密性好、受命長、成本低等。Course management。第一篇:學(xué)生信息管理系統(tǒng)文 摘 要學(xué)生信息,它的工作量可能是其它信息工作量的幾倍,班級(jí)的增加、班級(jí)的查找、班級(jí)的修改;學(xué)生檔案;課程管理;成績管理;繳費(fèi)管理;統(tǒng)計(jì)等等,每個(gè)信息的數(shù)據(jù)都在不斷地變化著,如果采用人工的方式進(jìn)行操作,那么,一天的工作量,足以讓人覺得比較繁瑣,吃不消。Student files。這種傳統(tǒng)的手工管理模式必然被以計(jì)算機(jī)為物質(zhì)基礎(chǔ)的信息管理方法所取代。本系統(tǒng)主要用于學(xué)校學(xué)生信息管理,總體任務(wù)是實(shí)現(xiàn)學(xué)生信息關(guān)系的系統(tǒng)化、規(guī)范化和自動(dòng)化,其主要任務(wù)是用計(jì)算機(jī)對(duì)學(xué)生各種信息進(jìn)行日常管理,如查詢、修改、增加、刪除,另外還考慮到學(xué)生選課,針對(duì)這些要求設(shè)計(jì)了學(xué)生信息管理系統(tǒng)本系統(tǒng)主要用于學(xué)校學(xué)生信息管理,總體任務(wù)是實(shí)現(xiàn)學(xué)生信息關(guān)系的系統(tǒng)化、規(guī)范化和自動(dòng)化,其主要任務(wù)是用計(jì)算機(jī)對(duì)學(xué)生各種信息進(jìn)行日常管理,如查詢、修改、增加、刪除,另外還考慮到學(xué)生選課,針對(duì)這些要求設(shè)計(jì)了學(xué)生信息管理系統(tǒng)。⒎學(xué)生課程的設(shè)置和修改。比起以前使用卡片的方法有了很大的進(jìn)步,方便管理,易于更新,極大的方便了學(xué)生檔案的管理工作。這些優(yōu)點(diǎn)能夠極大地提高公司的工作效率,也是公司管理科學(xué)化、正規(guī)化并與世界接軌的重要條件。系統(tǒng)由輸入、處理、輸出、反饋、控制等五個(gè)基本要素組成。ll MIS的開發(fā)必須具有一定的科學(xué)管理工作基礎(chǔ)。 管理信息系統(tǒng)的產(chǎn)生生產(chǎn)技術(shù)的進(jìn)步,社會(huì)活動(dòng)的復(fù)雜化,特別是電子信息技術(shù)的迅速發(fā)展與廣泛應(yīng)用,使得各種管理工作越來越依賴于對(duì)信息的管理。利用計(jì)算機(jī)的信息管理、處理能力還可以擴(kuò)大組織擁有信息的用途。面對(duì)龐大的信息量,有必要開發(fā)學(xué)生信息管理系統(tǒng)來提高學(xué)生管理工作的效率。例如:檢索迅速、查找方便、可靠性高、存儲(chǔ)量大、保密性好、壽命長、成本低等。但一直以來人們使用傳統(tǒng)人工的方式管理文件檔案,這種管理方式存在著許多缺點(diǎn),如:效率低、保密性差,另外時(shí)間一長,將產(chǎn)生大量的文件和數(shù)據(jù)第三章 系統(tǒng)開發(fā)工具——Visual Basic :Visual Basic主要功能特點(diǎn)包括: 提供了面向?qū)ο螅∣OP)的可視化編程工具把程序和數(shù)據(jù)封裝在一起而視為一個(gè)對(duì)象。VB具有很強(qiáng)的數(shù)據(jù)庫管理功能。函數(shù)及關(guān)鍵詞,其中很多與Windows GUI有直接的關(guān)系。 Basic ,能對(duì)多種數(shù)據(jù)庫進(jìn)行讀寫操作。(2)事件驅(qū)動(dòng)編程:在設(shè)計(jì)應(yīng)用程序時(shí),把對(duì)象添加到窗體中,在用戶與程序進(jìn)行交互時(shí),用戶基本上是通過鼠標(biāo)、鍵盤與應(yīng)用程序進(jìn)行交互的,那些對(duì)象就必須對(duì)鼠標(biāo)和鍵盤操作所引發(fā)的事件做出響應(yīng),來執(zhí)行一段應(yīng)用程序。正確使用對(duì)象可以減少程序和開發(fā)時(shí)間,提高程序設(shè)計(jì)者的工作效率。它是在程序執(zhí)行的過程中要計(jì)算機(jī)執(zhí)行的某種操作。Visual Basic 應(yīng)用程序基本的構(gòu)建塊是用戶所創(chuàng)建的對(duì)象,每一個(gè)對(duì)象都具有一些特性和行為(屬性、事件和方法)。通過在CoolBar中遷入其他空間你也可以向用戶提供更好的靈活性和義用性。新建一個(gè)數(shù)據(jù)庫,創(chuàng)建任何一個(gè)數(shù)據(jù)庫的第一步是仔細(xì)的規(guī)劃數(shù)據(jù)庫,設(shè)計(jì)必須是靈活的、有邏輯的。這種連接是指一個(gè)表被連接到它自己的一個(gè)字段,或在不同的紀(jì)錄中由重復(fù)數(shù)據(jù)的組合字段。按要求讀取數(shù)據(jù)空間 End Sub Private Sub grid1pz()39。 (1) Loop End SubPrivate Sub asPopup8_Click(Cancel As Boolean)Dim fo2 As CTranslucentForm Set fo2 = New CTranslucentForm = = 85 / 100 * 255 Load Form7 1 End SubPrivate Sub asPopup9_Click(Cancel As Boolean)End End SubPrivate Sub c1_Click(Index As Integer)39。 這里是通過重復(fù)計(jì)算來計(jì)算按鈕所需移動(dòng)的總高度If je i ThenDo While X iDo While Y = Xj = j + 360 39。進(jìn)行注冊(cè) “CNwinndy”, “W]vyYnonvkuntyZbl_e`hms^” 39。管理員驗(yàn)證 If admin = False Then c1(3).Enabled = False = False 39。 nnum amp。設(shè)定讀取列If (j1)End If Next 39。空值的處理 (i, j).Text = ”“ Else (i, j).Text = (j1 If (hang, 1).Text = ”“ Then MsgBox ”己完成修改操作!“, , ”提示“ Exit Sub End If sql = ”update “ amp。 (j1 If (hang, 1).Text = ”“ Then MsgBox ”己完成修改操作!“, , ”提示“ Exit Sub End If sql = ”update “ amp。 (j1sql = sql amp。拒絕刪除 gridedit = FalseExit Sub tkFinish:MsgBox End Sub Private Sub XPButton6_Click()On Error GoTo tkFinish MsgBox ”未授權(quán)版本,不支持目標(biāo)刪除操作!“, , ”提示“ Exit Sub tkFinish:MsgBox End SubPrivate Sub XPButton8_Click(Index As Integer)Call findcg_Click End Sub5.4成績統(tǒng)計(jì)表及程序如下:相關(guān)程序代碼如下:Private Sub Form_Load() = FalseSet qy2 = (”select 班級(jí)名稱 from 班級(jí)“)Do While Not (0) Loop Set qy2 = (”select 課程名稱 from 課程“)Do While Not (0) Loop End SubPrivate Sub XPButton1_Click()If = True Then = FalseIf ”“ And ”“ Then tbsql1 = ”select 姓名,avg(成績)as平均成績,max(成績)as 最高分,min(成績)as 最低分 from 學(xué)生與課程,學(xué)生信息 where = and = and 班級(jí)=39。 Group by 姓名 order by avg(成績)desc“ tbbm1 = amp。 amp?!?amp。 and 課程名稱=39。 amp。 amp。 ” 成績統(tǒng)計(jì)表“ Else MsgBox ”未選擇班級(jí)!“ = False Exit Sub End If Unload Me 1 End If End Sub 成績統(tǒng)計(jì);Private mblnChanged As Boolean Private Sub Form_Load()On Error GoTo finish ”CNwinndy“, ”W]vyYnonvkuntyZbl_e`hms^“ 39。設(shè)置打印區(qū)域 = 37 = 4 = True Exit Sub finish:MsgBox 39。本系統(tǒng)也主要利用java語言和access實(shí)現(xiàn),因此它具有很強(qiáng)的可移植性,很方便。這些優(yōu)點(diǎn)能夠極大地提高學(xué)生檔案管理的效率,也是企業(yè)的科學(xué)化、正規(guī)化管理,與世界接軌的重要條件。Java語言的主要特點(diǎn): 1)易于學(xué)習(xí)Java語言很簡單,對(duì)于熟悉C++的程序設(shè)計(jì)人員更不會(huì)對(duì)其感到陌生,因 為它的語法非常接近于C++,但他同時(shí)摒棄了C++許多的復(fù)雜易混淆的功能。他擁有邏輯、流程處理,即VBA語言(VB也可以用來做邏輯處理);又可以存儲(chǔ)數(shù)據(jù),即在“表”中存儲(chǔ)數(shù)據(jù)。作為學(xué)生成績管理系統(tǒng),必須能解決以下方面的問題:能錄入信息。例如要查詢學(xué)生成績,要求可以按照專業(yè)、班級(jí)等多種方式查詢。import 。public class myStudent { public myStudent(){}public static void main(String[] args){ // TODO code application logic here loginFrame lf=new loginFrame()。import 。import .*。此外還應(yīng)設(shè)計(jì)登陸后系統(tǒng)的主窗口,要求能夠顯示學(xué)生成績的基本信息,可以實(shí)現(xiàn)數(shù)據(jù)的錄入,更新,刪除、查詢、統(tǒng)計(jì)等功能。Java語言跨平臺(tái)性強(qiáng),可以在windows,linux,ubuntu等系統(tǒng)下使用,方便簡單,安全性好。3)與平臺(tái)的無關(guān)性由于iava語言是解釋執(zhí)行的,他會(huì)被轉(zhuǎn)換成一種字節(jié)碼的“目標(biāo)程序”。隨著系統(tǒng)實(shí)施的日益成熟,最終會(huì)使單機(jī)作業(yè)為主的教學(xué)管理活動(dòng)提高到這個(gè)平臺(tái)上來,從而實(shí)現(xiàn)學(xué)校學(xué)生成績信息管理的辦公自動(dòng)化,籍以提高辦學(xué)效率和質(zhì)量。無疑,使用信息化管理使教學(xué)更先進(jìn)、辦公更高效、管理更科學(xué),信息交流更迅速。教育領(lǐng)域也不例外,現(xiàn)今已經(jīng)出現(xiàn)了各種遠(yuǎn)程網(wǎng)絡(luò)在線教育系統(tǒng)、圖書館管理系統(tǒng)、學(xué)生信息管理系統(tǒng)等。添加一個(gè)3D柱形圖表,并設(shè)置細(xì)邊框With (7, 1, 15, .ChartType = cell3DColumnClustered.ScaleFont = FalseEnd WithSet qy2 = (tbsql2)Dim cg As Double39?!?amp。 amp。 Group by 姓名 order by avg(成績)desc“ tbbm1 = amp。 ” 成績統(tǒng)計(jì)表“ Else MsgBox ”未選擇班級(jí)!“ = False Exit Sub End If Unload Me 1 End If End Sub登陸界面成績查詢圖表如下:相關(guān)程序代碼如下: Private Sub Form_Load() = FalseSet qy2 = (”select 班級(jí)名稱 from 班級(jí)“)Do While Not (0) Loop Set qy2 = (”select 課程名稱 from 課程“)Do While Not (0) Loop End SubPrivate Sub XPButton1_Click()If = True Then = FalseIf ”“ And ”“ Then tbsql1 = ”select 姓名,avg(成績)as平均成績,max(成績)as 最高分,min(成績)as 最低分 from 學(xué)生與課程,學(xué)生信息 where = and = and 班級(jí)=39。 amp。 amp。 and 課程名稱=39?!癗ext sql = sql amp?!?amp?!?amp。 numpage amp。設(shè)定讀取行 For j = 1 To fnumber 39。使用智能輸入 If (Row, 1).Text “ And Row 0 Then Dim length1, length2 As Integer length1 = Len((Row, 1).Text)Do While length2 length1length2 = length2 + 1If Right(Left((Row, 1).Text, length2), 1)= ”“ Then(Row, 2).Text = Mid((Row, 1).Text, length2 + 1, length1)(Row, 1).Text = Mid((Row, 1).Text, 1, length21)Exit DoEnd If Loop End If End Sub Private Sub Grid2_MouseUp(Button As Integer, Shift As Integer, X As Single, Y As Single)If Button = 2 Then If admin = False Then = False = False = False End If PopupMenu cg End If End SubPrivate Sub Grid2_RowColChange(ByVal Row As Long, ByVal Col As Long)hang = Row End SubPrivate Sub datagrid()griddelete = True 39。 Month(Date)amp。 (hang, 1).Text amp。y存放的是移動(dòng)后的按鈕的固定值 z = s 39。 “ order by 學(xué)號(hào) asc” gridpz2 datagrid gridsave = False gridedit = True griddel = True (1).Locked = True (2).Locked = True (3).Locked = True (4).Loc