學(xué)生公寓管理系統(tǒng)-VB編程畢業(yè)設(shè)計(jì)

1、中文摘要隨著電腦的普及與使用，現(xiàn)在的管理也提升了一個(gè)檔次，漸漸實(shí)現(xiàn)了無(wú)紙化辦公，即從原來(lái)的人工記錄管理模式轉(zhuǎn)變?yōu)殡娔X一體化管理。高校是科研的陣地，后勤的公寓管理也應(yīng)該一改傳統(tǒng)的人工管理，更加信息化，時(shí)代化，節(jié)省人力物力，提高效率?；谶@一點(diǎn)，開發(fā)此學(xué)生公寓管理軟件。學(xué)生公寓管理軟件，是以高校的管理方式為實(shí)例而設(shè)計(jì)的一種實(shí)用型管理系統(tǒng)。本系統(tǒng)最大的特點(diǎn)是通用性、簡(jiǎn)單操作性，適用于同行業(yè)以及一些同類型的企業(yè)管理。隨著學(xué)校寄宿人員的增多，公寓管理人員的負(fù)擔(dān)越來(lái)越重，為了讓所有公寓管理人員能從繁重的工作中解脫出來(lái)，實(shí)現(xiàn)無(wú)紙化辦公；使工作更有條理，更方便，更有效率而開發(fā)出這套公寓管理軟件。軟件從對(duì)學(xué)生的

2、分房開始到最后的公寓管理全部電腦化。它主要包括：公寓、寢室的配置、住宿人員登記、衛(wèi)生檢查、公寓資產(chǎn)、學(xué)生違紀(jì)、值班老師記錄以及對(duì)學(xué)生住宿情況查詢，可以更快地了解到每個(gè)學(xué)生的住宿情況,使公寓的管理效率更高，做的更好！關(guān)鍵字：配置、登記、檢查AbstractWith the popularization and use of the computer, present management has been promoted much, more and more jobs have been done by computer. It namely changes the original art

3、ificial record management mode into computers integrating and managing. The university is the position of scientific research, the apartment management should change traditional managing artificially too, for the efficiency. So , develop the management software of students apartment .Student Apartme

4、nt Management System is a utility management system based on the managing mode of many universities and colleges.Universal and easy-operating are the greatest features of the system ,which is also applicable for enterprises of the same type.Apartment keepers bear a increasingly heavy burden because

5、of the gradually added number of roomers.In order to free apartment keepers from the heave work,and make the work more convienent and efficient. The apartment management system is developed. The system computerized all the processes concerning the apartment management which include apartment,dormito

6、ry distribution,roomer registration,santitation examination,and the query for apartment property,students violation of discipline,teachers records and rooming situation.It makes the apartment management more efficient and much better.Key word: dispose 、 register 、 check目錄引言4第一章系統(tǒng)分析51.1開發(fā)工具簡(jiǎn)介及系統(tǒng)運(yùn)行環(huán)境5

7、1.2開發(fā)的必要性61.3系統(tǒng)開發(fā)的可行性71.4數(shù)據(jù)來(lái)源81.5新系統(tǒng)數(shù)據(jù)流程圖9第二章 數(shù)據(jù)庫(kù)設(shè)計(jì)12第三章功能模塊設(shè)計(jì)163.1新系統(tǒng)功能結(jié)構(gòu)圖及運(yùn)行圖如下：163.2系統(tǒng)設(shè)置:173.3公寓管理183.4 衛(wèi)生檢查193.5 公寓資產(chǎn)203.6 記錄查看與記錄刪除203.7值班記錄203.8幫助制作21第四章 程序設(shè)計(jì)22主程序流程圖224.1 登錄界面234.2 程序主界面264.3系統(tǒng)設(shè)置324.4公寓管理574.5衛(wèi)生檢查604.6 公寓資產(chǎn)644.7記錄查看664.8記錄刪除744.9值班記錄814.10 Help制作88第五章 系統(tǒng)測(cè)試90總結(jié)91參考文獻(xiàn)92引言隨著電腦的普

8、及與應(yīng)用，現(xiàn)在的管理也需要提升一個(gè)檔次。即從原來(lái)的手工記錄管理模式轉(zhuǎn)變?yōu)殡娔X一體化管理。這樣會(huì)給公寓的管理人員帶來(lái)很多好處，讓他們管理的效率更高、效果更好，管理起來(lái)更方便。由此而產(chǎn)生了本管理軟件學(xué)生公寓管理軟件。學(xué)生公寓管理軟件是用Microsoft Visual Basic編寫完成。由于Visual Basic率先采用了可視化（VISUAL）的程序設(shè)計(jì)方法。所以利用系統(tǒng)提供的大量可視化控件，可以方便的以可視化方式直接繪制用戶圖形界面，并可直觀，動(dòng)態(tài)的調(diào)整界面的風(fēng)格和樣式，直到滿意為止，從而克服了以前必須用大量代碼去描述界面元素的外觀和位置的傳統(tǒng)編程模式。做起來(lái)方便，使用起來(lái)更為快捷。作為一個(gè)

