2023年全國碩士研究生考試考研英語一試題真題(含答案詳解+作文范文)_第1頁
已閱讀1頁,還剩55頁未讀 繼續(xù)免費閱讀

下載本文檔

版權(quán)說明:本文檔由用戶提供并上傳,收益歸屬內(nèi)容提供方,若內(nèi)容存在侵權(quán),請進行舉報或認領

文檔簡介

1、<p>  論文題目:簡易排課系統(tǒng)</p><p><b>  摘要</b></p><p>  隨著科學技術(shù)得不斷發(fā)展,計算機科學日漸成熟,其強大得功能已成為人們深刻認識,它進入人類社會得各個領域并發(fā)揮著越來越重要的作用。作為計算機應用的已部分,使用計算機對數(shù)據(jù)信息進行管理及處理,具有著手工管理所無法比擬的的優(yōu)點,能夠極大的提高數(shù)據(jù)信息管理的效率,也是學校

2、的科學化、正規(guī)化管理,與世界接軌的重要條件。</p><p>  本文介紹了為規(guī)范學生排課而開發(fā)的數(shù)據(jù)庫軟件《簡易排課系統(tǒng)》的設計與實現(xiàn)的全過程。該系統(tǒng)是典型的信息管理系統(tǒng),利用Visual Basic(以下簡稱VB)語言環(huán)境和關系數(shù)據(jù)庫Access2003來完成,總體設計結(jié)合了先進的管理思想,整個軟件采用模塊化設計,便于修改擴充,具有可配置性,可適應多種排課需求和使用。</p><p>

3、  該系統(tǒng)能實現(xiàn)排課的各種功能,包括排課課程的自動生成、課程的查詢、教師信息編輯、教室信息編輯、班級信息編輯、教學計劃編輯等,能錄入相關數(shù)據(jù)信息,能按不同需求進行查詢統(tǒng)計,并輸出打印報表??紤]到以后的發(fā)展,我們還設計了一些附加程序,數(shù)據(jù)庫接口,使系統(tǒng)功能有更大的擴展空間;為了能讓系統(tǒng)發(fā)揮出最佳性能,我們也做了一部分系統(tǒng)優(yōu)化工作。</p><p>  目前,此系統(tǒng)已經(jīng)調(diào)試運行成功,達到預期目的。</p>

4、<p>  【關鍵字】 窗體、模塊</p><p><b>  信息錄入</b></p><p><b>  數(shù)據(jù)查詢</b></p><p>  【論文類型】 應用軟件 </p><p><b>  目錄</b></p><p>  1

5、 緒言(引言)……………………………………………………………………………………5</p><p>  1.1 課題背景………………………………………………………………..……….5</p><p>  1.2 問題分析………………………………………………………………..……….5</p><p>  1.3 總體要求…………………………………………………………

6、………..…….5</p><p>  1.4 論文組織…………………………………………………………………..…….6</p><p>  2 系統(tǒng)概述………………………………………………………………………...…….7</p><p>  2.1 數(shù)據(jù)庫概述……………………………………………………………..……….7</p><p> 

7、 2.2 軟件概述………………………………………………………………..……….7</p><p>  2.2.1 軟件的模塊劃分…………………………………………………..………7</p><p>  2.2.2 軟件的運行環(huán)境…………………………………………………..………7</p><p>  2.3 系統(tǒng)功能概述…………………………………………………

8、………..……….8</p><p>  3 數(shù)據(jù)建?!?.….…….9</p><p>  3.1 數(shù)據(jù)庫簡述……………………………………………………………..……….9</p><p>  3.2 數(shù)據(jù)庫設計……………………………………………………………..……….9</p><p>

9、  3.2.1 建立表結(jié)構(gòu)……………………………………………………..………..9</p><p>  3.2.2 建立表內(nèi)容…………………………………………………….……….10</p><p>  4 系統(tǒng)流程……………………………………………………………………………..14</p><p>  4.1 頂層DFD圖.....……………………………

10、…………………………………..14</p><p>  4.2 系統(tǒng)分解圖………………………………………………………….…………14</p><p>  4.3 程序設計流程圖……………………………………………………….………15</p><p>  4.4基本數(shù)據(jù)庫如圖所示……………………………………………………………16</p><p&g

11、t;  4.4 系統(tǒng)結(jié)構(gòu)總圖…………………………………………………………….……17</p><p>  5 系統(tǒng)軟件完整實現(xiàn)…………………………………………………………...……...18</p><p>  5.1 系統(tǒng)運行環(huán)境要求…………………………………………………………….18</p><p>  5.2 軟件開發(fā)工具…………………………………………

12、……………………….18</p><p>  5.3 軟件安裝與卸載……………………………………………………………….19</p><p>  5.4 軟件操作說明………………………………………………………………….19</p><p>  5.4.1 登陸窗口………………………………………………………………..19</p><p>

13、  5.4.2. 系統(tǒng)主窗體…………………………………………………………… ..20</p><p>  5.4.2.1 教師信息編輯……………………………………………………….21</p><p>  5.4.2.1.1 班級信息編輯…………………………………………………21</p><p>  5.4.2.1.2 教師信息編輯…...…………………………………

14、………….21</p><p>  5.4.2.1.3 教室信息編輯…………………………………………………22</p><p>  5.4.2.1.4 教學計劃編輯…………………………………………………23</p><p>  5.4.2.2 自動生成課表……………………………………………………….24</p><p>  5.4.2.3 查

15、詢和打印課表…………………………………………………….25</p><p>  5.4.2.1.1班級課程表查詢………………………………………………….……25</p><p>  5.4.2.3.2 教師課表………………………………………………………25</p><p>  5.4.2.4 用戶管理……………………………………………………………26</p&g

