學(xué)生宿舍管理系統(tǒng) 畢業(yè)設(shè)計(jì)

1、<p><b>　　畢 業(yè) 論 文</b></p><p>　　題　 目　 學(xué)生宿舍管理系統(tǒng) </p><p>　　學(xué)　 號(hào)　 班 級(jí) 計(jì)算機(jī)09A1　　</p><p>　　?！?業(yè)　 計(jì)算機(jī)應(yīng)用 系　 別 信息工程系　　

2、</p><p>　　作者姓名　 　　　 完成時(shí)間 2012-5-13 </p><p>　　指導(dǎo)教師　　 　　　 職　 稱　　 講師 </p><p><b>　　摘要</b></p><p>　　信息管理系統(tǒng)在現(xiàn)代社會(huì)已深入到各行各業(yè)，大學(xué)生宿舍管理系統(tǒng)就

3、是一個(gè)典型的管理信息系統(tǒng)，它可以讓宿舍管理工作變的更輕松。本畢業(yè)設(shè)計(jì)的任務(wù)就是設(shè)計(jì)一個(gè)大學(xué)生宿舍管理系統(tǒng)。其開發(fā)過程主要包括前端應(yīng)用程序的開發(fā)和后臺(tái)數(shù)據(jù)庫(kù)的建立和維護(hù)兩個(gè)方面。主要任務(wù)就是建立基本數(shù)據(jù)，后臺(tái)程序主要負(fù)責(zé)的都是管理上的功能。系統(tǒng)是采用Visual Basic作為前臺(tái)開發(fā)工具。</p><p>　　本系統(tǒng)最大的特點(diǎn)是通用性、簡(jiǎn)單操作性。隨著學(xué)校寄宿人員的增多，宿舍管理人員的負(fù)擔(dān)越來越重，為了讓所有宿舍

4、管理人員能從繁重的工作中解脫出來，實(shí)現(xiàn)無紙化辦公；使工作更有條理，更方便，更有效率而開發(fā)出這套宿舍管理軟件。</p><p><b>　　目 錄</b></p><p>　　第一章系統(tǒng)需求分析1</p><p><b>　　一 緒論1</b></p><p><b>　　（一）開發(fā)

5、背景1</b></p><p><b>　?。ǘ╅_發(fā)環(huán)境1</b></p><p>　　二 系統(tǒng)可行性1</p><p>　?。ㄒ唬┙?jīng)濟(jì)可行性1</p><p>　?。ǘ┘夹g(shù)可行性2</p><p>　?。ㄈ┎僮骺尚行?</p><p>　　

6、第二章 學(xué)生宿舍管理系統(tǒng)的主要功能2</p><p><b>　　一 主要功能2</b></p><p>　　二 功能權(quán)限圖2</p><p>　　第三章 系統(tǒng)設(shè)計(jì)3</p><p><b>　　一 數(shù)據(jù)流圖4</b></p><p>　　二 數(shù)據(jù)庫(kù)設(shè)計(jì)6

7、</p><p>　　第四章 系統(tǒng)實(shí)現(xiàn)8</p><p>　　一 數(shù)據(jù)庫(kù)連接8</p><p>　　二 功能模塊實(shí)現(xiàn)9</p><p>　　第五章 系統(tǒng)運(yùn)行環(huán)境 20</p><p>　?。ㄒ唬┯布h(huán)境：20</p><p>　　(二)軟件環(huán)境：20</p><

8、;p>　　第六章 系統(tǒng)測(cè)試運(yùn)行20</p><p>　　（一）模塊測(cè)試20</p><p>　?。ǘ┘蓽y(cè)試21</p><p>　?。ㄈ┫到y(tǒng)有效性測(cè)試21</p><p>　?。ㄋ模┫到y(tǒng)可行性測(cè)試22</p><p>　?。ㄎ澹┫到y(tǒng)測(cè)試結(jié)果22</p><p><b

9、>　　第七章 小結(jié)23</b></p><p><b>　　參考文獻(xiàn)24</b></p><p><b>　　致 謝25</b></p><p><b>　　系統(tǒng)需求分析</b></p><p><b>　　一 緒論</b><

10、;/p><p><b>　?。ㄒ唬╅_發(fā)背景</b></p><p>　　隨著時(shí)代的發(fā)展，計(jì)算機(jī)技術(shù)越來越深入各行各業(yè)，為廣大的用戶提供了更為周到和便捷的服務(wù)。目前各行各業(yè)廣泛使用專用系統(tǒng)，其內(nèi)容范圍跨越了教育科研、文化事業(yè)、金融、商業(yè)、新聞出版、娛樂、體育等各個(gè)領(lǐng)域，其用戶群十分龐大，因此，設(shè)計(jì)開發(fā)好一個(gè)專用系統(tǒng)對(duì)一個(gè)機(jī)構(gòu)(或部門)的發(fā)展十分重要。近年來，隨著用戶要求的不

11、斷提高及計(jì)算機(jī)科學(xué)的迅速發(fā)展，特別是數(shù)據(jù)庫(kù)技術(shù)的廣泛應(yīng)用，向用戶提供的服務(wù)將越來越豐富，越來越人性化。 對(duì)于學(xué)校而言，學(xué)生宿舍管理是必不可少的組成部分。目前仍然存在有學(xué)校停留在宿舍管理部門人員手工記錄數(shù)據(jù)的階段，手工記錄對(duì)于規(guī)模小的學(xué)校來說勉強(qiáng)可以接受；但對(duì)于學(xué)生信息量比較龐大，需要記錄存檔的數(shù)據(jù)比較多的高校來說，人工記錄是相當(dāng)麻煩的,而且當(dāng)查找某條記錄時(shí)，由于數(shù)據(jù)量龐大，只能依靠人工去一條一條地查找，這樣不但麻煩而且浪費(fèi)許多時(shí)