9、學(xué)生公寓的管理軟件，要十分全面的貼近以及適合大學(xué)公寓的管理方法。本軟件的參考資料主要有兩種來(lái)源：一是參考本學(xué)校公寓的管理結(jié)構(gòu)，管理方法。如各個(gè)公寓的分布特色，以及公寓的各種管理制度。這些資料是本軟件的主要依據(jù)，也可以說這些資料來(lái)源于普通的生活，比較真實(shí)一些。二是來(lái)源于網(wǎng)絡(luò)上的各種同類軟件，通過這些軟件可以看出一個(gè)公寓最低需要哪些管理與設(shè)置，在這些軟件中，有些軟件功能比較齊全，但是在管理上顯的非常的不方便，使用起來(lái)十分麻煩、繁瑣，有些雖然簡(jiǎn)單，但是功能上又不是十分完善，對(duì)這些軟件首先要進(jìn)行取其精華，棄其糟粕，從而進(jìn)行編寫。本軟件主要包括以下方面：系統(tǒng)設(shè)置、公寓管理、衛(wèi)生檢查、公寓資產(chǎn)、記錄查看、

10、記錄刪除、值班記錄、幫助制作。學(xué)生公寓管理軟件。它目前在功能上，以及操作的簡(jiǎn)便上有很大的改進(jìn)。但是還是存在一些不足，在有些功能的實(shí)現(xiàn)上還不是十分的理想，這也是本人在時(shí)間和精力上留下的遺憾。但是相信這些會(huì)在以后的版本中得到完善，使這個(gè)軟件成為一個(gè)功能上最全，使用上最簡(jiǎn)捷方便的管理軟件。第一章系統(tǒng)分析系統(tǒng)采用MICROSOFT公司的 VISUAL BASIC語(yǔ)言編寫的學(xué)生公寓管理系統(tǒng),本系統(tǒng)在研制開發(fā)過程中，嚴(yán)格遵循軟件工程方法，完全采用結(jié)構(gòu)化程序設(shè)計(jì)方法。本系統(tǒng)的主要功能可以方便的對(duì)學(xué)生公寓進(jìn)行管理，系統(tǒng)采用ACCESS數(shù)據(jù)庫(kù)使數(shù)據(jù)具有較強(qiáng)的完整性、較好的數(shù)據(jù)安全性等特點(diǎn)以及提供了標(biāo)準(zhǔn)的幫助，使

11、用戶方便的獲得所需的幫助。界面友好、操作簡(jiǎn)單、功能齊全、具有較好的人機(jī)接口界面是本系統(tǒng)的最大優(yōu)點(diǎn)。1.1開發(fā)工具簡(jiǎn)介及系統(tǒng)運(yùn)行環(huán)境111 VB6簡(jiǎn)介 本軟件的開發(fā)工具為VISUAL BASIC，作為一種開發(fā)語(yǔ)言，VISUAL BASIC率先采用了可視化（VISUAL）的程序設(shè)計(jì)方法。利用系統(tǒng)提供的大量可視化控件，可以方便的以可視化方式直接繪制用戶圖形界面，并可直觀、動(dòng)態(tài)的調(diào)整界面的風(fēng)格和樣式，直到滿意為止，從而克服了以前必須用大量代碼去描述界面元素的外觀和位置的傳統(tǒng)編程模式。它還擁有面向?qū)ο蟮木幊谭椒?。面向?qū)ο蟮某绦蛟O(shè)計(jì)是伴隨WIDNOWS圖形界面的誕生而產(chǎn)生的一種新的程序設(shè)計(jì)思想，與傳統(tǒng)程序

12、設(shè)計(jì)有著較大的區(qū)別，VISUAL BASIC采用了面向?qū)ο蟮某绦蛟O(shè)計(jì)思想。所謂“對(duì)象”就是現(xiàn)實(shí)生活中的每個(gè)一人，每一個(gè)可見的實(shí)體。同樣，在VISUAL BASIC中，用來(lái)構(gòu)成用戶圖形界面的可視化控件，也可視為是一個(gè)對(duì)象。不同的對(duì)象，在程序中所賦給它的功能是不同的，比如，在圖形界面上有兩個(gè)命令按鈕，一個(gè)用來(lái)實(shí)現(xiàn)數(shù)據(jù)的統(tǒng)計(jì)計(jì)算，另一個(gè)用來(lái)實(shí)現(xiàn)數(shù)據(jù)的打印，這兩個(gè)按鈕就可視為是兩個(gè)不同的對(duì)象，為了實(shí)現(xiàn)這兩個(gè)對(duì)象各自不同的功能，接下來(lái)就應(yīng)該分別針對(duì)這兩個(gè)對(duì)象編寫程序代碼，這種編程的思想和方法即為所謂的“面向?qū)ο蟮某绦蛟O(shè)計(jì)”。它還支持第三方軟件商為其開發(fā)的可視化控制對(duì)象，如本例中就用到了一個(gè)。這些可視化控

13、件對(duì)應(yīng)的文件擴(kuò)展名這OCX。只要擁有控件的OCX文件，就可將其加入到VB系統(tǒng)中，從而大大增強(qiáng)VB的編程實(shí)力。使軟件做起來(lái)會(huì)更加得心應(yīng)手。112 HELP 制作 制作help文檔需要一個(gè)專業(yè)制作軟件，本人使用的是破解版的QuickCHM，此軟件無(wú)論在功能上還在是操作上用起來(lái)都是很方便。它屬于一個(gè)傻瓜型的制作軟件，利用它可以快速的制作出各種你所需要的幫助文檔。但是如果想制作出幫助文檔，就需要使用制作網(wǎng)頁(yè)的軟件把內(nèi)容先做成html形式，本人使用Dreamweaver制作的網(wǎng)頁(yè)，然后在用此軟件進(jìn)行加載，最后生成chm文檔。1.2開發(fā)的必要性信息資源已成為各個(gè)部門的重要財(cái)富和資源，建立一個(gè)滿足各級(jí)部門信

