【正文】 管理權(quán)限的用戶依次向數(shù)據(jù)庫(kù)中添加學(xué)生信息，班級(jí)信息，課程信息，學(xué)期及課程信息，并確認(rèn)信系的準(zhǔn)確性，并保存所輸入的信息。 普通用戶 ：只能同時(shí)具有系統(tǒng)管理、學(xué)生成績(jī)管理、學(xué)生成績(jī)查詢?nèi)N權(quán)限中的一種。 系統(tǒng)目標(biāo) 采用現(xiàn)有的軟件和科學(xué)的管理系統(tǒng)開發(fā)方案，完成對(duì)學(xué)生成績(jī)管理的部分功能 ，實(shí)現(xiàn)學(xué)生管理系統(tǒng)的開發(fā)規(guī)范。 Aceess 與其他數(shù)據(jù)庫(kù)開發(fā)系統(tǒng)之間有相當(dāng)顯著的區(qū)別是：您不用寫一行代碼，就可以在很短的時(shí)間里開發(fā)出一個(gè)功能強(qiáng)大而且相當(dāng)專業(yè)的數(shù)據(jù)庫(kù)應(yīng)用程序，并且這一愉快的過程是可視的。 7. 對(duì)象的鏈接與嵌入 (OLE) 對(duì)象的鏈接與嵌入 (OLE)將每個(gè)應(yīng)用程序都看做是一個(gè)對(duì)象 (object)，將不同的對(duì)象鏈接(link)起來(lái)，再嵌入 (embed)某個(gè)應(yīng)用程序中，從而可以得 到具有聲音、影像、圖像、動(dòng)畫、文字等各種信息的集合式的文件。這些過程分別面向不同的對(duì)象 ，由用戶操作引發(fā)某個(gè)事件來(lái)驅(qū)動(dòng)完成某種特定的功能，或者由事件驅(qū)動(dòng)程序調(diào)用通用過程來(lái)執(zhí)行指定的操作，這樣可以方吉林農(nóng)業(yè)工程職業(yè)技術(shù)學(xué)院（論文） ３ 便編程人員，提高效率。 3. 結(jié)構(gòu)化程序設(shè)計(jì)語(yǔ)言 Visual Basic 是在 BASIC 語(yǔ)言的基礎(chǔ)上發(fā)展起來(lái)的，具有高級(jí)程序設(shè)計(jì)語(yǔ)言的語(yǔ)句結(jié)構(gòu)，接近于自然語(yǔ)言和人類的邏輯思維方式。有時(shí)候，這種編程 編譯 修改的操作可能要反復(fù)多次，大大影響了軟件開發(fā)效率。 編程環(huán)境的選擇 微軟 公司的 Visual Basic 是 Windows 應(yīng)用程序開發(fā)工具，使目前最為廣泛的、易學(xué)易用的面向?qū)ο蟮拈_發(fā)工具。 ８０ 論文總結(jié) １３ 主界面 １２ 數(shù)據(jù)庫(kù)設(shè)計(jì)與實(shí)現(xiàn) ９ 系統(tǒng)管理 ８ 學(xué)生成績(jī)管理功能 ６ 系統(tǒng)管理模塊功能 ４ 第二章 系統(tǒng) 的 需求分析 １ Microsoft Access 的使用 s achievement, had a look around, maintaining and counting , is it have the characteristics that powerful , an interface is friendly systematically to make. In the course of designing student39。 開發(fā)主要包括后臺(tái)數(shù)據(jù)庫(kù)的建立和維護(hù)以及前端應(yīng)用程序的開發(fā)兩個(gè)方面，實(shí)現(xiàn)了學(xué)生成績(jī)數(shù)據(jù)庫(kù)的創(chuàng)建及學(xué)生成績(jī)的輸入、瀏覽、維護(hù)和統(tǒng)計(jì)，使得系統(tǒng)具 有功能強(qiáng)大，界面友好的特點(diǎn)。 在設(shè)計(jì)學(xué)生成績(jī)管理系統(tǒng)過程中，得到了各位老師的指導(dǎo)，在此表示感謝。s achievement administrative system , have got the guidance of king39。 １ 開發(fā)背景 ５ 業(yè)務(wù)總體流程圖 １１ chengjibiao 表 Visual Basic 提供了大量的控件，這些控件可用于設(shè)計(jì)界面和實(shí)現(xiàn)各種功能，減少了編程人員的工作量，也簡(jiǎn)化了界面設(shè)計(jì)過程，從而有效的提高了應(yīng)用程序的運(yùn)行 效率和可靠性。 Visual Basic 提供了可視化設(shè)計(jì)工具，把 Windows 界面設(shè)計(jì)的復(fù)雜性“封裝”起來(lái)，開發(fā)人員不必為界面設(shè)計(jì)而編寫大量程序代碼。 Visual Basic 語(yǔ)句簡(jiǎn)單易懂，其編輯器支持彩色代碼，可自動(dòng)進(jìn)行語(yǔ)法錯(cuò)誤檢查，同時(shí)具有功能強(qiáng)大且使用靈活的調(diào)試器和編譯器。 5. 訪問數(shù)據(jù)庫(kù) Visual Basic 具有強(qiáng)大的數(shù)據(jù)庫(kù)管理功能，利用數(shù)據(jù)控件和數(shù)據(jù)庫(kù)管理窗口，可以直接建立或處理 Microsoft Access 格式的數(shù)據(jù)庫(kù)，并提供了強(qiáng)大的數(shù)據(jù)存儲(chǔ)和檢索功能。 OLE 技術(shù)是 Microsoft 公司對(duì)象技術(shù)的戰(zhàn)略，它把多個(gè)應(yīng)用程序合為一體，將每個(gè)應(yīng)用程序看做是一個(gè)對(duì)象進(jìn)行鏈接和嵌入，是一種應(yīng)用程序一體化的技術(shù)。如果您能給它加上簡(jiǎn)短的 VBA 代碼，那么您的程序絕不比專業(yè)潛心開發(fā)的程序差。系統(tǒng)應(yīng)符合客戶的實(shí)際需求，并達(dá)到操作直觀、方便、實(shí)用等要求 。 只讀用戶 ： 只具有學(xué)生成績(jī)查詢權(quán)限。 3. 由具有學(xué)生成績(jī)管理權(quán)限的用戶從數(shù)據(jù)庫(kù)中讀取學(xué)生姓名、班級(jí)、學(xué)期、課程等相關(guān)信息并向?qū)W生成績(jī)表中輸入學(xué)生成績(jī)，之后通過學(xué)生成績(jī)查詢確認(rèn)學(xué)生成績(jī)信息。通過對(duì)用戶需求的分析，具體實(shí)現(xiàn)如下： 建立 Access 數(shù)據(jù)庫(kù) 啟動(dòng) Access，建立一個(gè)空數(shù)據(jù)庫(kù) ；如下圖： 在 student 數(shù)據(jù)庫(kù)中分別建立 use 表 ,student 表 ,course 表 ,class 表 ,chengjibiao 表 具體實(shí)現(xiàn)如下圖： Class 表 Use表 吉林農(nóng)業(yè)工程職業(yè)技術(shù)學(xué)院（論文） １３ Student 表 Course 表 Chengjibiao 表 界面的實(shí)現(xiàn) 歡迎界面 在窗體中顯示“歡迎使用學(xué)生成績(jī)管理系統(tǒng)”并顯示當(dāng)前的日期和時(shí)間，并不斷更新當(dāng)前時(shí)間，當(dāng)單擊窗體或顯示時(shí)間超過 1分鐘，則跳轉(zhuǎn)到登錄界面，歡迎界面如下圖： 吉林農(nóng)業(yè)工程職業(yè)技術(shù)學(xué)院（論文） １４ 程序代碼如下： Private Sub Form_Activate() DrawWidth = 6 = Mid(Str(Now), 1, 10) = Mid(Str(Now), 14, 8) (0, 0)(100, 100) (50, 20), 10, RGB(255, 0, 0) (50, 20), 10, RGB(0, 0, 255), , , = 1 (50, 20), 10, RGB(0, 255, 0), , , = Mid(Str(Now), 1, 10) = Mid(Str(Now), 14, 9) End Sub Private Sub Form_Click() Unload Me End Sub Private Sub Label1_Click() Unload Me End Sub Private Sub Timer1_Timer() 吉林農(nóng)業(yè)工程職業(yè)技術(shù)學(xué)院（論文） １５ = Mid(Str(Now), 1, 10) = Mid(Str(Now), 14, 9) End Sub Private Sub Timer2_Timer() Unload Me End Sub 登陸界面 用戶登錄系統(tǒng)的主要方式，要求登陸界面美觀、簡(jiǎn)潔、實(shí)用。在主界 面底端會(huì)顯示用戶名，用戶名和用戶的類別，來(lái)區(qū)分用戶。 amp。ss 為變量 =權(quán)限 kk = (3).Value txtSQL = delete from use where zh=39。標(biāo)示是否能關(guān)閉 Dim mbClose As Boolean Sub chaxun() Dim mrc As Dim txtSQL As String Dim MsgText As String txtSQL = select * from use where zh=39。否則和相應(yīng)的字段進(jìn)行綁定 = .Fields(0) = .Fields(0) = .Fields(1) = .Fields(2) End If End With End Sub Sub RefreshGrid() = = resql 39。刷新所綁定的控件 Call RefreshBinding End If End Sub Private Sub Command3_Click() Unload Me End Sub Private Sub Command1_Click() chaxun End Sub Private Sub Command2_Click() If MsgBox(要?jiǎng)h除記錄 ?, vbYesNo + vbQuestion + vbDefaultButton2, 確認(rèn) ) = vbYes Then If = admin Then MsgBox 默認(rèn)用戶不允許刪除！ , vbExclamation + vbOKOnly, 警告 Exit Sub End If 39。 amp。 39。 Trim() amp。 Trim(Text1(0)) amp。 39。 程序代碼如下 Private Sub about_Click() End Sub 吉林農(nóng)業(yè)工程職業(yè)技術(shù)學(xué)院（論文） １８ Private Sub add_Click() = True = False End Sub Private Sub banjichaxunyufenxi_Click() = False = = + = False = False = False = False = 班級(jí)成績(jī)查詢 End Sub Private Sub banjidankechaxunyufenxi_Click() = False = False = False = False = 班級(jí)單科成績(jī)查詢 /分析 End Sub Private Sub chongxindenglu_Click() If MsgBox(若重新登錄，所有窗體都將關(guān)閉！是否重新登錄？ , _ vbQuestion + vbYesNo + vbDefaultButton2, 重新登錄 ) = vbYes Then Unload Me 吉林農(nóng)業(yè)工程職業(yè)技術(shù)學(xué)院（論文） １９ End If End Sub Private Sub dankepaixu_Click() (0).Value = True (1).Value = False End Sub Private Sub cxbjxx_Click() End Sub Private Sub cxkcxx_Click() End Sub Private Sub cxxsxx_Click() End Sub Private Sub del_Click() = 0 = 0 = False = True End Sub Private Sub gerenchaxun_Click() End Sub Private Sub MDIForm_Load() (3).Text = Format(Now, dddddd) (2).Text = 當(dāng)前操作員： amp。在用戶登錄時(shí)，首先用戶輸入用戶名和密碼，單擊登錄按鈕，如果用戶名和密碼正確則從數(shù)據(jù)庫(kù)中讀取 用戶權(quán)限信息并賦值給 kk， 最后顯示主菜單，否 則彈出對(duì)話框，提示“用戶名或密碼錯(cuò)誤，請(qǐng)重組新輸入”并返回登錄界面。 并打印成績(jī)單。在初步設(shè)計(jì)時(shí)，只通過現(xiàn)有控件對(duì)窗體 進(jìn)行布局 規(guī)劃 ，而不涉及 程序的內(nèi)容 ， 待窗體設(shè)計(jì)完畢后，再進(jìn)行程序編程， 完成界面設(shè)計(jì)。 數(shù)據(jù) 輸入：部分?jǐn)?shù)據(jù)用戶