12、間，工作效率比較低。采用計(jì)算機(jī)來管理宿舍和學(xué)生的信息，大大提高了查詢的速度，節(jié)約了人力和物力資源，達(dá)到了預(yù)期的要求。今天，計(jì)算機(jī)的價(jià)格已經(jīng)十分低廉，性能卻有了長(zhǎng)足的進(jìn)步。它已經(jīng)被應(yīng)用于許多領(lǐng)域，計(jì)算機(jī)之所以如此流行的原因主要有以下幾個(gè)方面： </p><p>　　首先，計(jì)算機(jī)可以代替人工進(jìn)行許多繁雜的勞動(dòng)； </p><p>　　其次，計(jì)算機(jī)可以節(jié)省許多資源； </p>&l

13、t;p>　　第三，計(jì)算機(jī)可以大大的提高人們的工作效率； </p><p>　　第四，計(jì)算機(jī)可以使敏感文檔更加安全，等等.</p><p><b>　?。ǘ╅_發(fā)環(huán)境</b></p><p>　　Visual Basic（VB）是微軟公示推出的功能強(qiáng)大的Windows應(yīng)用程序開發(fā)工具。與普通的數(shù)據(jù)庫(kù)系統(tǒng)相比，用VB作為數(shù)據(jù)庫(kù)開發(fā)平臺(tái)有簡(jiǎn)單性

14、、靈活性等有點(diǎn)，特別是其可擴(kuò)充性，在VB中，可以使用Active X控件（以前版本中稱VBX或OLE控件），很容易在VB中增加新功能，擴(kuò)充VB數(shù)據(jù)庫(kù)存取空間的指令系統(tǒng)。</p><p><b>　　二 可行性分析</b></p><p><b>　　（一）經(jīng)濟(jì)可行性</b></p><p>　　由于開發(fā)此宿舍管理系統(tǒng)所需

15、的硬件（計(jì)算機(jī)及相關(guān)硬件）和軟件環(huán)境（Visual Basuc和SQLSERVER）價(jià)格低廉,在市場(chǎng)上都容易購(gòu)買到,因此開發(fā)此系統(tǒng)成本低,經(jīng)濟(jì)效益高,因此系統(tǒng)經(jīng)濟(jì)可行，應(yīng)積極開發(fā)。</p><p><b>　?。ǘ┘夹g(shù)可行性</b></p><p>　　由于開發(fā)此宿舍管理系統(tǒng)需要的硬件環(huán)境有Windows XP,支持的軟件有開發(fā)工具Visual Basic所需用的操

16、作人員熟練使用Visual Basic及SQL,具有一定的數(shù)據(jù)庫(kù)開發(fā)功底及編程能力,現(xiàn)有開發(fā)工具Visual Basic支持強(qiáng)大的數(shù)據(jù)庫(kù)開發(fā),再加上Windows XP穩(wěn)定的運(yùn)行環(huán)境的支持和開發(fā)人員的過硬技術(shù)，從功能和性能上完全都滿足系統(tǒng)的要求,因此從技術(shù)方面講開發(fā)此宿舍管理系統(tǒng)是可行的。</p><p><b>　　（三）操作可行性</b></p><p>　　系統(tǒng)

17、是采用開發(fā)工具Visual Basic 6.0編程環(huán)境和Access 2003數(shù)據(jù)庫(kù)開發(fā)設(shè)計(jì)而成，具有操作簡(jiǎn)單方便、界面美觀大方、對(duì)計(jì)算機(jī)操作知識(shí)要求層次低等優(yōu)點(diǎn)。</p><p><b>　?。ㄋ模┦褂每尚行?lt;/b></p><p>　　此宿舍管理系統(tǒng)具備良好的界面、使用方便、操作簡(jiǎn)單、易于被用戶接受,用戶只需可以熟練操作計(jì)算機(jī)和對(duì)此系統(tǒng)使用做簡(jiǎn)單的了解即可方便使用

18、,而且使用此系統(tǒng)可以減速少大量錄入工作，大大減少后勤管理人員的負(fù)擔(dān)，從使用方面是此系統(tǒng)的開發(fā)是可行的。</p><p>　　學(xué)生宿舍管理系統(tǒng)的主要功能</p><p><b>　　一 主要功能</b></p><p>　　本系統(tǒng)中主要功能需求是：對(duì)剛?cè)雽W(xué)的學(xué)生進(jìn)行入住登記，登記后的各種信息除了存入數(shù)據(jù)庫(kù)外還要可以即時(shí)預(yù)覽，如有個(gè)別同學(xué)需要轉(zhuǎn)系

19、轉(zhuǎn)宿舍的，還可以及時(shí)地對(duì)他的宿舍進(jìn)行調(diào)整，并把調(diào)整后的信息放入數(shù)據(jù)庫(kù)，一般用戶如果想要對(duì)學(xué)生信息進(jìn)行查看，也可以根據(jù)條件進(jìn)行搜索，把你自己所需要的信息查出來，以便你自己更好地查看你所需要的信息。如遇到修改信息，數(shù)據(jù)維護(hù)模塊可以對(duì)學(xué)生的信息，以便管理人員和用戶可以隨時(shí)查到最新的信息，同時(shí)，可以隨時(shí)對(duì)需要的信息進(jìn)行維護(hù)和更新。</p><p><b>　　二 功能權(quán)限圖</b></p&g