16、t;<p>  5.4.2.4.1 增加用戶……………………………………………………….26</p><p>  5.4.2.4.2 用戶信息……………………………………………………….27</p><p>  5.4.2.5 幫助…………………………………………………………………27</p><p>  5.4.2.6 系統(tǒng)…………………………………

17、………………………………28</p><p>  5.5 使用注意事項……………………………………………………………..28</p><p>  5.6 安全設計……………………………………………..................................28</p><p>  5.7 程序目錄…………………………………………………………………..28&l

18、t;/p><p>  5.7.1 源程序目錄………………………………………………………….29</p><p>  5.7.2 部分主要源程序…………………………………………….…....….29</p><p>  6 系統(tǒng)技術(shù)鑒定……………………………………………………………….….….54</p><p>  6.1 系統(tǒng)主要技術(shù)指標………

19、………………………………………………..54</p><p>  6.2 系統(tǒng)測試情況……………………………………………………………..54</p><p>  6.3 系統(tǒng)應用效果……………………………………………………………..54</p><p>  7 小結(jié)…………………………………………………………………………….....…55</p>&l

20、t;p>  7.1 系統(tǒng)的優(yōu)化………………………………………………………….…….55</p><p>  7.2 改進的方向………………………………………………………………..55</p><p>  7.3 技術(shù)經(jīng)濟發(fā)展……………………………………………………………..56</p><p>  8 致謝………………………………………………………………………

21、..………...57</p><p>  9畢業(yè)設計小結(jié)…………………………………………..............................................44 </p><p><b>  1.緒言引言</b></p><p><b>  1.1課題背景</b></p><p&

22、gt;  隨著科技得發(fā)展,社會的進步,學校增加了許多全新的適合社會發(fā)展的新課程,但課程的不斷增加也給排課和教師以及教室的安排增加了很大得難度。為了提高教育和教務水平的效率,只有通過現(xiàn)代化的管理方法和手段,建立計算機網(wǎng)絡和信息系統(tǒng),使整個教務管理的工作標準化和規(guī)范化,從根本上提高管理效率。</p><p>  《簡易排課系統(tǒng)》就是針對這種現(xiàn)狀而設計開發(fā)的一套基于計算機網(wǎng)絡平臺得排課管理軟件。其開發(fā)主要包括后臺數(shù)據(jù)庫

23、的建立和維護以及前端應用程序的開發(fā)兩方面。對于前者要求建立起數(shù)據(jù)一致性和完整行強、數(shù)據(jù)安全性好的數(shù)據(jù)庫。而對于后者則要求應用程序功能完備,易使用等特點。</p><p><b>  1.2 問題分析</b></p><p>  目前排課管理中的問題突出表現(xiàn)在以下幾個方面;</p><p>  a.信息流不通暢,教務人員不能及時掌握所有的新課程排

24、布;</p><p>  b.數(shù)據(jù)處理欠及時和準確性;</p><p>  c.排課現(xiàn)狀不及時準確的體現(xiàn)出來;</p><p>  d.手工操作存在一定的誤差;</p><p><b>  e.資料不能共享;</b></p><p><b>  1.3 總體要求</b><

25、;/p><p>  在計算機網(wǎng)絡網(wǎng)絡平臺的基礎上《簡易排課系統(tǒng)》排課課程的自動生成、課程的查詢、教師信息編輯、教室信息編輯、班級信息編輯、教學計劃編輯。形成一套通用課程排布管理系統(tǒng)。使整個教學工作中課程的排布和信息及時傳遞,管理人員及時排課的全面狀況;實現(xiàn)數(shù)據(jù)采集發(fā)布規(guī)范化;減少管理中的脫節(jié)現(xiàn)象,極大地提高教務管理效率。減少排課中出現(xiàn)的沖突。</p><p><b>  1.4 論文

26、的組織</b></p><p>  本文余下部分安排如下;第二章 系統(tǒng)概述,包括數(shù)據(jù)庫概述、軟件概述和系統(tǒng)功能概述;第三章 數(shù)據(jù)建模,包括數(shù)據(jù)庫設備、數(shù)據(jù)庫、數(shù)據(jù)表結(jié)構(gòu)的建立;第四章 系統(tǒng)工作流程;第五章 系統(tǒng)軟件完整實現(xiàn),包括系統(tǒng)運行環(huán)境要求、軟件開發(fā)工具、軟件的安裝及卸載、軟件操作說明、安全設計及程序目錄;第六章 系統(tǒng)技術(shù)鑒定。最后一章對全文做了系統(tǒng)總結(jié)。</p><p>

27、<b>  2 系統(tǒng)概述</b></p><p><b>  2.1 數(shù)據(jù)庫概述</b></p><p>  DATAbasic數(shù)據(jù)庫是整個系統(tǒng)的數(shù)據(jù)核心,包括基本數(shù)據(jù)表6個。</p><p>  實體到表格的抽象映射的合理性,表結(jié)構(gòu)的規(guī)范性;</p><p>  字段Datatype、Size、N

28、ulls、Deault定義的科學性;</p><p>  Primary Key/Identity、Foreign Key、Unique Costraints、Cheak Constraitmts等的建立保證數(shù)據(jù)的一致、完整和正確性;</p><p>  建立任務管理。實現(xiàn)數(shù)據(jù)庫的自動備份和安全保護。</p><p><b>  2.2 軟件概述</