14、息處理需要的信息系統(tǒng)，也一個(gè)企業(yè)或組織生存越來(lái)越重要的信息資源。長(zhǎng)期以來(lái)，使用傳統(tǒng)人工的方法管理高校公寓，這種管理方式存在著許多缺點(diǎn)，如：效率低。而且時(shí)間一長(zhǎng)，將產(chǎn)生大量的文件和數(shù)據(jù)，這對(duì)于查找、更新、維護(hù)都帶來(lái)了不少的困難。隨著科學(xué)技術(shù)的不斷提高，計(jì)算機(jī)科學(xué)日漸成熟，其強(qiáng)大的功能已為人們深刻認(rèn)識(shí)，它已進(jìn)入人類社會(huì)的各個(gè)領(lǐng)域并發(fā)揮越來(lái)越重要的作用。學(xué)生公寓管理軟件，是以高校的管理方式為實(shí)例而設(shè)計(jì)的一種實(shí)用型管理軟件。本系統(tǒng)最大的特點(diǎn)是通用性、簡(jiǎn)單操作性。隨著學(xué)校寄宿人員的增多，公寓管理人員的負(fù)擔(dān)越來(lái)越重，為了讓所有公寓管理人員能從繁重的工作中解脫出來(lái)，實(shí)現(xiàn)無(wú)紙化辦公，使工作更有條理、更方便、更

15、有效率，而開發(fā)出這套公寓管理軟件。1.3系統(tǒng)開發(fā)的可行性131 技術(shù)上的可行性我們正走進(jìn)一個(gè)信息時(shí)代，信息技術(shù)將從根本上改變?nèi)祟惿鐣?huì)的生產(chǎn)方式和生活方式，各行各業(yè)的業(yè)務(wù)管理現(xiàn)在都已經(jīng)相繼使用計(jì)算機(jī)來(lái)處理，可以說用計(jì)算機(jī)進(jìn)行信息管理是一個(gè)總趨勢(shì)。學(xué)生公寓管理軟件主要是對(duì)公寓、寢室的配置、住宿人員登記、衛(wèi)生檢查、公寓資產(chǎn)、學(xué)生違紀(jì)、值班老師記錄以及對(duì)學(xué)生住宿情況查詢，修改，更新等?？梢愿斓亓私獾矫總€(gè)學(xué)生的住宿情況。開發(fā)一個(gè)學(xué)生公寓管理系統(tǒng)可以達(dá)到事半功倍的效果。隨著數(shù)據(jù)庫(kù)管理系統(tǒng)的普及以及可視化編程軟件的出現(xiàn)，使數(shù)據(jù)庫(kù)管理信息系統(tǒng)的開發(fā)變得更為簡(jiǎn)單，因此開發(fā)一個(gè)學(xué)生公寓管理系統(tǒng)是完全可行的。13

16、2 經(jīng)濟(jì)上的可行性本單位有自己的微機(jī)室可以使用，不必重新購(gòu)置計(jì)算機(jī)，不需要花費(fèi)大量資金，是一個(gè)節(jié)約人力物力的好辦法。133 組織管理上的可行性本單位的領(lǐng)導(dǎo)干部具有較高的素質(zhì)，它們對(duì)管理現(xiàn)代化有較高的認(rèn)識(shí)水平，并且有各級(jí)領(lǐng)導(dǎo)的大力支持和重視。綜上所述，建立一個(gè)學(xué)生公寓管理軟件與人工操作相比具有速度更快，操作更準(zhǔn)確，更節(jié)約開支等有利之處，因此建立一個(gè)學(xué)生公寓管理軟件是必要可行。1.4數(shù)據(jù)來(lái)源作為一個(gè)學(xué)生公寓的管理軟件，要十分全面的貼近以及適合大學(xué)公寓的管理方法。本軟件的參考資料主要有兩種來(lái)源：一是參考本學(xué)校公寓的管理結(jié)構(gòu)，管理方法，這些資料是本軟件的主要依據(jù)，也可以說這些資料來(lái)源于普通的生活，比較

17、真實(shí)一些。二是來(lái)源于網(wǎng)絡(luò)上的各種同類軟件，通過這些軟件可以看出一個(gè)公寓最低需要哪些管理與設(shè)置，在這些軟件中，有些軟件功能比較齊全，但是在管理上顯的非常的不方便，使用起來(lái)十分麻煩、繁瑣，有些雖然簡(jiǎn)單，但是功能上又不是十分完善，對(duì)這些軟件首先要進(jìn)行取其精華，棄其糟粕，從而進(jìn)行編寫。1.5新系統(tǒng)數(shù)據(jù)流程圖圖1.1數(shù)據(jù)流程圖數(shù)據(jù)字典圖1.2 數(shù)據(jù)元素注：其它數(shù)據(jù)元素略圖1.3 數(shù)據(jù)流注：其它數(shù)據(jù)流略圖1.4 加工注：其它加工略注：其它數(shù)據(jù)存儲(chǔ)略第二章 數(shù)據(jù)庫(kù)設(shè)計(jì)1、ER圖圖2.1 ER圖2、信息的數(shù)量越來(lái)越大，數(shù)據(jù)庫(kù)的作用越發(fā)突出,所以數(shù)據(jù)庫(kù)的建立是系統(tǒng)施實(shí)的主要部分之一，它關(guān)系到整個(gè)系統(tǒng)的運(yùn)行情況，