20、t;<p>　　系統(tǒng)功能按權(quán)限劃分類別為兩大類：用戶和管理員</p><p>　　用戶：注冊(cè)、登錄、修改密碼、注銷登錄、退出系統(tǒng)</p><p><b>　　圖1 用戶權(quán)限圖</b></p><p>　　2、管理員： 信息錄入、信息查詢、系統(tǒng)管理</p><p><b>　　圖2 管理員權(quán)限圖&l

21、t;/b></p><p><b>　　第三章 系統(tǒng)設(shè)計(jì)</b></p><p><b>　　一 數(shù)據(jù)流圖</b></p><p>　　為了更加清晰地表達(dá)系統(tǒng)的功能，下面給出學(xué)生宿舍管理系統(tǒng)的系統(tǒng)流程圖。</p><p>　?。?）首先用戶啟動(dòng)服務(wù)器及相關(guān)程序，然后客戶端系統(tǒng)啟動(dòng)，進(jìn)入身份驗(yàn)

22、證。通過身份驗(yàn)證后，激活各個(gè)功能模塊，并執(zhí)行指定模塊，系統(tǒng)進(jìn)入消息循環(huán)狀態(tài)。各項(xiàng)功能執(zhí)行完畢后重新進(jìn)入消息循環(huán)狀態(tài)。由系統(tǒng)退出按鈕激活系統(tǒng)關(guān)閉事件，退出系統(tǒng)。如圖3所示：</p><p><b>　　圖3 數(shù)據(jù)流圖</b></p><p>　?。?）用戶登錄流程圖：用戶登錄具有用戶登錄功能。系統(tǒng)運(yùn)行的第一個(gè)界面便是用戶登錄界面。在用戶登錄界面中，首先選擇用戶注冊(cè)，注冊(cè)

23、完畢后，在“用戶名”和“密碼”文本框中輸入注冊(cè)的用戶名和密碼后單擊“登錄”按鈕，系統(tǒng)驗(yàn)證成功后，用戶將會(huì)以注冊(cè)的身份進(jìn)入用戶界面。如果用戶名或者密碼輸入錯(cuò)誤，系統(tǒng)則給出提示重新輸入，輸入三次錯(cuò)誤后則無法再登錄，請(qǐng)關(guān)閉系統(tǒng)重新啟動(dòng)登錄。只有用戶名和密碼都正確，才能進(jìn)入系統(tǒng)。因?yàn)橄到y(tǒng)為宿舍管理員使用，所以登陸后擁有全部權(quán)限。如圖4所示：</p><p>　　圖4 用戶登錄流程圖</p><p>

24、;　?。?）用戶管理流程圖：管理員對(duì)學(xué)生的各項(xiàng)信息進(jìn)行管理是系統(tǒng)的主要功能。首先，學(xué)生入住提供需要登記的個(gè)人信息，管理員根據(jù)學(xué)生提供具體信息進(jìn)行登記。登記完畢后就對(duì)學(xué)生個(gè)人信息進(jìn)行查詢。學(xué)生住宿過程中如果有晚歸等違紀(jì)情況也可進(jìn)行詳細(xì)登記，想要了解學(xué)生的晚歸違紀(jì)情況可進(jìn)行查詢。日常生活中難免會(huì)有外人來訪，則也要進(jìn)行登記，以免發(fā)生意外情況。學(xué)生攜帶貴重物品出入宿舍樓時(shí)對(duì)其進(jìn)行登記，以保證學(xué)生人身財(cái)產(chǎn)安全。管理員在日常使用系統(tǒng)時(shí)可對(duì)密碼進(jìn)行修

25、改，以保證系統(tǒng)安全。管理員還可定期對(duì)數(shù)據(jù)進(jìn)行備份處理，以免系統(tǒng)出現(xiàn)問題導(dǎo)致數(shù)據(jù)丟失而沒辦法補(bǔ)救。具體流程圖如圖5所示：</p><p>　　圖5 管理員操作流程圖</p><p><b>　　二 數(shù)據(jù)庫(kù)設(shè)計(jì)</b></p><p>　　目前，可應(yīng)用的數(shù)據(jù)庫(kù)開發(fā)工作很多，Oracle是面向網(wǎng)絡(luò)計(jì)算的數(shù)據(jù)庫(kù)，適合開發(fā)大型網(wǎng)絡(luò)應(yīng)用軟件;Acces

26、s和Visual Foxpro系統(tǒng)適合開發(fā)小型數(shù)據(jù)庫(kù)應(yīng)用軟件。Access數(shù)據(jù)庫(kù)功能比較齊全，數(shù)據(jù)的備份、拷貝都很方便，且程序發(fā)布時(shí)不需要額外安裝其他的數(shù)據(jù)庫(kù)管理軟件。本系統(tǒng)數(shù)據(jù)量較小，采用Access數(shù)據(jù)庫(kù)就可滿足要求。</p><p>　　根據(jù)系統(tǒng)功能設(shè)計(jì)的要求及功能模塊的劃分，對(duì)于學(xué)生宿舍管理系統(tǒng)的數(shù)據(jù)庫(kù)，可以列出以下表。</p><p>　　用戶表：用來存儲(chǔ)用戶的賬號(hào)、密碼信息。根