29、b></p><p>  《簡易排課系統(tǒng)》是為規(guī)范管理排課安排而開發(fā)的數(shù)據(jù)庫軟件。數(shù)據(jù)庫擬采用Microsoft Access,開發(fā)工具采用Microsoft Visual Bisic語言,整個軟件運行在Window 9X或Window ME 或Window2000/ Window XP/ Window NT環(huán)境下。</p><p>  《簡易排課系統(tǒng)》包括教師信息編輯、自動生成課表

30、、查詢和打印課表、用戶管理、幫助、系統(tǒng)等六個功能模塊。各個模塊之間有自己獨立的功能,但模塊之間也互相存在著關系,可以對數(shù)據(jù)實現(xiàn)共享。</p><p>  使用該軟件時需要輸入管理原編碼及密碼,經(jīng)系統(tǒng)確認后根據(jù)權(quán)限進入可使用的模塊。</p><p>  2.2.1 軟件的模塊劃分</p><p>  《簡易排課系統(tǒng)》包括包括教師信息編輯、自動生成課表、查詢和打印課表、

31、幫助、系統(tǒng)六個功能模塊。</p><p>  教師信息編輯模塊用于對班級信息、教師信息、教室信息、教學計劃進行編輯工作。</p><p>  自動生成課表模塊用于課表的自動生成和編輯。</p><p>  查詢和打印課表模塊用于對課程表的打印和查詢。</p><p>  用戶管理模塊用于對管理和用戶的管理。</p><p&

32、gt;  2.2.2 軟件運行環(huán)境</p><p>  計算機平臺是《簡易排課系統(tǒng)》的運行環(huán)境。</p><p><b>  最低配置:</b></p><p>  處理器為486/50MHZ或更高檔的計算機</p><p><b>  256以上的內(nèi)存。</b></p><p&

33、gt;<b>  鼠標器。</b></p><p>  硬盤空間:最少需要150M硬盤空間,但根據(jù)數(shù)據(jù)庫文件的增大要逐漸擴大。</p><p>  建議采用VGA或更高分辨率的顯示器。</p><p>  2.3 系統(tǒng)功能概述</p><p>  包括教師信息編輯、自動生成課表、查詢和打印課表、幫助、系統(tǒng)六個功能模塊。&

34、lt;/p><p>  整個軟件采用模塊設計,易擴充和修改;具有登錄管理和權(quán)限管理,以保證軟件的安全性;界面友好舒適,操作使用方便。</p><p><b>  3 數(shù)據(jù)建模</b></p><p><b>  3.1數(shù)據(jù)庫簡述</b></p><p>  《簡易排課系統(tǒng)》數(shù)據(jù)庫采用Microsoft

35、Access 2003數(shù)據(jù)庫系統(tǒng)進行設計。它具有以下主要特點;</p><p>  關系數(shù)據(jù)庫開發(fā)工具,數(shù)據(jù)庫能匯聚各種信息以供查詢、存儲和檢索。</p><p>  Access的優(yōu)點在于它能使用數(shù)據(jù)庫表示圖或自定義窗體收集信息。數(shù)據(jù)表示圖提供了一種類似Excel的電子表格,可以使數(shù)據(jù)庫一目了然。</p><p>  Access允許創(chuàng)建自定義報表用于打印或者輸出

36、數(shù)據(jù)庫中的信息。</p><p>  Access也提供了數(shù)據(jù)流存儲,可以使用桌面數(shù)據(jù)庫文件吧數(shù)據(jù)庫文件置于網(wǎng)絡文件服務器,與其他網(wǎng)路用戶共享數(shù)據(jù)庫。</p><p>  Access是一種關系數(shù)據(jù)庫工具,關系數(shù)據(jù)流是已開發(fā)的最通用的書看了之一。</p><p>  正是由于以上優(yōu)點,我們采用它來設計數(shù)據(jù)庫</p><p><b>

37、  3.2數(shù)據(jù)庫設計</b></p><p>  《簡易排課系統(tǒng)》數(shù)據(jù)流采用Access 2003數(shù)據(jù)庫管理系統(tǒng)設計。一個數(shù)據(jù)庫由若干個表組成,每個表又由若干個字段組成,每個表有一個或多個字段作為該表的關鍵字用于標示該表,具體設計步驟如下:</p><p>  3.2.1 建立表結(jié)構(gòu)</p><p>  這里我們使用DAO來實現(xiàn)對數(shù)據(jù)庫的訪問。</

38、p><p>  建立數(shù)據(jù)庫:DATAbasic.mdb CourseTable.mdb LogAccess.mdb book..mdb</p><p>  3.2.2 建立表內(nèi)容</p><p>  book..mdb 數(shù)據(jù)庫各表結(jié)構(gòu)及記錄例子如下:</p><p><b>  表名:用戶</b></p>&l

39、t;p><b>  例子:</b></p><p>  DATAbasic數(shù)據(jù)庫各表結(jié)構(gòu)及記錄例子如下:</p><p><b>  表名:class</b></p><p><b>  例子:</b></p><p>  表名:classroom</p>

40、<p><b>  例子:</b></p><p><b>  表名:course</b></p><p><b>  例子: </b></p><p><b>  表名:major</b></p><p><b>  例子:</

41、b></p><p>  表名:teacher</p><p><b>  例子:</b></p><p>  表名:teachplan</p><p><b>  例子:</b></p><p>  CourseTable數(shù)據(jù)庫各表結(jié)構(gòu)及記錄例子如下:</p&g

42、t;<p>  表名:courseclass</p><p><b>  例子:</b></p><p><b>  4.系統(tǒng)流程</b></p><p><b>  4.1頂層DFD圖</b></p><p><b>  4.2系統(tǒng)分解圖</b&