18、是整個(gè)系統(tǒng)的重要組成部分。本系統(tǒng)數(shù)據(jù)庫(kù)為db.mdb，在數(shù)據(jù)庫(kù)中包括十個(gè)表。分別是：用戶表、公寓表、班級(jí)表、寢室表、衛(wèi)生等級(jí)表、學(xué)生基本情況表、學(xué)生請(qǐng)假情況表、學(xué)生違規(guī)情況表、寢室衛(wèi)生情況表、資產(chǎn)表。下面介紹幾個(gè)主要的表： 學(xué)生基本情況表主要是存放學(xué)生的基本情況，字段包括：姓名、性別、學(xué)號(hào)、班級(jí)、公寓、寢室、入學(xué)時(shí)間、年制、寢室電話、個(gè)人電話、備注。數(shù)據(jù)結(jié)構(gòu)如下表：字段名數(shù)據(jù)類型數(shù)據(jù)長(zhǎng)度姓名文本8性別文本2學(xué)號(hào)文本10班級(jí)文本10公寓文本20寢室文本10入學(xué)時(shí)間文本14年制文本8個(gè)人電話文本15備注備注 學(xué)生請(qǐng)假情況表主要存放學(xué)生請(qǐng)假情況，字段包括：日期、姓名、班級(jí)、公寓、寢室、天數(shù)、原因、老

19、師、備注。數(shù)據(jù)結(jié)構(gòu)如下表：字段名數(shù)據(jù)類型數(shù)據(jù)長(zhǎng)度日期文本14姓名文本8班級(jí)文本10公寓文本20寢室文本10天數(shù)文本10原因備注老師文本8備注備注 學(xué)生違規(guī)情況表主要存放學(xué)生違規(guī)情況，字段包括：日期、姓名、班級(jí)、公寓、寢室、原因、程度、處罰、備注。數(shù)據(jù)結(jié)構(gòu)如下表：字段名數(shù)據(jù)類型數(shù)據(jù)長(zhǎng)度日期文本14姓名文本8班級(jí)文本10公寓文本20寢室文本10原因備注程度備注處罰備注備注備注 衛(wèi)生情況表主要存放寢室衛(wèi)生情況，字段包括：日期、公寓、寢室、檢查1到5、得分、減分、等級(jí)、備注。其中檢查1到5是為了在沒有使用者想輸入的記錄的情況下自己輸入而設(shè)計(jì)的，保證了系統(tǒng)的可修改性、可擴(kuò)展性。數(shù)據(jù)結(jié)構(gòu)如下表：字段名數(shù)據(jù)

20、類型數(shù)據(jù)長(zhǎng)度日期文本14公寓文本20寢室文本10檢查1文本40檢查2文本40檢查3文本40檢查4文本40檢查5文本40得分文本4減分文本4等級(jí)文本6備注備注 資產(chǎn)表主要存放寢室新增資產(chǎn)情況，字段包括：日期、公寓、名稱、數(shù)量、單價(jià)、總價(jià)、用途、備注。數(shù)據(jù)結(jié)構(gòu)如下表：字段名數(shù)據(jù)類型數(shù)據(jù)長(zhǎng)度日期文本14公寓文本20名稱文本20數(shù)量文本4單價(jià)文本10總價(jià)文本10用途備注備注備注第三章功能模塊設(shè)計(jì)3.1新系統(tǒng)功能結(jié)構(gòu)圖及運(yùn)行圖如下：1、系統(tǒng)功能結(jié)構(gòu)圖：圖3.1系統(tǒng)功能結(jié)構(gòu)圖2、系統(tǒng)功能結(jié)構(gòu)圖運(yùn)行圖：圖3.2系統(tǒng)功能結(jié)構(gòu)運(yùn)行圖經(jīng)過系統(tǒng)分析，確定了本軟件主要包括以下方面：系統(tǒng)設(shè)置、公寓管理、衛(wèi)生檢查、公寓資

21、產(chǎn)、記錄查看、記錄刪除、值班記錄、幫助制作。3.2系統(tǒng)設(shè)置:主要完成：用戶管理、公寓設(shè)置、數(shù)據(jù)備份、數(shù)據(jù)轉(zhuǎn)換、退出的功能。運(yùn)行圖如下:圖3.3系統(tǒng)設(shè)置運(yùn)行圖3.2.1 用戶管理可以進(jìn)行管理人員的添加和修改以及刪除操作。添加人員可以分為兩類：普通用戶、管理員。可以視不同人員而添加。管理員擁有所有權(quán)力，對(duì)整個(gè)系統(tǒng)的操作。普通用戶只有瀏覽、及一些簡(jiǎn)單的添加操作權(quán)力。無(wú)用戶設(shè)置、公寓設(shè)置及記錄刪除等權(quán)力。3.2.2公寓設(shè)置分為三個(gè)主要的操作：公寓設(shè)置、寢室設(shè)置、班級(jí)設(shè)置。在這里可以添加學(xué)校所有的公寓、所有班級(jí)、每個(gè)公寓的所有寢室,也可以用此軟件管理一幢公寓。這樣操作起來(lái)會(huì)更簡(jiǎn)單、操作一目了然。3.2.