27、據(jù)用戶的修改信息進(jìn)行及時(shí)更新，以便管理員更好的管理系統(tǒng)。如表1所示：</p><p><b>　　表1 用戶信息表</b></p><p>　　學(xué)生信息表：每個(gè)學(xué)生在入住登記后有唯一的學(xué)號(hào)。表內(nèi)存放學(xué)生的各項(xiàng)詳細(xì)信息資料，用唯一的學(xué)號(hào)來標(biāo)識(shí)該學(xué)生。學(xué)生的詳細(xì)信息記錄有學(xué)號(hào)、姓名、性別、系別、班級(jí)、宿舍號(hào)、入住時(shí)間、家庭住址、聯(lián)系方式、照片。通過詳細(xì)記錄學(xué)生的具體信息，

28、可以為宿舍的管理提供學(xué)生信息，方便后期的學(xué)生住宿管理。如表2所示：</p><p><b>　　表2 學(xué)生信息表</b></p><p>　　晚歸表：晚歸表記錄學(xué)生晚上熄燈后回宿舍的信息?？紤]到學(xué)生的人身財(cái)產(chǎn)安全，登記時(shí)先要對(duì)其身份進(jìn)行核查，確定其是本宿舍樓學(xué)生，所以晚歸表信息包括學(xué)號(hào)、姓名、班級(jí) 、宿舍號(hào)、日期、時(shí)間、原因。這樣能更好的記錄學(xué)生違紀(jì)情況。如表3所示：

29、</p><p>　　表3 學(xué)生晚歸登記表</p><p>　　物品出入表：鑒于學(xué)生宿舍財(cái)產(chǎn)安全長(zhǎng)時(shí)間無法得到保障，建立物品出入表登記學(xué)生出入宿舍時(shí)帶的貴重物品，讓學(xué)生財(cái)產(chǎn)安全多一層保障。信息記錄包括學(xué)號(hào)、宿舍號(hào)、姓名、物品名、日期、時(shí)間。如表4所示：</p><p>　　表4 物品出入登記表</p><p>　　來訪表：來訪表是對(duì)宿舍來訪人

30、員進(jìn)行登記，以保障宿舍學(xué)生的人身、財(cái)產(chǎn)安全。登記首先要對(duì)被訪人員進(jìn)行核查，若是本宿舍樓學(xué)生則進(jìn)行登記，否則不進(jìn)行登記，也不允許進(jìn)入。詳細(xì)信息記錄包括來訪人姓名、要訪人姓名、來訪時(shí)間、所屬關(guān)系、證件名稱、證件號(hào)碼、備注。如表5所示：</p><p><b>　　表5來訪人員登記表</b></p><p><b>　　第四章 系統(tǒng)實(shí)現(xiàn)</b><

31、/p><p><b>　　一 數(shù)據(jù)庫(kù)連接</b></p><p>　　數(shù)據(jù)庫(kù)相對(duì)地址連接的代碼為：</p><p>　　Adodc1.ConnectionString=“Provider=Microsoft.Jet.OLEDB.4.0;Data Source=” + App.Path + “\數(shù)據(jù)源.mdb;Persist Security In

32、fo=False”</p><p>　　Adodc1.CommandType = adCmdText </p><p><b>　　二 功能模塊實(shí)現(xiàn)</b></p><p>　　一般用戶登錄后，即進(jìn)入了主界面，主界面分為六大塊：用戶管理模塊、信息管理模塊、晚歸管理模塊、來訪管理模塊、物品管理模塊、系統(tǒng)管理模塊。其主界面如下圖所示：</p

33、><p><b>　　圖6 主界面圖</b></p><p><b>　?。?）用戶注冊(cè)</b></p><p><b>　　圖7 用戶注冊(cè)圖</b></p><p><b>　　其源代碼為：</b></p><p>　　Private

34、 Sub Command1_Click()</p><p>　　If Text1.Text = "" Then</p><p>　　MsgBox "賬號(hào)不能為空！", vbExclamation, "提示"</p><p>　　Text1.SetFocus</p><p><b

35、>　　Exit Sub</b></p><p><b>　　End If</b></p><p>　　If Text2.Text = "" Then</p><p>　　MsgBox "密碼不能為空！", vbExclamation, "提示"</p>

36、<p>　　Text2.SetFocus</p><p><b>　　Exit Sub</b></p><p><b>　　End If</b></p><p>　　On Error Resume Next</p><p>　　Adodc1.RecordSource = "sel

37、ect * from 用戶表 where 用戶賬號(hào)='" & Text1.Text & "'"</p><p>　　Adodc1.CommandType = adCmdText</p><p>　　Adodc1.Refresh</p><p>　　If Adodc1.Recordset.EOF = Tru

38、e Then</p><p>　　If Text3.Text = "" Then</p><p>　　MsgBox "請(qǐng)確認(rèn)密碼！", vbExclamation, "提示"</p><p>　　Text3.SetFocus</p><p><b>　　Exit Sub&l

39、t;/b></p><p>　　ElseIf Text3.Text <> Text2.Text Then</p><p>　　MsgBox "密碼不匹配，請(qǐng)重新輸入！", vbExclamation, "提示"</p><p>　　Text3.Text = ""</p>&l