43、gt;</p><p>  4.3程序設計流程圖</p><p>  4.4基本數(shù)據(jù)庫如圖所示:</p><p><b>  4.5系統(tǒng)結(jié)構(gòu)總圖</b></p><p>  5 系統(tǒng)軟件完整實現(xiàn)</p><p>  5.1 系統(tǒng)運行環(huán)境要求</p><p><b>

44、;  最低配置:</b></p><p>  處理器為486/50MHZ或更高檔的計算機</p><p><b>  256以上的內(nèi)存。</b></p><p><b>  鼠標器。</b></p><p>  硬盤空間:最少需要150M硬盤空間,但根據(jù)數(shù)據(jù)庫文件的增大要逐漸擴大。<

45、;/p><p>  建議采用VGA或更高分辨率的顯示器。</p><p>  5.2 軟件開發(fā)工具</p><p>  Visual Basic 是微軟公司推出的系列可視化開發(fā)工具Visual Studio中的組件之一。利用它不僅可以開發(fā)各種基于桌面的應用程序,也可以創(chuàng)建企業(yè)級的、分布式的或基于Internet的應用程序或部件。它主要有以下幾個特點;</p>

46、<p>  成功地簡化了界面的設計過程。它在Window平臺上提供了圖形用戶界面(GUL)的集成開發(fā)環(huán)境(IDE)。在集成開發(fā)環(huán)境中,可以選擇想要顯示的工具欄,將按鈕添加并移動到工具欄中,在不固定的工具欄仲以及SDI或MDI界面中進行選擇。Visual Basic的IDE就像飛機的座艙,完成你工作所需要的所有量表和儀器都以及配備好了。</p><p>  采用簡單易學得Basic語言。它既適應于沒有

47、任何編程經(jīng)驗的開發(fā)者學習,野適合于開發(fā)各種復雜的底層應用程序。使用Basic語言編寫的應用程序簡潔靈巧、易于維護,可以說它是一種“天生結(jié)構(gòu)化”的語言。</p><p>  提供了多種向?qū)?。利用這些向?qū)В憧梢钥焖俚赝瓿梢话阈缘娜蝿?,例如生成其控件不綁定到?shù)據(jù)控件上的純代碼,建立查詢,幾天假工具,制作圖表,以及發(fā)布創(chuàng)建的應用程序等。這樣可以打打加快應用程序的開發(fā)過程。</p><p>  具

48、有強大的數(shù)據(jù)和字符串處理功能,Visual Basic提供了許多縣現(xiàn)成的字符串處理函數(shù),利用這些函數(shù)你可以像Word一樣方便的對字符串進行操作。</p><p>  易于擴充。除了簡單易學的特點以外,Visual Basic還是一種易于擴充功能的開發(fā)系統(tǒng)。一方面,它可以使用第三方廠家提供的各種Visual Basic使用的控件(.OCX);另一方面,開發(fā)者野可以使用其他編輯語言編寫自己所需的控件,因此它是一種可以

49、不斷擴充功能的開發(fā)系統(tǒng)。</p><p>  提供了IntelliSense技術(shù)。當你在Visual Basic的代碼窗口敲進對象名稱的時候,IntelliSense技術(shù)會自動向你顯示一些相關信息。例如對象的屬性和方法等。當一種方法或者函數(shù)的參數(shù)被輸入時,IntelliSense將顯示函數(shù)得參數(shù)。IntelliSense有助于確保開發(fā)者們?yōu)閂isual Basic提供正確的變量以及幫助用戶自己編寫正確的函數(shù)。&l

50、t;/p><p>  Visual Basic還具有強大得數(shù)據(jù)庫操作功能。它本身提供了強大的數(shù)據(jù)流訪問功能,用戶可以使用它圖個的數(shù)據(jù)控件和數(shù)據(jù)存取對象,非常方便的對數(shù)據(jù)庫進行增加、刪除、查詢、排序、統(tǒng)計等常規(guī)數(shù)據(jù)庫操作。除此以外。它還支持實體完整性,具有建立一個功能強大的商業(yè)數(shù)據(jù)庫應用程序索不可缺少的事務處理能力。</p><p>  因此,《簡易排課系統(tǒng)》采用了Visual Basic進行編

51、寫。它易學好用并具有豐富的控件以及對Window最新技術(shù)的支持,尤其在數(shù)據(jù)庫訪問方面,Visual Basic提供了豐富的開發(fā)工具,包括;基于API的數(shù)據(jù)庫接口;數(shù)據(jù)訪問對象;數(shù)據(jù)控件。</p><p>  5.3 軟件得安裝及卸載</p><p>  《簡易排課系統(tǒng)》制作為可安裝的程序,它包含有一個set.exe程序及其它一些相關的程序文件,在Window XP環(huán)境中,選擇這個set.e

52、xe程序,雙擊該安裝程序,安提示操作,可更改安裝目錄,安裝完成后將在桌面“開始”菜單的“程序”二級菜單中出現(xiàn)“簡易排課系統(tǒng)”快捷方式,單擊“簡易排課系統(tǒng)”即可啟動《簡易排課系統(tǒng)》。</p><p>  為了操作快捷,可以在桌面建立《簡易排課系統(tǒng)》的快捷方式,建立過程就不用我們介紹了。</p><p>  如果卸載《簡易排課系統(tǒng)》,可單擊“開始”按鈕,在“開始”菜單下單擊“設置”二級菜單下的