22、3數(shù)據(jù)備份這是一個(gè)數(shù)據(jù)管理軟件所必不可少的一部分，利用它可以及時(shí)的備份當(dāng)前的數(shù)據(jù)庫(kù)以及在出現(xiàn)故障后利用已保存的數(shù)據(jù)進(jìn)行恢復(fù)。3.2.4數(shù)據(jù)轉(zhuǎn)換利用數(shù)據(jù)轉(zhuǎn)換將當(dāng)前數(shù)據(jù)庫(kù)中的表轉(zhuǎn)換成Excel表格的形式，顯示更為直觀，可以進(jìn)行打印等操作。3.3公寓管理主要完成：學(xué)生請(qǐng)假、學(xué)生違規(guī)、床位設(shè)置的功能。運(yùn)行圖如下:圖3.4公寓管理運(yùn)行圖3.3.1學(xué)生請(qǐng)假主要是對(duì)學(xué)生請(qǐng)假記錄做一個(gè)添加。利用它可以把學(xué)生的基本的請(qǐng)假資料保存起來(lái)。3.3.2學(xué)生違規(guī)主要是對(duì)學(xué)生違規(guī)記錄做一個(gè)添加。利用它可以把學(xué)生的基本的違規(guī)資料保存起來(lái)。3.3.3床位設(shè)置通過床位設(shè)置可以簡(jiǎn)單查看每個(gè)公寓每個(gè)寢室的床位使用情況以及床位剩余情況

23、。還可以通過詳細(xì)查看，查看到某個(gè)公寓某個(gè)寢室住宿人員的人數(shù)，以及具體的住宿人員的名字。3.4 衛(wèi)生檢查主要完成：添加檢查記錄的功能。衛(wèi)生檢查可以對(duì)衛(wèi)生檢查的結(jié)果進(jìn)行記錄。這里的衛(wèi)生標(biāo)準(zhǔn)一共有五項(xiàng)可以填寫，在每一項(xiàng)里已經(jīng)基本設(shè)置了所不合標(biāo)準(zhǔn)的記錄，你可以在下拉列表框中進(jìn)行選擇即可，但是如果沒有你想輸入的記錄的話，也可以自己輸入。運(yùn)行圖如下:圖3.5衛(wèi)生檢查運(yùn)行圖3.5 公寓資產(chǎn)主要完成：添加新增物品的功能?？梢詫?duì)公寓資產(chǎn)的收入或其它物品的入庫(kù)進(jìn)行記錄。運(yùn)行圖如下:圖3.6公寓資產(chǎn)運(yùn)行圖3.6 記錄查看與記錄刪除主要是對(duì)學(xué)生請(qǐng)假、學(xué)生違規(guī)、衛(wèi)生記錄，公寓資產(chǎn)等記錄所進(jìn)行的操作，利用這兩個(gè)功能可以對(duì)

24、任一記錄進(jìn)行查看與刪除。運(yùn)行圖如下: 圖3.7記錄查看 圖3.8記錄刪除運(yùn)行圖3.7值班記錄它的功能主要是針對(duì)值班人員開發(fā)出來(lái)的，在這里可以讓值班人員對(duì)當(dāng)天值班情況進(jìn)行一個(gè)小記，以便日后查看。運(yùn)行圖如下:圖3.9值班記錄運(yùn)行圖3.8幫助制作對(duì)于一個(gè)稍顯正規(guī)的軟件來(lái)說幫助的制作都是必不可少的內(nèi)容，本程序也不例外，制作了此幫助文檔。在程序中可以按F1或點(diǎn)擊幫助菜單來(lái)顯示此help.Chm文檔。以便對(duì)本軟件進(jìn)行快速操作。運(yùn)行圖如下:圖3.10幫助運(yùn)行圖第四章 程序設(shè)計(jì)主程序流程圖4.1 登錄界面此界面是由Photoshop制作而成。在做這個(gè)登錄面的時(shí)候想了很多，最后選擇了這種，感覺它看起來(lái)干凈，整齊

25、。又不失其莊雅。加上本單位最有特色的建筑，會(huì)讓人一目了然。4.1.1 登錄圖片顯示圖4.1登錄界面4.1.2 界面制作與實(shí)現(xiàn) 在這個(gè)界面中，主要處理的是判斷當(dāng)前用戶輸入的信息是否正確。如果正確，那么它屬于哪種類型用戶。因?yàn)榇斯芾碥浖诘卿浐蟛煌愋偷挠脩麸@示的窗體與實(shí)現(xiàn)的功能都不是一樣的，它們會(huì)有所差別！(1) 浮動(dòng)按鈕的實(shí)現(xiàn) 確定和取消兩個(gè)按鈕在鼠標(biāo)沒有放上去之前看上去只是一個(gè)普通的平面字效果，但是當(dāng)你把鼠標(biāo)放在這幾個(gè)字上面后，它會(huì)顯示凸出的效果，按下后呈現(xiàn)凹陷的效果?？傮w實(shí)現(xiàn)立體的感覺。原理主要是在鼠標(biāo)mousemove事件與線的顏色變化組合來(lái)實(shí)現(xiàn)。主要代碼如下： 在窗體中的鼠標(biāo)移動(dòng)過程中

26、，以及在窗體初始化的時(shí)候，要把添加的線的.Visible 屬性設(shè)置為 False，只有在鼠標(biāo)按下的時(shí)候在改變其顏色即可。Private Sub Form_MouseMove(Button As Integer, Shift As Integer, x As Single, Y As Single)Line1.Visible = FalseLine2.Visible = FalseLine3.Visible = FalseLine4.Visible = FalseLine5.Visible = FalseLine6.Visible = FalseLine7.Visible = FalseLine