40、t;p>　　Text3.SetFocus</p><p><b>　　Exit Sub</b></p><p><b>　　Else</b></p><p>　　Adodc1.Recordset.AddNew</p><p>　　Adodc1.Recordset.Fields("用戶

41、賬號(hào)") = Text1.Text</p><p>　　Adodc1.Recordset.Fields("用戶密碼") = Text2.Text</p><p>　　Adodc1.Recordset.Update</p><p>　　MsgBox "注冊(cè)成功！", vbInformation, "提示&qu

42、ot;</p><p>　　Text1.Text = ""</p><p>　　Text2.Text = ""</p><p>　　Text3.Text = ""</p><p>　　Text1.SetFocus</p><p><b>　　End

43、If </b></p><p><b>　　Else</b></p><p>　　MsgBox "用戶已存在，請(qǐng)重新注冊(cè)！", vbExclamation, "提示"</p><p>　　Text1.Text = ""</p><p>　　Text2

44、.Text = ""</p><p>　　Text3.Text = ""</p><p>　　Text1.SetFocus</p><p><b>　　Exit Sub</b></p><p><b>　　End If</b></p><p

45、><b>　　Unload Me</b></p><p>　　denglu.Text1.SetFocus</p><p><b>　　（一）系統(tǒng)登錄模塊</b></p><p><b>　　圖8 登錄界面圖</b></p><p>　　“登陸“功能源代碼：</p&g

46、t;<p>　　Private Sub Command1_Click()</p><p>　　On Error Resume Next</p><p>　　Dim a As String</p><p>　　Dim b As String</p><p>　　Static number As Integer</p>

47、<p>　　a = Trim(Text1.Text)</p><p>　　b = Trim(Text2.Text)</p><p>　　If Text1.Text = "" Then</p><p>　　MsgBox "帳戶不能為空,請(qǐng)核對(duì)帳戶信息！", vbExclamation, "核對(duì)帳戶信息&qu

48、ot;</p><p>　　Text1.SetFocus</p><p>　　ElseIf Text2.Text = "" Then</p><p>　　MsgBox "密碼不能為空,請(qǐng)核對(duì)密碼信息！", vbExclamation, "核對(duì)密碼信息"</p><p>　　Text2

49、.SetFocus</p><p><b>　　Else</b></p><p>　　Adodc1.RecordSource = "select * from 用戶表 where 用戶賬號(hào)='" & a & "' and 用戶密碼= '" & b & " '

50、; "</p><p>　　Adodc1.CommandType = adCmdText</p><p>　　Adodc1.Refresh</p><p>　　If Adodc1.Recordset.EOF Then '登錄失敗</p><p>　　MsgBox "對(duì)不起，無此用戶或者密碼不正確！請(qǐng)重新輸入！&qu

51、ot;, vbExclamation, "提示"</p><p>　　Text1.Text = ""</p><p>　　Text2.Text = ""</p><p>　　Text1.SetFocus</p><p>　　number = number + 1</p>

52、<p>　　If number >= 3 Then</p><p>　　MsgBox "您已經(jīng)登錄了" & number & "次！您無權(quán)操作本系統(tǒng),請(qǐng)您退出！", vbExclamation, "提示"</p><p>　　Command1.Enabled = False</p>

53、<p>　　Text1.Enabled = False</p><p>　　Text2.Enabled = False</p><p><b>　　End If</b></p><p>　　Else '登陸成功</p><p>　　MsgBox "歡迎使用本系統(tǒng)！", vbInfor

54、mation, "歡迎"</p><p><b>　　Me.Hide</b></p><p>　　zhujiemian.Show</p><p>　　fuzhujiemian.StatusBar1.Panels(2).Text = denglu.Text1.Text</p><p><b>

55、　　End If</b></p><p><b>　　End If</b></p><p><b>　　End Sub</b></p><p>　　Private Sub Command2_Click()</p><p><b>　　End</b></p>

56、;<p><b>　　End Sub</b></p><p>　　Private Sub Command3_Click()</p><p>　　zhuce.Show</p><p><b>　　End Sub</b></p><p>　　Private Sub Form_Load()&

57、lt;/p><p>　　Adodc1.ConnectionString = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" + App.Path + "\數(shù)據(jù)源.mdb;Persist Security Info=False"</p><p>　　Adodc1.CommandType = adCmdText

58、</p><p>　　Adodc1.RecordSource = "select * from 用戶表"</p><p>　　denglu.Show</p><p>　　Text1.SetFocus</p><p>　　Text2.Text = ""</p><p><b&

59、gt;　　End Sub</b></p><p><b>　?。ǘ┩須w管理模塊</b></p><p>　　晚歸管理模塊包括晚歸登記、晚歸查詢兩個(gè)模塊。</p><p><b>　　1.晚歸登記</b></p><p><b>　　圖9 晚歸登記圖</b><

60、/p><p>　　輸入項(xiàng)：學(xué)生的姓名；輸出項(xiàng)：經(jīng)過核查學(xué)生信息子過程，系統(tǒng)會(huì)自動(dòng)實(shí)現(xiàn)晚歸學(xué)生學(xué)號(hào)、姓名、班級(jí)和寢室記錄的錄入。此模塊主要包括兩個(gè)功能：一、能夠通過輸入晚歸者姓名來核查一下晚歸者的信息，最后通過DataGrid控件來顯示晚歸者的信息。二、新的晚歸者信息的錄入。通過command控件來保存剛錄入的信息。</p><p><b>　　2.晚歸查詢</b><

61、/p><p><b>　　圖10 晚歸查詢圖</b></p><p>　　本模塊可以按學(xué)號(hào)、姓名、班級(jí)、寢室進(jìn)行查詢。通過DataGrid控件來顯示查詢到的學(xué)生晚歸的信息。同時(shí)還能對(duì)數(shù)據(jù)庫(kù)中晚歸表的錯(cuò)誤的信息的刪除。</p><p><b>　　按學(xué)號(hào)查詢?cè)创a：</b></p><p>　　Priva

62、te Sub Command1_Click()</p><p>　　If Text1.Text = "" Then</p><p>　　MsgBox "請(qǐng)輸入學(xué)號(hào)", vbExclamation, "提示"</p><p>　　Text1.SetFocus</p><p><b