53、“控制面板”,選擇“添加/刪除程序”圖標并雙擊該圖標,出現(xiàn)“添加/刪除程序”界面。在“添加/刪除程序界面中單擊“安裝/卸載”選項卡,選擇“簡易排課系統(tǒng)”后單擊“添加/刪除程序”按鈕即可卸載《簡易排課系統(tǒng)》。</p><p>  5.4 軟件操作說明</p><p>  5.4.1 登錄窗口</p><p>  輸入 用戶名,即message表中一適當權(quán)限的人員的編碼

54、,輸入密碼,按“確定按鈕即可進入主窗體,執(zhí)行相應操作;按“取消”按鈕結(jié)束系統(tǒng)任務退出系統(tǒng)。注:操作人編碼或者密碼密碼有誤時系統(tǒng)會提示用戶錯誤,按“確定“按鈕可重新輸入。</p><p>  5.4.2 主窗體 </p><p>  菜單項----教學信息編輯、自動生成課表、查詢和打印課表、用戶管理、系統(tǒng)。點擊菜單項即可執(zhí)行相關操作。</p><p><b>

55、;  教學信息編輯</b></p><p>  子菜單項----班級信息編輯、教師信息編輯、教室信息編輯、教學計劃編輯。</p><p>  單擊子菜單項即可執(zhí)行相關操作。</p><p>  5.4.2.1.1 班級信息編輯</p><p>  選擇任意一個選項,即可在下方顯示它得部分信息。</p><p&g

56、t;  可以通過“第一個”“前一個”“最后一個”“下一個”按鈕來快速的選擇你所需要的項目。單擊“編輯”按鈕可對所選項目進行編輯;選擇“添加”可添加相關的班級信息;單擊“刪除”按鈕可刪除所選擇項目包括其內(nèi)容;單擊“退出“按鈕既關閉該窗口。</p><p>  5.4.2.1.2 教師信息編輯</p><p>  可以通過“第一個”“前一個”“最后一個”“下一個”按鈕來快速的選擇你所需要的項目

57、。單擊“編輯”按鈕可對所選項目進行編輯;選擇“添加”可添加相關的班級信息;單擊“刪除”按鈕可刪除所選擇項目包括其內(nèi)容;單擊“退出“按鈕既關閉該窗口。</p><p>  5.4.2.1.3 教室信息編輯</p><p>  可以通過“第一個”“前一個”“最后一個”“下一個”按鈕來快速的選擇你所需要的項目。單擊“編輯”按鈕可對所選項目進行編輯;選擇“添加”可添加相關的班級信息;單擊“刪除”按

58、鈕可刪除所選擇項目包括其內(nèi)容;單擊“退出“按鈕既關閉該窗口。</p><p>  5.4.2.1.4 教學計劃編輯</p><p>  選擇任意一個選項,即可在下方顯示它得部分信息。</p><p>  可以通過“第一個”“前一個”“最后一個”“下一個”按鈕來快速的選擇你所需要的項目。單擊“編輯”按鈕可對所選項目進行編輯;選擇“添加”可添加相關的班級信息;單擊“刪除

59、”按鈕可刪除所選擇項目包括其內(nèi)容;單擊“退出“按鈕既關閉該窗口。</p><p>  5.4.2.2 自動生成課表</p><p>  自動生成課表窗口中包括“開始”“清楚已排內(nèi)容”“保存并退出”三個功能選項和</p><p>  “2005級”“2004級”“2003級”年級菜單選項。</p><p>  選擇“2005級”“2004級”“

60、2003級”其中一個,再單擊開始排課,即可在左方自動生成所選年級的課表。</p><p>  單擊“清除已排內(nèi)容”可以清除左邊窗口中顯示的內(nèi)容。</p><p>  單擊“保存并退出”選項實現(xiàn)對自動生成課表的保存并退出該界面。</p><p>  單擊“退出排課”即關閉生成課表窗口。</p><p>  5.4.2.3 查詢和打印課表<

61、/p><p>  5.4.2.3.1 班級課程表查詢</p><p>  單擊“查詢課程表”或者直接在“請輸入查詢的班級編號”框中輸入你所要查詢的班級編碼,系統(tǒng)會自動生成所選項目對應EXCEL表格。在EXCEL表格中可實現(xiàn)表格的打印。</p><p>  單擊“離開課程表”退出班級查詢窗口。</p><p>  5.4.2.3.2教師課程表查詢&

62、lt;/p><p>  單擊“查詢課程表”或者直接在“輸入要查詢的教師編號”框中輸入你所要查詢的班級編碼,系統(tǒng)會自動生成所選項目對應EXCEL表格。在EXCEL表格中可實現(xiàn)表格的打印。</p><p>  單擊“離開課程表”退出班級查詢窗口。</p><p>  5.4.2.4 用戶管理 </p><p>  5.4.2.4.1 添加用戶<

63、/p><p>  在“輸入用戶名”“輸入密碼”“確認密碼”中輸入相應內(nèi)容,并選擇用戶權(quán)限,單擊“確定”菜單實現(xiàn)添加用戶。</p><p>  單擊“取消”菜單即取消添加用戶,自動清楚輸入的用戶名和密碼。用戶需要再次輸入。</p><p>  單擊“返回”退出關閉添加用戶窗口。</p><p>  5.4.2.4.2 用戶信息</p>

64、<p>  選擇一個用戶選項,單擊菜單即可執(zhí)行相關操作。</p><p>  5.4.2.6 幫助</p><p>  單擊主窗口中的“幫助”菜單系統(tǒng)自動生成幫助界面,簡單介紹系統(tǒng)的用處和開發(fā)環(huán)境。 </p><p>  5.5 使用注意事項</p><p>  在使用《簡易排課系統(tǒng)》時要注意以下方面:</p>&l