27、8.Visible = FalseEnd Sub 鼠標(biāo)按下的時(shí)候設(shè)置線條的顏色如下：Private Sub Label3_MouseDown(Button As Integer, Shift As Integer, x As Single, Y As Single)Line1.BorderColor = &H808080Line2.BorderColor = &H808080Line3.BorderColor = &HE0E0E0Line4.BorderColor = &HE0E0E0End Sub 鼠標(biāo)移動(dòng)到標(biāo)簽的時(shí)候設(shè)置線條的顏色如下：Private Sub Label3_MouseMov

28、e(Button As Integer, Shift As Integer, x As Single, Y As Single)Line1.BorderColor = &HE0E0E0Line2.BorderColor = &HE0E0E0Line3.BorderColor = &H808080Line4.BorderColor = &H808080Line1.Visible = TrueLine2.Visible = TrueLine3.Visible = TrueLine4.Visible = TrueEnd Sub(2) 用戶類型判斷 在數(shù)據(jù)庫(kù)中建了一人yonghu表。在添加管理人員時(shí)有

29、兩種默認(rèn)級(jí)別。管理員、普通用戶。管理員擁有對(duì)數(shù)據(jù)庫(kù)操作的一切權(quán)限。普通用戶只有普通的查看，數(shù)據(jù)轉(zhuǎn)換等。沒有刪除等操作功能。前用戶成功登錄后，會(huì)在主窗體的狀態(tài)欄中顯示出當(dāng)前用戶及其用戶類型。主要代碼如下：設(shè)置當(dāng)前控件連接的數(shù)據(jù)庫(kù)Dim provider As StringDim datasource As Stringprovider = provider=Microsoft.jet.oledb.4.0datasource = data source= & App.Path & DB.mdbWith Adodc1.Mode = adModeReadWrite.ConnectionString =