63、>　　Else</b></p><p>　　Adodc1.RecordSource = "select*from 晚歸表where 學(xué)號(hào)='" & Trim(Text1.Text) & "'"</p><p>　　Adodc1.CommandType = adCmdUnknown</p>

64、<p>　　Adodc1.Refresh</p><p>　　If Adodc1.Recordset.EOF Then</p><p>　　MsgBox "無此學(xué)生記錄！", vbExclamation, "提示"</p><p>　　Text1.Text = ""</p><

65、;p>　　Text1.SetFocus</p><p><b>　　Else</b></p><p>　　Set DataGrid1.DataSource = Adodc1</p><p>　　DataGrid1.Refresh</p><p><b>　　End If</b></p&g

66、t;<p><b>　　End If</b></p><p><b>　　End Sub</b></p><p>　　Private Sub Command9_Click()</p><p>　　Adodc1.Recordset.Delete</p><p>　　Adodc1.Reco

67、rdset.MoveNext</p><p>　　Adodc1.Refresh</p><p>　　MsgBox ("刪除成功！")</p><p><b>　　End Sub</b></p><p>　　Private Sub Form_Load()</p><p>　　Ad

68、odc1.ConnectionString = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" + App.Path + "\數(shù)據(jù)源.mdb;Persist Security Info=False"</p><p>　　Adodc1.CommandType = adCmdText</p><p>　　A

69、dodc1.RecordSource = "select * from 晚歸表"</p><p>　　Set DataGrid1.DataSource = Adodc1</p><p>　　Set DataGrid2.DataSource = Adodc1</p><p>　　Set DataGrid3.DataSource = Adodc1&l

70、t;/p><p>　　Set DataGrid4.DataSource = Adodc1</p><p>　　wanguichaxun.Show</p><p>　　Text1.SetFocus</p><p>　　DataGrid1.Refresh</p><p>　　DataGrid2.Refresh</p>

71、;<p>　　DataGrid3.Refresh</p><p>　　DataGrid4.Refresh</p><p><b>　　End Sub</b></p><p><b>　?。ㄈ﹣碓L管理模塊</b></p><p><b>　　圖11 來訪登記圖</b&g

72、t;</p><p>　　此模塊主要包括兩個(gè)功能：一、能夠通過輸入要訪人姓名來核查一下來訪者的信息，最后通過DataGrid控件來顯示來訪者的信息。二、新的來訪者信息的錄入。通過command控件來保存剛錄入的信息。</p><p><b>　?。ㄋ模┪锲饭芾砟K</b></p><p>　　圖12 物品出入登記圖</p><

73、;p><b>　?。ㄎ澹┫到y(tǒng)管理模塊</b></p><p>　　系統(tǒng)管理模塊包括數(shù)據(jù)備份、數(shù)據(jù)恢復(fù)和退出系統(tǒng)功能。這里主要介紹數(shù)據(jù)恢復(fù)功能。</p><p><b>　　圖13 數(shù)據(jù)恢復(fù)圖</b></p><p><b>　　源代碼：</b></p><p>　　Pri

74、vate Sub Command1_Click()</p><p>　　Dim z As Integer</p><p>　　If Text1.Text = "" Then</p><p>　　MsgBox "請(qǐng)指定要恢復(fù)的數(shù)據(jù)庫(kù)"</p><p><b>　　Else</b>&l

75、t;/p><p>　　Me.MousePointer = 11</p><p>　　FileCopy Dir1.Path & "\" & File1.FileName, App.Path & "\" & "數(shù)據(jù)源.mdb"</p><p>　　Me.MousePointer =

76、0</p><p>　　z = MsgBox("數(shù)據(jù)恢復(fù)已完成?。?！", vbOKOnly + vbExclamation, "提醒")</p><p><b>　　If z Then</b></p><p><b>　　Unload Me</b></p><p&

77、gt;<b>　　End If</b></p><p><b>　　End If</b></p><p><b>　　End Sub</b></p><p>　　Private Sub Command2_Click()</p><p>　　Text1.Text = "

78、"</p><p><b>　　Unload Me</b></p><p><b>　　End Sub</b></p><p>　　Private Sub Dir1_Change()</p><p>　　File1.Path = Dir1.Path</p><p>

79、<b>　　End Sub</b></p><p>　　Private Sub Drive1_Change()</p><p>　　Dir1.Path = Drive1.Drive</p><p><b>　　End Sub</b></p><p>　　Private Sub File1_Click

80、()</p><p>　　Command1.Enabled = True</p><p>　　Text1.Text = Dir1.Path & "\" & File1.FileName</p><p><b>　　End Sub</b></p><p>　　Private Sub Fo

81、rm_Load()</p><p>　　Command1.Enabled = False</p><p><b>　　End Sub</b></p><p>　　第五章 系統(tǒng)運(yùn)行環(huán)境</p><p>　　系統(tǒng)采用Visual Basic6.0設(shè)計(jì)，用戶交互界面采用的是基于Windows的窗口界面。</p>

82、<p><b>　?。ㄒ唬┯布h(huán)境： </b></p><p>　　CPU： 主頻2.0GHz以上</p><p>　　內(nèi)存：256MB及以上</p><p>　　硬盤：需要約500MB程序空間，以及預(yù)留500MB 的數(shù)據(jù)空間</p><p><b>　　(二)軟件環(huán)境：

83、</b></p><p>　　Windows XP版本以上</p><p>　　Access 2003以上</p><p>　　Visual Basic 6.0</p><p>　　第六章 系統(tǒng)測(cè)試運(yùn)行</p><p>　　軟件系統(tǒng)的開發(fā)過程中是一個(gè)自頂向下逐步細(xì)化的過程，而測(cè)試過程是經(jīng)相反順序進(jìn)行的集成過