65、t;p>  該軟件是一個運行在Window環(huán)境下的網(wǎng)絡數(shù)據(jù)庫軟件。</p><p>  各個用戶有自己的權(quán)限,只能操作自己權(quán)限內(nèi)的模塊。</p><p>  輸入的內(nèi)容后只有單擊“確定”或“保存”按鈕后才存入數(shù)據(jù)庫中。否則導致數(shù)據(jù)的丟失。</p><p>  輸入數(shù)據(jù)有一定的長度限制,并且要注意數(shù)據(jù)的類型。</p><p>  軟件中有

66、一些幫助信息和提示,請參看這些信息,已利于軟件的正確使用。</p><p>  如暫時不使用該軟件時,請保存好數(shù)據(jù)后返回軟件主界面,退出軟件,以免數(shù)據(jù)丟失或者他人非法使用軟件使數(shù)據(jù)庫數(shù)據(jù)丟失或混亂。</p><p><b>  5.6 安全設計</b></p><p>  針對整個網(wǎng)絡的安全設計,此系統(tǒng)軟件設置施行的是權(quán)限管理,根據(jù)不同的用戶劃

67、分數(shù)個用戶組,限制用戶對其他資源的訪問,建立有效的用戶名/口令更換機制,對系統(tǒng)實施授權(quán)、訪問權(quán)限控制,對用戶及其活動進行登記。</p><p><b>  5.7 程序目錄</b></p><p>  5.7.1 源程序目錄</p><p>  1. 工程文件,文件名為 簡易排課系統(tǒng).VBP</p><p><b&

68、gt;  2. 窗體文件</b></p><p>  (1)主窗體,文件名為frmMain;</p><p> ?。?)登錄窗體,文件名為frmlogin;</p><p>  (3)班級信息編輯,文件名為frmClass;</p><p>  (4)教師信息編輯,文件名為frmTeacher;</p><p&

69、gt; ?。?)教室信息編輯,文件名為frmClassroom;</p><p> ?。?)教學計劃編輯,文件名為frmTeachplan;</p><p> ?。?)自動生成課表,文件名為frmCourse;</p><p> ?。?)班級課表 文件名為frmClassfind;</p><p> ?。?)教師課表 文件

70、名為frmTeacherfind;</p><p> ?。?0)添加用戶 文件名為frmadduser;</p><p> ?。?1)用戶信息 文件名為frmuser;</p><p> ?。?2)幫助 文件名為</p><p>  5.7.2 部分主要源程序</p><p>  1.班

71、級課程表查詢(frmClassfind.FRM)如下。</p><p>  Dim xlapp As Excel.Application</p><p>  Dim xlbook As Excel.Workbook</p><p>  Dim xlsheet As Excel.Worksheet</p><p>  Dim db As DAO

72、.Database</p><p>  Dim rst As DAO.Recordset</p><p>  Option Explicit</p><p>  Private Sub Command1_Click()</p><p>  Dim a As String</p><p>  Dim i As Integ

73、er, j As Integer</p><p>  Set db = DBEngine.Workspaces(0).OpenDatabase("C:\Documents and Settings\Administrator\桌面\畢業(yè)設計\LogAccess\coursetable.mdb")</p><p>  Set rst = db.OpenRecordset(

74、"select * from courseclass")</p><p>  rst.Filter = "classid='" & TxtClassid.Text & "'"</p><p>  Set rst = rst.OpenRecordset()</p><p>  

75、Set xlapp = New Excel.Application</p><p>  Set xlbook = xlapp.Workbooks.Open("C:\Documents and Settings\Administrator\桌面\畢業(yè)設計\LogAccess\課程表模板.xlt")</p><p>  xlapp.Visible = True</p&

76、gt;<p>  Set xlsheet = xlbook.Worksheets("班級課程表")</p><p>  xlsheet.Activate</p><p>  xlsheet.Cells(5, 1) = TxtClassid.Text & "班"</p><p>  xlsheet.Cell

77、s(5, 6) = Date</p><p>  If rst.Fields("11") = "1" Or rst.Fields("11") = "a" Then</p><p>  xlsheet.Cells(9, 3) = "自習"</p><p><b&g

78、t;  Else</b></p><p>  xlsheet.Cells(9, 3) = rst.Fields("11")</p><p><b>  End If</b></p><p>  If rst.Fields("21") = "1" Or rst.Fields(

79、"21") = "a" Then</p><p>  xlsheet.Cells(9, 4) = "自習"</p><p><b>  Else</b></p><p>  xlsheet.Cells(9, 4) = rst.Fields("21")</p&g

80、t;<p><b>  End If</b></p><p>  If rst.Fields("31") = "1" Or rst.Fields("31") = "a" Then</p><p>  xlsheet.Cells(9, 5) = "自習"&l

81、t;/p><p><b>  Else</b></p><p>  xlsheet.Cells(9, 5) = rst.Fields("31")</p><p><b>  End If</b></p><p>  If rst.Fields("41") = &q

82、uot;1" Or rst.Fields("41") = "a" Then</p><p>  xlsheet.Cells(9, 6) = "自習"</p><p><b>  Else</b></p><p>  xlsheet.Cells(9, 6) = rst.Fiel

83、ds("41")</p><p><b>  End If</b></p><p>  If rst.Fields("51") = "1" Or rst.Fields("51") = "a" Then</p><p>  xlsheet.Cell

84、s(9, 7) = "自習"</p><p><b>  Else</b></p><p>  xlsheet.Cells(9, 7) = rst.Fields("51")</p><p><b>  End If</b></p><p>  If rst.F

85、ields("12") = "1" Or rst.Fields("12") = "a" Then</p><p>  xlsheet.Cells(13, 3) = "自習"</p><p><b>  Else</b></p><p>  xls