30、 provider & ; & datasource.CommandType = adCmdTable.RecordSource = yonghu.Refresh.Recordset.MoveFirstEnd With對(duì)用戶進(jìn)行判斷If Text1.Text = ThenMsgBox 請(qǐng)輸入用戶名!, 48, 提示Exit SubEnd IfAdodc1.Recordset.Find 用戶= & Text1.Text & If Adodc1.Recordset.EOF = False And Text2.Text = Trim(Adodc1.Recordset.Fields(pass) The

31、nmain.Text1.Text = Adodc1.Recordset.Fields(級(jí)別)main.Text2.Text = Adodc1.Recordset.Fields(用戶)main.ShowUnload MeElseText1.Text = Text2.Text = MsgBox 登錄不成功,請(qǐng)重新登錄!, 48, 提示End If4.2 程序主界面程序主界面為本軟件的顯示的核心部分。一切主要操作及顯示都通過這里完成。整個(gè)界面主要由五部分組成。菜單部分、工具欄、左側(cè)操作欄、右側(cè)顯示欄以及狀態(tài)欄。界面效果圖如下：圖4.2程序主界面菜單欄的詳見附錄內(nèi)容，這里就不提了。左側(cè)操作欄和右側(cè)顯示

32、欄會(huì)在下面的內(nèi)容中做介紹，現(xiàn)在只簡(jiǎn)單介紹一下工具欄和狀態(tài)欄，以及主窗體的各個(gè)事件。工具欄主要是由coolbar制作而成。由它制做的工具欄的顯示效果會(huì)更有立體感一些。這里只列出了幾個(gè)常用的按鈕。其中的添加按鈕是用來(lái)對(duì)公寓住宿人員進(jìn)行添加，修改也是對(duì)所住宿人員進(jìn)行修改，想要進(jìn)行修改時(shí)必須顯示所有記錄時(shí)才可以進(jìn)行。在這里值得一提的是刪除DataGrid的操作，由于不知道它的當(dāng)前數(shù)據(jù)源是哪個(gè)，所以在刪除前要確定它的數(shù)據(jù)源，也就是它所鏈接的adodc1的數(shù)據(jù)源，或者是其它ado控件對(duì)它的數(shù)據(jù)源進(jìn)行重新綁定后的數(shù)據(jù)庫(kù)表，也有可能是經(jīng)過一個(gè)查詢后得到的記錄。它的實(shí)現(xiàn)方法如下所示：Dim o As Adodc

33、Set o = DataGrid1.datasource o.Recordset.Delete o.Recordset.Update這里主要是用到了ado對(duì)像的方法。用這個(gè)方法得到數(shù)據(jù)源。 下面是整個(gè)工具欄運(yùn)行時(shí)代碼：Select Case Button.IndexCase 1sel.Show 1Case 3add.Show 1Case 5On Error GoTo next2Dim s As AdodcSet s = DataGrid1.datasourceIf s.RecordSource = users Thenedit.Show 1End Ifnext2:Case 7On Error

34、Resume NextDim o As AdodcSet o = DataGrid1.datasource o.Recordset.Delete o.Recordset.UpdateCase 9back.Show 1Case 11With Adodc1.Mode = adModeReadWrite.ConnectionString = provider & ; & datasource.CommandType = adCmdTable.RecordSource = users .RefreshEnd WithSet DataGrid1.datasource = Adodc1DataGrid1.

35、RefreshCall dxCase 13Unload MeEnd Select狀態(tài)欄分四個(gè)部分。第一個(gè)為固定顯示當(dāng)前所用軟件名稱及作者。其中第二個(gè)和第三部分為動(dòng)態(tài)顯示的，它會(huì)顯示出每次用戶登錄名稱及其管理模式。由上圖可以看出，lf為本軟件管理員。第四部分為日期與時(shí)間的顯示。其中第三部分的代碼實(shí)現(xiàn)如下：main.Text1.Text = Adodc1.Recordset.Fields(級(jí)別)main.Text2.Text = Adodc1.Recordset.Fields(用戶)StatusBar1.Panels(2).Text = 當(dāng)前用戶： & Text2.TextStatusBar1.P

36、anels(3).Text = 用戶模式： & Text1.TextStatusBar1.Panels(4).Text = Date & & Time設(shè)置普通用戶模式If Text1.Text = 普通用戶 Thenyhgl.Visible = Falseg1.Visible = Falsejlsc.Visible = Falsegysz.Visible = FalseToolbar1.Buttons(5).Visible = FalseToolbar1.Buttons(6).Visible = FalseToolbar1.Buttons(7).Visible = FalseToolbar1.

37、Buttons(8).Visible = FalseEnd If主窗體在程序運(yùn)行中會(huì)遇到不斷改變其大小，最小化，最大化，以及用鼠標(biāo)來(lái)改變，這里需要在窗體的Resize事件中添加代碼，讓程序中用到的各個(gè)控件隨時(shí)可以適應(yīng)窗體改變后的大小，在這里改變的控件主要有DataGrid、TreeView系列及Frame控件、StatusBar。下面就是設(shè)置它們大小的程序代碼：DataGrid1.Width = main.Width - SSTab1.WidthDataGrid1.Height=main.Height - StatusBar1.Height - CoolBar1.Height - 750SST

38、ab1.Height = main.Height - StatusBar1.Height - CoolBar1.Height - 750Frame1.Height = main.Height - StatusBar1.Height - CoolBar1.Height - 1200Frame2.Height = main.Height - StatusBar1.Height - CoolBar1.Height - 1200Frame3.Height = main.Height - StatusBar1.Height - CoolBar1.Height - 1200TreeView1.Height

39、=main.Height - StatusBar1.Height - CoolBar1.Height - 1500TreeView2.Height=main.Height - StatusBar1.Height - CoolBar1.Height - 1500TreeView3.Height=main.Height - StatusBar1.Height - CoolBar1.Height - 1500Y = main.Widthx = (Y - z) / 4StatusBar1.Panels(1).Width = u + xStatusBar1.Panels(2).Width = v + x

40、StatusBar1.Panels(3).Width = w + xStatusBar1.Panels(4).Width = m + x這個(gè)軟件的主要部分都在這里運(yùn)行、查看，所以在主窗體的load事件里要把所用的到的東西都要加載進(jìn)來(lái)，例如所在程序運(yùn)行時(shí)所用到的表，左側(cè)treeview部分樹形顯示的初始化。在這里幾乎用到了所有的表，如下所示：provider = provider=Microsoft.jet.oledb.4.0datasource = data source= & App.Path & DB.mdbWith Adodc1.Mode = adModeReadWrite.Connec

41、tionString = provider & ; & datasource.CommandType = adCmdTable.RecordSource = users .RefreshEnd WithWith Adodc2.Mode = adModeReadWrite.ConnectionString = provider & ; & datasource.CommandType = adCmdTable.RecordSource = gongyu.RefreshEnd WithWith Adodc3.Mode = adModeReadWrite.ConnectionString = pro

42、vider & ; & datasource.CommandType = adCmdTable.RecordSource = class.RefreshEnd WithWith Adodc4.Mode = adModeReadWrite.ConnectionString = provider & ; & datasource.CommandType = adCmdTable.RecordSource = weisheng.RefreshEnd WithWith Adodc5.Mode = adModeReadWrite.ConnectionString = provider & ; & dat

43、asourceEnd WithWith Adodc6.Mode = adModeReadWrite.ConnectionString = provider & ; & datasource.CommandType = adCmdTable.RecordSource = dengji.RefreshEnd WithWith Adodc7.Mode = adModeReadWrite.ConnectionString = provider & ; & datasource.CommandType = adCmdTable.RecordSource = qinshi.RefreshEnd WithW

44、ith Adodc9.Mode = adModeReadWrite.ConnectionString = provider & ; & datasource.CommandType = adCmdTable.RecordSource = zichan.RefreshEnd Withtreeview部分樹形顯示的初始化在這里已經(jīng)做了幾個(gè)過程，調(diào)用即可。4.3系統(tǒng)設(shè)置4.3.1用戶管理界面效果圖圖4.3用戶管理 界面制作與實(shí)現(xiàn)方法 這個(gè)界面總體來(lái)說各個(gè)控件比較簡(jiǎn)單，但是作為一個(gè)添加刪除管理員的操作，它已經(jīng)連接到了數(shù)據(jù)庫(kù)，與數(shù)據(jù)庫(kù)的yonghu表相聯(lián)。各個(gè)控件也與數(shù)據(jù)庫(kù)中表的字段綁定。在窗體初始化的

45、時(shí)候要判斷當(dāng)前數(shù)據(jù)庫(kù)表中是否有記錄，如果沒有記錄那么有些按鈕將會(huì)被設(shè)置成為失效狀態(tài)，否則會(huì)出現(xiàn)錯(cuò)誤。設(shè)置代碼如下：Dim provider As StringDim datasource As Stringprovider = provider=Microsoft.jet.oledb.4.0datasource = data source= & App.Path & DB.mdbWith Adodc1.Mode = adModeReadWrite.ConnectionString = provider & ; & datasource.CommandType = adCmdTable.Reco

46、rdSource = yonghu.RefreshEnd WithOption1.Enabled = FalseOption2.Enabled = FalseIf Adodc1.Recordset.RecordCount = 0 ThenCommand2.Enabled = FalseCommand3.Enabled = FalseCommand5.Enabled = FalseCommand6.Enabled = FalseEnd IfText2.Text = Text3.Text上一條與下一條的功能一目了然，它們可以對(duì)當(dāng)前表進(jìn)行上一條記錄或下一條記錄依次查看。當(dāng)找到記錄后，可以對(duì)其進(jìn)行相對(duì)

47、的刪除、修改等操作。上一條記錄與下一條的記錄在查看時(shí)有一個(gè)判斷。當(dāng)表中記錄移到最前面（BOF）或最后面（EOF）時(shí)，會(huì)把上一條或下一條其中的一個(gè)按鈕的enable屬性設(shè)置為true。即不可以前查看或向后查看。上一條與下一條主要代碼如下：Adodc1.Recordset.MovePrevious 移動(dòng)記錄Command6.Enabled = TrueIf Adodc1.Recordset.BOF Then Adodc1.Recordset.MoveFirst Command5.Enabled = FalseEnd IfAdodc1.Recordset.MoveNext 移動(dòng)記錄Command5.

48、Enabled = TrueIf Adodc1.Recordset.EOF Then Adodc1.Recordset.MoveLast Command6.Enabled = FalseEnd If添加用戶可以添加使用該管理軟件的用戶。添加的時(shí)候可以選擇所添加人物的級(jí)別。軟件默認(rèn)為兩個(gè)級(jí)別：管理員、普通用戶。管理員擁有對(duì)此軟件管理操作等一切的權(quán)力。普通用戶，只有普通的查看、查詢、備份、添加等權(quán)力。沒有對(duì)記錄刪除等權(quán)力。在添加用戶時(shí)你可以選擇一個(gè)且必須選擇一個(gè)。然后輸入此用戶的用戶名和密碼即可！添加用戶主要代碼：If Command1.Caption = 添加 ThenCommand2.Enab

49、led = FalseCommand5.Enabled = FalseCommand6.Enabled = FalseCommand1.Caption = 確定Command3.Caption = 取消Adodc1.Recordset.AddNewOption1.Enabled = TrueOption2.Enabled = TrueText1.Enabled = TrueText2.Enabled = TrueText3.Enabled = TrueText2.Text = ElseIf Text1.Text = ThenMsgBox 用戶名不能為空！, 48, 提示ElseIf Text2

50、.Text = ThenMsgBox 密碼不能為空！, 48, 提示ElseIf Text2.Text Text3.Text ThenMsgBox 密碼兩次需一致！, 48, 提示ElseIf Text4.Text = ThenMsgBox 請(qǐng)選擇所建用戶類型！, 48, 提示ElseCommand2.Enabled = TrueCommand3.Enabled = TrueCommand5.Enabled = TrueCommand6.Enabled = TrueCommand3.Caption = 編輯Command1.Caption = 添加Adodc1.Recordset.Update

51、Text1.Enabled = FalseText2.Enabled = FalseText3.Enabled = FalseText4.Enabled = FalseOption1.Value = FalseOption2.Value = FalseOption1.Enabled = FalseOption2.Enabled = FalseEnd If刪除操作可以把當(dāng)前記錄刪除掉。一經(jīng)刪除即不可以在恢復(fù)。所以在操作前要想好。刪除操作部分代碼：If Adodc1.Recordset.RecordCount = 1 ThenCommand2.Enabled = FalseEnd IfIf (Ms

52、gBox(你真的想刪除當(dāng)前記錄嗎？, vbOKCancel, 系統(tǒng)提示) = vbOK ThenAdodc1.Recordset.DeleteAdodc1.Recordset.MoveFirstAdodc1.RefreshEnd If編輯操作可以對(duì)當(dāng)前所選擇的用戶進(jìn)行編輯，可以修改其用戶名與密碼。當(dāng)當(dāng)前用戶感覺自己用戶名稱或密碼有泄露時(shí)，可以進(jìn)行修改。修改記錄即更新表中的某一條記錄。編輯操作主要代碼如下：Command2.Enabled = FalseText1.Enabled = TrueText2.Enabled = TrueText3.Enabled = TrueText4.Enable

53、d = TrueOption1.Enabled = TrueOption2.Enabled = TrueCommand1.Caption = 確定ElseIf Command3.Caption = 取消 ThenCommand3.Caption = 編輯Command1.Caption = 添加Command2.Enabled = TrueCommand5.Enabled = TrueCommand6.Enabled = TrueText2.Text = Text3.TextText1.Enabled = FalseText2.Enabled = FalseText3.Enabled = FalseText4.Enabled = FalseOption1.Value = FalseOption2.Value = FalseOption1.Enabled = FalseOption2.Enabled = FalseEnd If4.3.2 公寓設(shè)置公寓設(shè)置可以說是本程序中一關(guān)鍵部分。因?yàn)樗械脑O(shè)置都在此進(jìn)行。包括公寓添加、修改、刪除。寢室的添加、修改、刪除以及班級(jí)的添加、修改和刪除操作。只有正確的對(duì)這些設(shè)置進(jìn)行添加修改，才能輸入正確的記錄。這里主要涉及到的問題是datagrid的顯示，以及treeview及時(shí)形成新的結(jié)構(gòu)。還有一些就是對(duì)