84、程。測(cè)試包括單元測(cè)試（模塊測(cè)試）、集成測(cè)試、有效性測(cè)試、系統(tǒng)測(cè)試。</p><p>　　測(cè)試在系統(tǒng)設(shè)計(jì)階段有兩個(gè)時(shí)期，通常在編寫每個(gè)模塊后做單元測(cè)試即模塊測(cè)試，另一個(gè)時(shí)期是對(duì)系統(tǒng)的綜合測(cè)試也稱整體測(cè)試或集成測(cè)試。只有通過測(cè)試排錯(cuò)后才能更回完善系統(tǒng)。</p><p><b>　?。ㄒ唬┠K測(cè)試</b></p><p>　　通過測(cè)試發(fā)現(xiàn)該模塊單元的

85、子程序或過程的實(shí)際功能與該模塊的功能和接口的描述是否相符，以及是否有編碼錯(cuò)誤存在。高可靠性的模塊是組成可靠系統(tǒng)的堅(jiān)實(shí)基礎(chǔ)。在模塊測(cè)試時(shí)我們主要從以下幾個(gè)方面考慮：</p><p>　　1. 模塊接口測(cè)試；</p><p>　　2. 局部數(shù)據(jù)結(jié)構(gòu)測(cè)試；</p><p><b>　　3. 路徑測(cè)試；</b></p><p>

86、　　4. 錯(cuò)誤處理測(cè)試；</p><p><b>　　5. 邊界測(cè)試。</b></p><p>　　測(cè)試時(shí)進(jìn)行代碼審查，從數(shù)據(jù)類型，變量聲明，數(shù)據(jù)結(jié)構(gòu)進(jìn)行審查，然后進(jìn)行功能測(cè)試，從輸入一些簡(jiǎn)單的數(shù)據(jù)開始執(zhí)行一遍，觀測(cè)運(yùn)行期間變量的變化，運(yùn)行中值的變化范圍。改變測(cè)試方案來變換另一個(gè)角度進(jìn)行測(cè)試，發(fā)現(xiàn)錯(cuò)誤并記錄，修改代碼，測(cè)試條件使程序通過多層分支，判別運(yùn)行結(jié)果從而完成模

87、塊測(cè)試。</p><p><b>　?。ǘ┘蓽y(cè)試</b></p><p>　　集成測(cè)試又稱整體測(cè)試或結(jié)合測(cè)試，是軟件系統(tǒng)測(cè)試的一個(gè)重要環(huán)節(jié)。整體測(cè)試是在已完成的程序的條件下證實(shí)這些程序元素間的一致性，不同于對(duì)一艔程序幸免于難的測(cè)試，是對(duì)正在結(jié)合的元素的測(cè)試，對(duì)結(jié)合過程的測(cè)試。在具體測(cè)試時(shí)，采用自頂向下的結(jié)合方式，從主控模塊開始，沿各控制層向下移動(dòng)，逐漸把所有模塊結(jié)

88、合了。它是將對(duì)結(jié)合元素間的調(diào)用關(guān)系、數(shù)據(jù)依賴和元素間的接口進(jìn)行測(cè)試，它可以用以下技術(shù)： </p><p>　　(1) 調(diào)用圖/樹的準(zhǔn)備；</p><p>　　(2) 數(shù)據(jù)依賴圖的準(zhǔn)備；</p><p>　　(3) 加工依賴圖；</p><p>　　(4) 接口與接口標(biāo)準(zhǔn)。</p><p>　　整體測(cè)試就包括數(shù)據(jù)項(xiàng)的表示

89、范圍的相容性、類型的相關(guān)性、表示方式的一致性、數(shù)據(jù)對(duì)象順序的正確性、傳遞方法的正確性等。在調(diào)用圖的使用中應(yīng)準(zhǔn)確記錄相關(guān)信息，以調(diào)用圖的路徑覆蓋情況。在晝避免多入口和多出口的程序元素的同時(shí)，還應(yīng)對(duì)此類元素進(jìn)行認(rèn)真測(cè)試，檢查多入口元素和每個(gè)入口點(diǎn)，并難選取入口的正確和路徑覆蓋。但要注意的是多出口有時(shí)是必要的，但也應(yīng)在整體測(cè)試中對(duì)其進(jìn)行測(cè)試。</p><p>　?。ㄈ┫到y(tǒng)有效性測(cè)試</p><p&

90、gt;　　所謂的有效性測(cè)試，是指當(dāng)軟件的運(yùn)行達(dá)到了用戶的期望時(shí)，則認(rèn)為軟件是有效的。我們需要制定一個(gè)測(cè)試計(jì)劃來規(guī)定要進(jìn)行測(cè)試的各類幫步驟，看它們是否能達(dá)到：</p><p>　　（1）全部的功能要求都得到實(shí)現(xiàn)。</p><p>　　（2）全部的性能都達(dá)到要求。</p><p>　　(3) 文件與數(shù)據(jù)庫(kù)均常。</p><p>　　(4) 其他的

91、要求，如可移植性、、出錯(cuò)自動(dòng)恢復(fù)等。</p><p>　?。ㄋ模┫到y(tǒng)可行性測(cè)試</p><p>　　系測(cè)試統(tǒng)測(cè)試是指軟件系統(tǒng)與硬件、外設(shè)或其他系統(tǒng)元素結(jié)合一起，對(duì)整個(gè)軟件系統(tǒng)進(jìn)行測(cè)試。測(cè)試內(nèi)容包括：</p><p>　　(1) 功能測(cè)試。系統(tǒng)此功能。</p><p>　　(2) 吞吐量測(cè)試。系統(tǒng)能完成的最大數(shù)量的任務(wù)</p>&