86、heet.Cells(13, 3) = rst.Fields("12")</p><p><b>  End If</b></p><p>  If rst.Fields("22") = "1" Or rst.Fields("22") = "a" Then</p&

87、gt;<p>  xlsheet.Cells(13, 4) = "自習"</p><p><b>  Else</b></p><p>  xlsheet.Cells(13, 4) = rst.Fields("22")</p><p><b>  End If</b>&

88、lt;/p><p>  If rst.Fields("32") = "1" Or rst.Fields("32") = "a" Then</p><p>  xlsheet.Cells(13, 5) = "自習"</p><p><b>  Else</b

89、></p><p>  xlsheet.Cells(13, 5) = rst.Fields("32")</p><p><b>  End If</b></p><p>  If rst.Fields("42") = "1" Or rst.Fields("42"

90、;) = "a" Then</p><p>  xlsheet.Cells(13, 6) = "自習"</p><p><b>  Else</b></p><p>  xlsheet.Cells(13, 6) = rst.Fields("42")</p><p&g

91、t;<b>  End If</b></p><p>  If rst.Fields("52") = "1" Or rst.Fields("52") = "a" Then</p><p>  xlsheet.Cells(13, 7) = "自習"</p>

92、<p><b>  Else</b></p><p>  xlsheet.Cells(13, 7) = rst.Fields("52")</p><p><b>  End If</b></p><p>  If rst.Fields("13") = "1&quo

93、t; Or rst.Fields("13") = "a" Then</p><p>  xlsheet.Cells(17, 3) = "自習"</p><p><b>  Else</b></p><p>  xlsheet.Cells(17, 3) = rst.Fields(&quo

94、t;13")</p><p><b>  End If</b></p><p>  If rst.Fields("23") = "1" Or rst.Fields("23") = "a" Then</p><p>  xlsheet.Cells(17, 4

95、) = "自習"</p><p><b>  Else</b></p><p>  xlsheet.Cells(17, 4) = rst.Fields("23")</p><p><b>  End If</b></p><p>  If rst.Fields

96、("33") = "1" Or rst.Fields("33") = "a" Then</p><p>  xlsheet.Cells(17, 5) = "自習"</p><p><b>  Else</b></p><p>  xlsheet.

97、Cells(17, 5) = rst.Fields("33")</p><p><b>  End If</b></p><p>  If rst.Fields("43") = "1" Or rst.Fields("43") = "a" Then</p>

98、<p>  xlsheet.Cells(17, 6) = "自習"</p><p><b>  Else</b></p><p>  xlsheet.Cells(17, 6) = rst.Fields("43")</p><p><b>  End If</b></p

99、><p>  If rst.Fields("53") = "1" Or rst.Fields("53") = "a" Then</p><p>  xlsheet.Cells(17, 7) = "自習"</p><p><b>  Else</b>&

100、lt;/p><p>  xlsheet.Cells(17, 7) = rst.Fields("53")</p><p><b>  End If</b></p><p>  If rst.Fields("41") = "1" Or rst.Fields("41") =

101、"a" Then</p><p>  xlsheet.Cells(21, 3) = "自習"</p><p><b>  Else</b></p><p>  xlsheet.Cells(21, 3) = rst.Fields("14")</p><p><

102、;b>  End If</b></p><p>  If rst.Fields("24") = "1" Or rst.Fields("24") = "a" Then</p><p>  xlsheet.Cells(21, 4) = "自習"</p><p

103、><b>  Else</b></p><p>  xlsheet.Cells(21, 4) = rst.Fields("24")</p><p><b>  End If</b></p><p>  If rst.Fields("34") = "1" Or

104、 rst.Fields("34") = "a" Then</p><p>  xlsheet.Cells(21, 5) = "自習"</p><p><b>  Else</b></p><p>  xlsheet.Cells(21, 5) = rst.Fields("34&

105、quot;)</p><p><b>  End If</b></p><p>  If rst.Fields("44") = "1" Or rst.Fields("44") = "a" Then</p><p>  xlsheet.Cells(21, 6) = &

106、quot;自習"</p><p><b>  Else</b></p><p>  xlsheet.Cells(21, 6) = rst.Fields("44")</p><p><b>  End If</b></p><p>  If rst.Fields(&quo

107、t;54") = "1" Or rst.Fields("54") = "a" Then</p><p>  xlsheet.Cells(21, 7) = "自習"</p><p><b>  Else</b></p><p>  xlsheet.Cells

108、(21, 7) = rst.Fields("54")</p><p><b>  End If</b></p><p>  If rst.Fields("15") = "1" Or rst.Fields("15") = "a" Then</p><p

109、>  xlsheet.Cells(25, 3) = "自習"</p><p><b>  Else</b></p><p>  xlsheet.Cells(25, 3) = rst.Fields("15")</p><p><b>  End If</b></p>

110、<p>  If rst.Fields("25") = "1" Or rst.Fields("25") = "a" Then</p><p>  xlsheet.Cells(25, 4) = "自習"</p><p><b>  Else</b></p

111、><p>  xlsheet.Cells(25, 4) = rst.Fields("25")</p><p><b>  End If</b></p><p>  If rst.Fields("35") = "1" Or rst.Fields("35") = "

112、;a" Then</p><p>  xlsheet.Cells(25, 5) = "自習"</p><p><b>  Else</b></p><p>  xlsheet.Cells(25, 5) = rst.Fields("35")</p><p><b>

113、;  End If</b></p><p>  If rst.Fields("45") = "1" Or rst.Fields("45") = "a" Then</p><p>  xlsheet.Cells(25, 6) = "自習"</p><p>&