92、lt;p>　　(3) 可用性測(cè)試。界面出錯(cuò)信息，響應(yīng)方式的可用性。</p><p>　　(4) 保密性測(cè)試?？疾煜到y(tǒng)對(duì)數(shù)據(jù)和程序的保密性。</p><p>　　(5) 安裝測(cè)試。對(duì)安裝規(guī)程進(jìn)行測(cè)試。</p><p>　　(6) 可恢復(fù)性測(cè)試。模擬硬、軟件故障。查看恢復(fù)能力。</p><p>　　(7) 資料測(cè)試。測(cè)試整個(gè)系統(tǒng)資料的準(zhǔn)確性

93、。</p><p>　　(8) 程序測(cè)試。測(cè)試各種操作人員的操作程序。</p><p><b>　?。ㄎ澹┫到y(tǒng)測(cè)試結(jié)果</b></p><p>　　經(jīng)測(cè)試此學(xué)生宿舍管理系統(tǒng)基本上能完成用戶注冊(cè)、登錄；學(xué)生信息的登記、查詢、刪除；數(shù)據(jù)的備份、恢復(fù)等功能 。</p><p><b>　　第七章 小結(jié)</b&g

94、t;</p><p>　　經(jīng)過長(zhǎng)時(shí)間的分析、設(shè)計(jì)、制作、完善，本系統(tǒng)已經(jīng)實(shí)現(xiàn)了用戶注冊(cè)，學(xué)生信息登記、查詢，違紀(jì)登記、查詢，數(shù)據(jù)備份、恢復(fù)等功能。學(xué)生宿舍管理信息系統(tǒng)操作方便，簡(jiǎn)單實(shí)用。該系統(tǒng)主要實(shí)現(xiàn)了數(shù)據(jù)錄入、數(shù)據(jù)查詢、數(shù)據(jù)管理等功能。</p><p>　　整個(gè)管理系統(tǒng)分為兩大部分：前臺(tái)的操作和后臺(tái)數(shù)據(jù)庫(kù)的管理維護(hù)。后臺(tái)數(shù)據(jù)庫(kù)的管理用以確保系統(tǒng)各項(xiàng)功能的正常運(yùn)行、數(shù)據(jù)的完整性和安全性，前

95、臺(tái)操作提供給盡可能方便快捷的操作。</p><p>　　本系統(tǒng)經(jīng)過測(cè)試以后能夠正常的運(yùn)行。由于知識(shí)、精力有限，該系統(tǒng)還有許多不盡如人意的地方，比如功能較少，輸入數(shù)據(jù)限制不全等。</p><p>　　軟件開發(fā)是一個(gè)不斷完善的過程，只有在實(shí)際的使用過程中才能不斷的發(fā)現(xiàn)問題，從而再加以改進(jìn)。而在系統(tǒng)的設(shè)計(jì)過程中，難免會(huì)出現(xiàn)一些預(yù)測(cè)不到的異常，這些異常甚至在系統(tǒng)測(cè)試階段檢查不出來，只有在用戶的使用

96、過程中才能發(fā)現(xiàn)。很多地方未能考慮周全系統(tǒng)存在著很多不足之處。這需要在以后系統(tǒng)維護(hù)過程中逐步發(fā)現(xiàn)，并不斷進(jìn)行升級(jí)，進(jìn)一步改善。</p><p><b>　　參考文獻(xiàn)</b></p><p>　　[1]田萍芳等：《Visual Basic 程序設(shè)計(jì)基礎(chǔ)》，中國(guó)鐵道出版社 2011年第1版 </p><p>　　[2]何新權(quán)：《全國(guó)計(jì)算機(jī)等級(jí)考試三級(jí)

97、教程——信息管理技術(shù)》，高等教育出版社 2010年第1版</p><p>　　[3]劉瑞新：《Visul Basic 程序設(shè)計(jì)教程》，電子工業(yè)出版社 2000年3月</p><p>　　[4]陳承歡：《信息系統(tǒng)應(yīng)用與開發(fā)》，清華大學(xué)出版社 2011年第1期 </p><p>　　[5]趙乃真：《Access 數(shù)據(jù)庫(kù)基礎(chǔ)教程》，清華大學(xué)出版社 2006年第1版<

98、/p><p>　　[6]連衛(wèi)民、王秀玲主編：《計(jì)算機(jī)基礎(chǔ)教程》，香港天馬圖書有限公司2007年版</p><p>　　[7]衛(wèi)紅春，朱欣娟：《信息系統(tǒng)分析與設(shè)計(jì)》．西安：西安電子科技大學(xué)出版社，2008年</p><p>　　[8]陳禹：《新編管理信息系統(tǒng)》，中國(guó)人民大學(xué)出版社 2008年第1版</p><p>　　[9]姬小利：《ERP原理、應(yīng)

99、用與實(shí)踐教程》，立信會(huì)計(jì)出版社 2011年第1版</p><p>　　[10]趙超：《企業(yè)信息化綜合實(shí)訓(xùn)》，中國(guó)鐵道出版社 2011年第1版</p><p><b>　　致 謝</b></p><p>　　此畢業(yè)論文結(jié)束，畢業(yè)設(shè)計(jì)完成之際，我們特別感謝我的指導(dǎo)老師—xx老師，他負(fù)責(zé)任的指導(dǎo)和建議使我受益非淺，他每時(shí)每刻的督促使我們不敢有絲毫的怠