114、lt;b>  Else</b></p><p>  xlsheet.Cells(25, 6) = rst.Fields("45")</p><p><b>  End If</b></p><p>  If rst.Fields("55") = "1" Or rst.

115、Fields("55") = "a" Then</p><p>  xlsheet.Cells(25, 7) = "自習"</p><p><b>  Else</b></p><p>  xlsheet.Cells(25, 7) = rst.Fields("55"

116、)</p><p><b>  End If</b></p><p>  If rst.Fields("16") = "1" Or rst.Fields("16") = "a" Then</p><p>  xlsheet.Cells(29, 3) = "

117、自習"</p><p><b>  Else</b></p><p>  xlsheet.Cells(29, 3) = rst.Fields("16")</p><p><b>  End If</b></p><p>  If rst.Fields("26&

118、quot;) = "1" Or rst.Fields("26") = "a" Then</p><p>  xlsheet.Cells(29, 4) = "自習"</p><p><b>  Else</b></p><p>  xlsheet.Cells(29,

119、4) = rst.Fields("26")</p><p><b>  End If</b></p><p>  If rst.Fields("36") = "1" Or rst.Fields("36") = "a" Then</p><p> 

120、 xlsheet.Cells(29, 5) = "自習"</p><p><b>  Else</b></p><p>  xlsheet.Cells(29, 5) = rst.Fields("36")</p><p><b>  End If</b></p><

121、p>  If rst.Fields("46") = "1" Or rst.Fields("46") = "a" Then</p><p>  xlsheet.Cells(29, 6) = "自習"</p><p><b>  Else</b></p>

122、<p>  xlsheet.Cells(29, 6) = rst.Fields("46")</p><p><b>  End If</b></p><p>  If rst.Fields("56") = "1" Or rst.Fields("56") = "a&qu

123、ot; Then</p><p>  xlsheet.Cells(29, 7) = "自習"</p><p><b>  Else</b></p><p>  xlsheet.Cells(29, 7) = rst.Fields("56")</p><p><b>  En

124、d If</b></p><p>  If rst.Fields("17") = "1" Or rst.Fields("17") = "a" Then</p><p>  xlsheet.Cells(33, 3) = "自習"</p><p><b&

125、gt;  Else</b></p><p>  xlsheet.Cells(33, 3) = rst.Fields("17")</p><p><b>  End If</b></p><p>  If rst.Fields("27") = "1" Or rst.Field

126、s("27") = "a" Then</p><p>  xlsheet.Cells(33, 4) = "自習"</p><p><b>  Else</b></p><p>  xlsheet.Cells(33, 4) = rst.Fields("27")<

127、/p><p><b>  End If</b></p><p>  If rst.Fields("37") = "1" Or rst.Fields("37") = "a" Then</p><p>  xlsheet.Cells(33, 5) = "自習&qu

128、ot;</p><p><b>  Else</b></p><p>  xlsheet.Cells(33, 5) = rst.Fields("37")</p><p><b>  End If</b></p><p>  If rst.Fields("47"

129、) = "1" Or rst.Fields("47") = "a" Then</p><p>  xlsheet.Cells(33, 6) = "自習"</p><p><b>  Else</b></p><p>  xlsheet.Cells(33, 6) =

130、rst.Fields("47")</p><p><b>  End If</b></p><p>  If rst.Fields("57") = "1" Or rst.Fields("57") = "a" Then</p><p>  xlsh

131、eet.Cells(33, 7) = "自習"</p><p><b>  Else</b></p><p>  xlsheet.Cells(33, 7) = rst.Fields("57")</p><p><b>  End If</b></p><p>

132、  If rst.Fields("18") = "1" Or rst.Fields("18") = "a" Then</p><p>  xlsheet.Cells(37, 3) = "自習"</p><p><b>  Else</b></p><

133、p>  xlsheet.Cells(37, 3) = rst.Fields("18")</p><p><b>  End If</b></p><p>  If rst.Fields("28") = "1" Or rst.Fields("28") = "a" T

134、hen</p><p>  xlsheet.Cells(37, 4) = "自習"</p><p><b>  Else</b></p><p>  xlsheet.Cells(37, 4) = rst.Fields("28")</p><p><b>  End If&

溫馨提示

  • 1. 本站所有資源如無特殊說明,都需要本地電腦安裝OFFICE2007和PDF閱讀器。圖紙軟件為CAD,CAXA,PROE,UG,SolidWorks等.壓縮文件請下載最新的WinRAR軟件解壓。
  • 2. 本站的文檔不包含任何第三方提供的附件圖紙等,如果需要附件,請聯(lián)系上傳者。文件的所有權(quán)益歸上傳用戶所有。
  • 3. 本站RAR壓縮包中若帶圖紙,網(wǎng)頁內(nèi)容里面會有圖紙預覽,若沒有圖紙預覽就沒有圖紙。
  • 4. 未經(jīng)權(quán)益所有人同意不得將文件中的內(nèi)容挪作商業(yè)或盈利用途。
  • 5. 眾賞文庫僅提供信息存儲空間,僅對用戶上傳內(nèi)容的表現(xiàn)方式做保護處理,對用戶上傳分享的文檔內(nèi)容本身不做任何修改或編輯,并不能對任何下載內(nèi)容負責。
  • 6. 下載文件中如有侵權(quán)或不適當內(nèi)容,請與我們聯(lián)系,我們立即糾正。
  • 7. 本站不保證下載資源的準確性、安全性和完整性, 同時也不承擔用戶因使用這些下載資源對自己和他人造成任何形式的傷害或損失。

評論

0/150

提交評論