畢業(yè)設(shè)計小區(qū)信息管理系統(tǒng)樣本

摘要社區(qū)信息管理工作流程特性為工作繁雜化、多樣化、管理復雜化、收繳費用與設(shè)備維護繁瑣化。如今計算機技術(shù)突飛猛進，已完全能代替手工物業(yè)管理工作，并且更加精確、以便、快捷、高效、清晰、透明，它完全可以克服手工缺陷。這將給業(yè)務(wù)查詢和管理帶來很大以便，大大提高物業(yè)管理工作效率，這也是物業(yè)管理數(shù)字化、信息化重要體現(xiàn)。本文通過用VB6.0開發(fā)工具編寫社區(qū)信息管理系統(tǒng)，使用Access建立后臺數(shù)據(jù)庫，研究了VB面向?qū)ο?、可視化特點，運用軟件工程原理，采用生命周期辦法學，開發(fā)了重要涉及后臺數(shù)據(jù)庫建立和維護以及前端應用程序開發(fā)兩個方面，實現(xiàn)了社區(qū)信息數(shù)據(jù)庫創(chuàng)立及各種費用收取、記錄、匯總。軟件設(shè)計還實現(xiàn)對社區(qū)住戶、樓盤等信息智能化管理，可以提高物業(yè)管理效率。本系統(tǒng)界面設(shè)計大方、簡潔、實用，操作簡樸以便,是一款完全適合普通社區(qū)物業(yè)尋常事務(wù)管理軟件。核心詞：社區(qū)信息管理；數(shù)據(jù)庫；記錄；匯總CommunityInformationManagementSystemCommunityinformationmanagement’sworkflowfeaturesisworkmultifariousanddiversification,complicationofmanagement，collectioncostsandequipmentmaintenancetrival.Nowcomputertechnologybyleapsandboundshasbeencancompletelyreplacemanualpropertymanagementwork，anditismoreaccurate，convenient，fast，efficient，clearandtransparent，itcangetridofdisadvantagesofmanualcompletely.Thiswillbringgreatconveniencetobusinessqueryandmanagementandgreatlyimprovetheefficiencyofpropertymanagementwork，thisisalsotheimportantofdigitalandinformation-basedpropertymanagement.ItiswritteninVB6.0developmenttowritecommunityinformationmanagementsysteminthispaper，usingAccessestablishingbackgrounddatabase，studiedthefeaturesoftheVB’sobjectorientedandvisualization，usingthesoftwareengineeringprinciple，usingthelifecyclemethodology，thedevelopmentmainlyincludestwoaspectsofthebackstagedatabase’sestablishmentandmaintenance，anddevelopmentoffront-endapplication，realizedthecommunityinformationdatabase’screationandthecollection，statistics，summaryofvariousfees.Softwaredesignalsorealizetheinformationoftheintelligentmanagementofvillageresidentandbuildingsetc.Itcanimprovetheefficiencyofpropertymanagement.Thissysteminterfacedesigngenerous，simple，practical，simpleandconvenientoperationwhichisasoftwareofcompletelysuitableforordinaryresidentialpropertydailyaffairsmanagement.Keyword：CommunityinformationmanagementDatabaseStatisticsGather目錄摘要 ..................................................................ⅠCommunityInformationManagementSystem..................................ⅡTOC\o"1-3"\h\z1.緒論 11.1開發(fā)背景 11.2需求分析 21.3軟件優(yōu)勢 31.4MicrosoftVisualBasic6.0andOfficeAccess軟件簡介 52.系統(tǒng)規(guī)劃 122.1引言 122.2硬件配備 132.3功能分析 133系統(tǒng)主體設(shè)計 153.1系統(tǒng)總體構(gòu)造設(shè)計 153.2數(shù)據(jù)庫設(shè)計 193.3系統(tǒng)詳細設(shè)計 243.3.1主程序界面設(shè)計 243.3.2系統(tǒng)登陸界面設(shè)計 253.3.3基本資料模塊設(shè)計 273.3.4物業(yè)管理模塊設(shè)計 353.3.5數(shù)據(jù)報表記錄模塊設(shè)計 423.3.6主菜單設(shè)計與系統(tǒng)實現(xiàn) 46結(jié)論...................................................................47致謝...................................................................48參考文獻..............................................................491.緒論1.1開發(fā)背景生活社區(qū)信息管理是物業(yè)管理公司都必要切實面對工作,但始終以來人們使用老式人工方式管理,這種管理方式存在著許多缺陷,如:效率低且較為啰嗦,此外隨著物業(yè)管理項目增長,工作量也將大大增長,這必然增長物業(yè)管理者工作量和勞動強度,這將給物業(yè)管理信息查找、更新和維護都帶來了諸多困難。當前國內(nèi)有相稱一某些物業(yè)管理公司還停留在人工管理基本上,這樣管理機制已經(jīng)不能適應時代發(fā)展,其管理辦法將揮霍許多人力和物力。但隨著國內(nèi)市場經(jīng)濟迅速發(fā)展和人們生活水平不斷提高，以及人們居住需求不斷提高和房地產(chǎn)業(yè)不斷發(fā)展，關(guān)于物業(yè)數(shù)據(jù)越來越龐雜,人們對物業(yè)信息解決規(guī)定日益提高,簡樸社區(qū)服務(wù)已經(jīng)不能滿足人們需求。如何運用先進管理手段，提高物業(yè)管理水平，是當今社會所面臨一種重要課題。要想提高物業(yè)管理水平，必要全方位地提高物業(yè)管理意識。只有高原則、高質(zhì)量社區(qū)服務(wù)才干滿足人們需求。面對信息時代挑戰(zhàn)，運用高科技手段來提高物業(yè)管理無疑是一條行之有效途徑。在某種意義上，信息與科技在物業(yè)管理與當代化建設(shè)中顯現(xiàn)出越來越重要地位，因而采用計算機作為物業(yè)管理工具是歷史發(fā)展必然,發(fā)展電子計算機在此領(lǐng)域應用,這是物業(yè)管理手段當代化發(fā)展方向。物業(yè)管理方面信息化與科學化，已成為當代化生活水平步入高臺階重要標志。物業(yè)管理在國內(nèi)屬一種新興行業(yè)，它是一種特殊且不可缺少服務(wù)行業(yè)，處在不斷完善發(fā)展階段，面臨著諸多矛盾和制約因素。因而，面對國內(nèi)物業(yè)管理迅速發(fā)展，如何從國內(nèi)國情出發(fā)，謀求有效辦法推動物業(yè)管理行業(yè)發(fā)展，已成為國內(nèi)物業(yè)管理亟待研究和解決重大課題。只有運用計算機進行物業(yè)管理,特別是進行聯(lián)網(wǎng)管理,才也許實現(xiàn)物業(yè)信息原則化和規(guī)范化,為物業(yè)管理工作提供精確及時信息,有助于物業(yè)管理部門進行管理并做出有關(guān)決策；同步也使物業(yè)管理公司及時精確地理解運營狀況,做出經(jīng)營決策,這樣才干使物業(yè)管理走向當代化。物業(yè)管理系統(tǒng)作為計算機應用一種分支,有著手工管理所無法比擬長處,如:檢索迅速、查找以便、可靠性高、存儲量大、保密性好、壽命長、成本低等。這些長處可以極大地提高物業(yè)管理效率。因而,開發(fā)一套可覺得顧客提供規(guī)范化事務(wù)管理、充分信息和快捷查詢手段社區(qū)物業(yè)管理系統(tǒng)成為很有必要事情。依照社區(qū)物業(yè)管理計算機化實際規(guī)定,本系統(tǒng)重要實現(xiàn)如下功能:將該社區(qū)物業(yè)信息進行綜合管理和記錄分析，具備數(shù)據(jù)備份和數(shù)據(jù)恢復功能，并且以以便住戶查詢?yōu)橹行?，突出物業(yè)信息管理系統(tǒng)檢索功能。1.2需求分析隨著住房市場化逐漸進一步，物業(yè)管理作為一種新興行業(yè)，逐漸成為一種涉及社會方方面面，與千家萬戶息息有關(guān)朝陽產(chǎn)業(yè)，當前正處在物業(yè)管理成長過程核心階段。當前住宅產(chǎn)權(quán)多元化格局已經(jīng)形成，物業(yè)管理作為都市管理一種新形式和市場經(jīng)濟條件下新興服務(wù)產(chǎn)業(yè)，經(jīng)歷了從無到有、從小到大發(fā)展過程，形成了多類別、多層次、多形式物業(yè)管理局面，初步確立了社會化、專業(yè)化、市場化、經(jīng)營性物業(yè)管理新體制。通過提高尋常物業(yè)管理工作中科技含量，增進當前管理方式、管理手段當代化，使物業(yè)管理可以適應當代科技和當代建筑技術(shù)發(fā)展潮流，保持物業(yè)管理高水平。因而對于整個物業(yè)管理行業(yè)來講，僅靠簡樸單向、手工管理已經(jīng)不能適應物業(yè)管理需求水平提高，必要走規(guī)模化，網(wǎng)絡(luò)化計算機綜合管理道路。本物業(yè)管理系統(tǒng)正是這種背景下應運而生行業(yè)軟件，是公司減少管理成本、提高管理效率核心和原動力。如某社區(qū)位于我市西固區(qū)，綠化面積1200多平方米，占地面積100000，建筑面積680000多平方米，24小時保安巡邏，環(huán)境幽雅、周邊配套設(shè)施完善，實行封閉式管理，社區(qū)現(xiàn)居住約2萬人。由于管理面積大，戶數(shù)多，物業(yè)管理范疇廣，管理內(nèi)容繁雜，社區(qū)物業(yè)管理混亂問題始終無法解決。再者，社區(qū)物業(yè)管理中一項重要工作是計算、匯總各項費用，由于費用項目較多，計算辦法繁重，手工解決差錯率較高。同步查詢某房產(chǎn)資料或業(yè)主資料往往也需要較長時間，給物業(yè)管理者工作帶來了諸多弊端。因而該物業(yè)公司決定采用計算機進行物業(yè)管理。依照該社區(qū)詳細狀況，系統(tǒng)在實行后，可以滿足對社區(qū)住戶資料、財產(chǎn)資源記錄、社區(qū)投訴、裝修、維修、等進行管理，可以滿足對水、電表抄收、停車、記錄、核算、各項費用記錄匯總，極大簡化了整個社區(qū)信息管理程序，不但使負責管理物業(yè)人員工作量急劇減輕，并且信息錯誤率明顯下降到幾乎為零。在結(jié)算階段，以往繁復賬單賬本也被一清二楚計算機記錄系統(tǒng)所代替，物業(yè)管理水平明顯提高了不止一種檔次。1.3軟件優(yōu)勢VisualBasic是美國微軟公司第一種編程工具和系統(tǒng)開發(fā)第一種產(chǎn)品，VisualBasic以優(yōu)良性能、較強系統(tǒng)開發(fā)功能、完美視覺界面和簡樸易學特點，已經(jīng)贏得了全世界廣大顧客偏愛。VisualBasic編程環(huán)境包括了迅速有效開發(fā)功能，特別是數(shù)據(jù)窗口這一以便而簡潔操縱數(shù)據(jù)庫智能化對象，使系統(tǒng)開發(fā)更人性化，操作更簡便。作為管理信息系統(tǒng)開發(fā)，VisualBasic是一種非常抱負選取。VisualBasic是一種可視化、面對對象和條用事件驅(qū)動方式構(gòu)造化高檔程序設(shè)計，可用于開發(fā)Windows環(huán)境下種類應用程序。它簡樸易學、效率高，且功能強大，可以與Windows專業(yè)開發(fā)工具SDK相媲美，并且程序開發(fā)人員不必具備C/C++編程基本。在VisualBasic環(huán)境下，運用事件驅(qū)動編程機制、新穎易用可視化設(shè)計工具，使用Windows內(nèi)部應用程序接口(API)函數(shù)，以及動態(tài)鏈接庫(DLL)、動態(tài)數(shù)據(jù)互換(DDE)、對象鏈接與嵌入(OLE)、開放式數(shù)據(jù)訪問(ODBC)等技術(shù)，可以高效、迅速地開發(fā)出Windows環(huán)境下功能強大、圖形界面豐富應用軟件系統(tǒng)。MicrosoftOfficeAccess是由微軟發(fā)布關(guān)聯(lián)式數(shù)據(jù)庫管理系統(tǒng)。它結(jié)合了MicrosoftJetDatabaseEngine和圖形顧客界面兩項特點，是MicrosoftOffice系統(tǒng)程式之一。憑借MicrosoftOfficeFluent顧客界面和無需深厚數(shù)據(jù)庫知識即可使用交互式設(shè)計功能，OfficeAccess可協(xié)助信息工作者輕松、迅速地跟蹤和報告信息。顧客可以在網(wǎng)站上共享、審核和備份MicrosoftOfficeSharePointServer列表上信息。MicrosoftOfficeAccess具備如下功能特點：（1）使用OfficeFluent顧客界面更快地獲得更好成果。OfficeAccess通過其OfficeFluent顧客界面、新導航窗格和選項卡式窗口視圖為您提供全新體驗。即便顧客沒有數(shù)據(jù)庫經(jīng)驗，她們也可以開始跟蹤信息并創(chuàng)立報表，從而做出更明智決策。（2）使用預制解決方案迅速入門。通過內(nèi)容豐富預制解決方案庫，您可以及時開始跟蹤自己信息。為了以便顧客，程序中已經(jīng)建立了某些表單和報表，但您可以輕松地自定義這些表單和報表以滿足您業(yè)務(wù)需求。聯(lián)系人、問題跟蹤、項目跟蹤和資產(chǎn)跟蹤方案只是OfficeAccess包括現(xiàn)成解決方案一小某些。（3）針對同一信息創(chuàng)立具備不同視圖各種報表。在OfficeAccess中創(chuàng)立報表真正能體驗到“所見即所得”(WYSIWYG)。您可以依照實時可視反饋修改報表，并可以針對不同觀眾保存不同視圖。新分組窗格以及篩選和排序功能可以協(xié)助顯示信息，使您能做出更明智業(yè)務(wù)決策。（4）可以迅速創(chuàng)立表，而無需緊張數(shù)據(jù)庫復雜性。借助自動數(shù)據(jù)類型檢測，在OfficeAccess中創(chuàng)立表就像解決MicrosoftOfficeExcel表格同樣容易。鍵入信息后，OfficeAccess將辨認該信息是日期、貨幣還是其她慣用數(shù)據(jù)類型。您甚至可以將整個Excel表格粘貼到OfficeAccess中，以便運用數(shù)據(jù)庫強大功能開始跟蹤信息。（5）使用全新字段類型，實現(xiàn)更豐富方案。OfficeAccess支持附件和多值字段等新字段類型。當前，可以將任何文檔、圖像或電子表格附加到應用程序中任何記錄中。使用多值字段，當前，可以在每一種單元格中選取各種值（例如，向各種人分派某項任務(wù)）。(6)直接通過源收集和更新信息。通過OfficeAccess，您可以使用MicrosoftOfficeInfoPath或HTML創(chuàng)立表單來為數(shù)據(jù)庫收集數(shù)據(jù)。然后，您可通過電子郵件向隊友發(fā)送此表單，并使用隊友回答填充和更新Access表，而無需重新鍵入任何信息。(7)通過MicrosoftWindowsSharePointServices共享信息。使用WindowsSharePointServices和OfficeAccess與工作組中其她成員共享Access信息。借助這兩種應用程序強大功能，工作構(gòu)成員可以直接通過Web界面訪問和編輯數(shù)據(jù)以及查看實時報表。(8)使用OfficeAccess富客戶端功能跟蹤WindowsSharePointServices列表?？蓪fficeAccess用作富客戶端界面，通過WindowsSharePointServices列表分析和創(chuàng)立報表。甚至還可以使列表脫機，然后在重新連接到網(wǎng)絡(luò)時對所有更改進行同步解決，從而讓您可以隨時輕松解決數(shù)據(jù)。(9)將數(shù)據(jù)移動到WindowsSharePointServices，增強可管理性。將數(shù)據(jù)移動到WindowsSharePointServices，使數(shù)據(jù)更透明。這樣，您就可以定期備份服務(wù)器上數(shù)據(jù)、恢復垃圾箱中數(shù)據(jù)、跟蹤修訂歷史記錄以及設(shè)立訪問權(quán)限，從而可以更好地管理信息。(10)訪問和使用各種源中信息。通過OfficeAccess，您可以將其她Access數(shù)據(jù)庫、Excel電子表格、WindowsSharePointServices網(wǎng)站、ODBC數(shù)據(jù)源、MicrosoftSQLServer數(shù)據(jù)庫和其她數(shù)據(jù)源中表鏈接到您數(shù)據(jù)庫。然后，可以使用這些鏈接表輕松地創(chuàng)立報表，從而依照更全面信息來做出決策。1.4MicrosoftVisualBasic6.0andOfficeAccess軟件簡介當前，市場上可以選購應用開發(fā)產(chǎn)品諸多，流行也有數(shù)十種。當前在國內(nèi)市場上最為流行、使用最多、最為先進可用作做作公司級開發(fā)工具產(chǎn)品有：Microsoft公司VisualBasicMicrosoft公司VisualCBorland公司DelphiPowersoft公司PowerBuliderJava等等在當前市場上這些眾多程序開發(fā)工具中，有些強調(diào)程語言彈性與執(zhí)行效率；有些則偏重于可視化程序開發(fā)工具所帶來便利性與效率得高，各有各長處和特色，也滿足了不同顧客需求。然而，語言彈性和工具便利性是密不可分，只有便利工具，卻沒有彈性語言作支持，許多特殊化解決動作必須要耗費數(shù)倍工夫來解決，使得本來所標榜效率提高長處失去了作用；相反，如果只強調(diào)程序語言彈性，卻沒有便利工具作配合，會使某些雖然非常簡樸界面解決動作，也會嚴重地揮霍程序設(shè)計師寶貴時間。作為數(shù)據(jù)庫系統(tǒng)開發(fā)，VisualBasic是一種非常抱負選取。數(shù)據(jù)庫是MIS中重要支持技術(shù)，在MIS開發(fā)過程中，如何選取數(shù)據(jù)庫管理是一種重要問題，當前，數(shù)據(jù)庫產(chǎn)品較多，每種產(chǎn)品都具備各自特點和合用范疇，因而，在選取數(shù)據(jù)庫時，應考慮數(shù)據(jù)庫應用特點及合用范疇，本系統(tǒng)選用數(shù)據(jù)庫語言VisualBasic語言，該開發(fā)工具具備諸多長處：VisualBasic是一種可視化、面對對象和條用事件驅(qū)動方式構(gòu)造化高檔程序設(shè)計，可用于開發(fā)Windows環(huán)境下種類應用程序。它簡樸易學、效率高，且功能強大，可以與Windows專業(yè)開發(fā)工具SDK相媲美，并且程序開發(fā)人員不必具備C/C++編程基本。在VisualBasic環(huán)境下，運用事件驅(qū)動編程機制、新穎易用可視化設(shè)計工具，使用Windows內(nèi)部應用程序接口(API)函數(shù)，以及動態(tài)鏈接庫(DLL)、動態(tài)數(shù)據(jù)互換(DDE)、對象鏈接與嵌入(OLE)、開放式數(shù)據(jù)訪問(ODBC)等技術(shù)，可以高效、迅速地開發(fā)出Windows環(huán)境下功能強大、圖形界面豐富應用軟件系統(tǒng)?？倎碚f，VisualBasic具備如下特點：可視化編程：用老式程序設(shè)計語言設(shè)計程序時，都是通過編寫程序代碼來設(shè)計顧客界面，在設(shè)計過程中看不到界面實際顯示效果，必要編譯后運營程序才干觀測。如果對界面效果不滿意，還要回到程序中修改。有時候，這種編程-編譯-修改操作也許要重復多次，大大影響了軟件開發(fā)效率。VisualBasic提供了可視化設(shè)計工具，把Windows界面設(shè)計復雜性“封裝”起來，開發(fā)人員不必為界面設(shè)計而編寫大量程序代碼。只需要按設(shè)計規(guī)定屏幕布局，用系統(tǒng)提供工具，在屏幕上畫出各種“部件”，即圖形對象，并設(shè)立這些圖形對象屬性。VisualBasic自動產(chǎn)生界面設(shè)計代碼，程序設(shè)計人員只需要編寫實現(xiàn)程序功能那某些代碼，從而可以大大提高程序設(shè)計效率。面向?qū)ο蟪绦蛟O(shè)計:4.0版后來VisualBasic支持面向?qū)ο蟪绦蛟O(shè)計，但它與普通面向?qū)ο蟪绦蛟O(shè)計語言(C++)不完全相似。在普通面向?qū)ο蟪绦蛟O(shè)計語言中，對象由程序代碼和數(shù)據(jù)構(gòu)成，是抽象概念；而VisualBasic則是應用面向?qū)ο蟪绦蛟O(shè)計辦法(OOP)，把程序和數(shù)據(jù)封裝起來作為一種對象，并為每個對象賦予應有屬性，使對象成為實在東西。在設(shè)計對象時，不必編寫建立和描述每個對象程序代碼，而是用工具畫在界面上，VisualBasic自動生成對象程序代碼并封裝起來。每個對象以圖形方式顯示在界面上，都是可視。構(gòu)造化程序設(shè)計語言:VisualBasic是在BASIC語言基本上發(fā)展起來，具備高檔程序設(shè)計語言語句構(gòu)造，接近于自然語言和人類邏輯思維方式。VisualBasic語句簡樸易懂，其編輯器支持彩色代碼，可自動進行語法錯誤檢查，同步具備功能強大且使用靈活調(diào)試器和編譯器。VisualBasic是解釋型語言，在輸入代碼同步，解釋系統(tǒng)將高檔語言分解翻譯成計算機可以辨認機器指令，并判斷每個語句語法錯誤。在設(shè)計VisualBasic程序過程中，隨時可以運營程序，而在整個程序設(shè)計好之后，可以編譯生成可執(zhí)行文獻(.EXE)，脫離VisualBasic環(huán)境，直接在Windows環(huán)境下運營。事件驅(qū)動編程機制:VisualBasic通過事件來執(zhí)行對象操作。一種對象也許會產(chǎn)生各種事件，每個事件都可以通過一段程序來響應。例如，命令按鈕是一種對象，當顧客單擊該按鈕時，將產(chǎn)生一種“單擊”(CLICK)事件，而在產(chǎn)生該事件時將執(zhí)行一段程序，用來實現(xiàn)指定操作。在用VisualBasic設(shè)計大型應用軟件時，不必建立具備明顯開始和結(jié)束程序，而是編寫若干個微小子程序，即過程。這些過程分別面向不同對象，由顧客操作引起某個事件來驅(qū)動完畢某種特定功能，或者由事件驅(qū)動程序調(diào)用通用過程來執(zhí)行指定操作，這樣可以以便編程人員，提高效率。訪問數(shù)據(jù)庫:VisualBasic具備強大數(shù)據(jù)庫管理功能，運用數(shù)據(jù)控件和數(shù)據(jù)庫管理窗口，可以直接建立或解決MicrosoftAccess格式數(shù)據(jù)庫，并提供了強大數(shù)據(jù)存儲和檢索功能。同步，VisualBasic還能直接編輯和訪問其她外部數(shù)據(jù)庫，如dBASE，F(xiàn)oxPro，Paradox等，這些數(shù)據(jù)庫格式都可以用VisualBasic編輯和解決。VisualBasic提供開放式數(shù)據(jù)連接，即ODBC功能，可通過直接訪問或建立連接方式使用并操作后臺大型網(wǎng)絡(luò)數(shù)據(jù)庫，如SQLServer，Oracle等。在應用程序中，可以使用構(gòu)造化查詢語言SQL數(shù)據(jù)原則，直接訪問服務(wù)器上數(shù)據(jù)庫，并提供了簡樸面向?qū)ο髱觳僮髦噶詈投囝櫩蛿?shù)據(jù)庫訪問加鎖機制和網(wǎng)絡(luò)數(shù)據(jù)庫SQL編程技術(shù)，為單機上運營數(shù)據(jù)庫提供了SQL網(wǎng)絡(luò)接口，以便在分布式環(huán)境中迅速而有效地實現(xiàn)客戶/服務(wù)器(client/server)方案。動態(tài)數(shù)據(jù)互換(DDE):運用動態(tài)數(shù)據(jù)互換(DynamicDataExchange)技術(shù)，可以把一種應用程序中數(shù)據(jù)動態(tài)地鏈接到另一種應用程序中，使兩種完全不同應用程序建立起一條動態(tài)數(shù)據(jù)鏈路。當原始數(shù)據(jù)變化時，可以自動更新鏈接數(shù)據(jù)。VisualBasic提供了動態(tài)數(shù)據(jù)互換編程技術(shù)，可以在應用程序中與其她Windows應用程序建立動態(tài)數(shù)據(jù)互換，在不同應用程序之間進行通信。對象鏈接與嵌入(OLE):對象鏈接與嵌入(OLE)將每個應用程序都看作是一種對象(object)，將不同對象鏈接(link)起來，再嵌入(embed)某個應用程序中，從而可以得到具備聲音、影像、圖像、動畫、文字等各種信息集合式文獻。OLE技術(shù)是Microsoft公司對象技術(shù)戰(zhàn)略，它把各種應用程序合為一體，將每個應用程序看作是一種對象進行鏈接和嵌入，是一種應用程序一體化技術(shù)。運用OLE技術(shù)，可以以便地建立復合式文檔(compounddocument)，這種文檔由來自各種不同應用程序?qū)ο髽?gòu)成，文檔中每個對象都與本來應用程序相聯(lián)系，并可執(zhí)行與本來應用程序完全相似操作。動態(tài)鏈接庫(DLL):VisualBasic是一種高檔程序設(shè)計語言，不具備低檔語言功能，對訪問機器硬件操作不太容易實現(xiàn)。但它可以通過動態(tài)鏈接庫技術(shù)將C/C++或匯編語言編寫程序加入到VisualBasic應用程序中，可以像調(diào)用內(nèi)部函數(shù)同樣調(diào)用其她語言編寫函數(shù)。此外，通過動態(tài)鏈接庫，還可以調(diào)用Windows應用程序接口(API)函數(shù)，實現(xiàn)SDK所具備功能。MicrosoftOfficeAccess是微軟把數(shù)據(jù)庫引擎圖形顧客界面和軟件開發(fā)工具結(jié)合在一起一種數(shù)據(jù)庫管理系統(tǒng)。它是微軟OFFICE一種成員，在涉及專業(yè)版和更高版本office版本里面被單獨出售。12月4日,最新微軟OfficeAccess在微軟Office里發(fā)布,微軟OfficeAccess是前一種版本。MicrosoftOfficeAccess以它自己格式將數(shù)據(jù)存儲在基于AccessJet數(shù)據(jù)庫引擎里。它還可以直接導入或者鏈接數(shù)據(jù)(這些數(shù)據(jù)存儲在其她應用程序和數(shù)據(jù)庫)。軟件開發(fā)人員和數(shù)據(jù)架構(gòu)師可以使用MicrosoftAccess開發(fā)應用軟件,“高檔顧客”可以使用它來構(gòu)建軟件應用程序。和其她辦公應用程序同樣，ACCESS支持VisualBasic宏語言,它是一種面向?qū)ο缶幊陶Z言,可以引用各種對象，涉及DAO(數(shù)據(jù)訪問對象),ActiveX數(shù)據(jù)對象,以及許多其她ActiveX組件?？梢晫ο笥糜陲@示表和報表，她們辦法和屬性是在VBA編程環(huán)境下，VBA代碼模塊可以聲明和調(diào)用Windows操作系統(tǒng)函數(shù)。MicrosoftAccess軟件優(yōu)勢：MicrosoftAccessBasic提供了一種豐富開發(fā)環(huán)境。這個開發(fā)環(huán)境給你足夠靈活性和對MicrosoftWindows應用程序接口控制，同步保護你使你免遭用高檔或低檔語言開發(fā)環(huán)境開發(fā)時所遇到各種麻煩。但是，許多優(yōu)化、有效數(shù)據(jù)和模塊化方面只能是應用程序設(shè)計者才干使用。開發(fā)者應致力于謹慎地使用算法。除了普通程序設(shè)計概念，尚有某些特別存儲空間管理技術(shù)，對的使用這些技術(shù)可以提高應用程序執(zhí)行速度，減少應用程序所消耗存儲資源。（1）提高速度和減少代碼量你可以用幾種技巧來提高你編碼速度，但是卻找不到有效算法代替者。接下來這幾點建議可以提高你編碼速度同步又減少你應用程序消耗存儲空間。（2）用整形數(shù)進行數(shù)學運算雖然MicrosoftAccess會使用一種聯(lián)合解決器來解決浮點型算術(shù)，整型數(shù)算術(shù)也總是要快某些。當你計算不具有小數(shù)，盡量使用整型或長整型而不是變量或雙整型。整型除法同樣也要比浮點除法要快。在使用其她某些有效數(shù)據(jù)類型時會警告：沒有任何東西可以替代有效運算法則。（3）避免使用過程調(diào)用避免在循環(huán)體中使用子程序或函數(shù)調(diào)用。每一次調(diào)用都因額外工作和時間而給編碼增大了承擔。每一次調(diào)用都規(guī)定把函數(shù)局部變量和參數(shù)壓棧，而棧大小是固定，不能隨便加大，并且同步還要于MicrosoftAccess共享。（4）謹慎使用不定長數(shù)據(jù)類型不定長數(shù)據(jù)類型提供了更大靈活性，例如說容許對的解決空值和自動解決溢出。此外這種數(shù)據(jù)類型比老式數(shù)據(jù)類型要大并消耗更多存儲空間。前面還曾經(jīng)提到過，不定長數(shù)據(jù)類型變量在數(shù)學計算中比較慢。（5）用變量存儲屬性對變量進行查找和設(shè)立都比對屬性進行這些操作要快。如果你要得到或查閱一種屬性值許多次，那么把這個屬性分派給一種變量，并用這個變量來代替屬性，那么你代碼將要運營快得多。例如，在一種循環(huán)中，你查閱某表格中得一種控制屬性，那么在循環(huán)外把屬性分派給一種變量，然后在循環(huán)中用查詢一種變量來代替查閱一種屬性辦法要比較快。（6）預載表格當你應用程序啟動并且把它們可見屬性設(shè)立位‘false’時，如果你安裝了你所有表格，那么你應用程序性能會讓你感覺挺快。當你需要顯示一種表格時，你只需要把該表格可見屬性設(shè)立為‘true’，這要比安裝一種表格要快得多。需要記住是，為你安裝每個表格，你都要從應用程序全局堆中消耗存儲空間。MicrosoftAccess軟件特性:顧客可以創(chuàng)立表，進行查詢，創(chuàng)立圖表和報告，并且可以通過宏把她們聯(lián)系在一起。高檔顧客可以使用宏命令做出擁有高檔數(shù)據(jù)操作和顧客控制權(quán)較完善方案。Access擁有報表創(chuàng)立功能可以解決任何它可以訪問數(shù)據(jù)源。Access提供功能參數(shù)化查詢，這些查詢和Access表格可以被諸如VB6和.NET其他程序通過DAO或ADO訪問。在Access中，VBA可以通過ADO訪問參數(shù)化存儲過程。MicrosoftSQLServer桌面版本可以與Access一起使用，作為Jet數(shù)據(jù)庫引擎代替。這種支持是從MSDE(MiscrosoftSQLServer桌面引擎)開始。MSDE是MSSQL服務(wù)器小型版本，后來產(chǎn)品是SQLServerandExpress（入門級）版本。與普通CS關(guān)系型數(shù)據(jù)庫管理不同，Access不執(zhí)行數(shù)據(jù)庫觸發(fā)，預存程序或交互式登錄操作。Access涉及了嵌入ACE數(shù)據(jù)引擎表級觸發(fā)和預存程序，因而，客戶-服務(wù)器數(shù)據(jù)庫系統(tǒng)對于Access就不是必須了。在Access中，表格，查詢，圖表，報表和宏當前基于網(wǎng)絡(luò)應用上可以進行分別開發(fā)。Access與MicrosoftSharePoint集成也得到了很大改進。MicrosoftAccess長處：（1）存儲方式單一Access管理對象有表、查詢、窗體、報表、頁、宏和模塊，以上對象都存儲在后綴為（.mdb）數(shù)據(jù)庫文獻種，便于顧客操作和管理。（2）面向?qū)ο驛ccess是一種面向?qū)ο箝_發(fā)工具，運用面向?qū)ο蠓绞綄?shù)據(jù)庫系統(tǒng)中各種功能對象化，將數(shù)據(jù)庫管理各種功能封裝在各類對象中。它將一種應用系統(tǒng)當作是由一系列對象構(gòu)成，對每個對象它都定義一組辦法和屬性，以定義該對象行為和外國，顧客還可以按需要給對象擴展辦法和屬性。通過對象辦法、屬性完畢數(shù)據(jù)庫操作和管理，極大地簡化了顧客開發(fā)工作。同步，這種基于面向?qū)ο箝_發(fā)方式，使得開發(fā)應用程序更為簡便。（3）界面和諧、易操作Access是一種可視化工具，是風格與Windows完全同樣，顧客想要生成對象并應用，只要使用鼠標進行拖放即可，非常直觀以便。系統(tǒng)還提供了表生成器、查詢生成器、報表設(shè)計器以及數(shù)據(jù)庫向?qū)?、表向?qū)А⒉樵兿驅(qū)?、窗體向?qū)А蟊硐驅(qū)У裙ぞ?，使得操作簡便，容易使用和掌握。?）集成環(huán)境、解決各種數(shù)據(jù)信息Access基于Windows操作系統(tǒng)下集成開發(fā)環(huán)境，該環(huán)境集成了各種向?qū)Ш蜕善鞴ぞ撸瑯O大地提高了開發(fā)人員工作效率，使得建立數(shù)據(jù)庫、創(chuàng)立表、設(shè)計顧客界面、設(shè)計數(shù)據(jù)查詢、報表打印等可以以便有序地進行。（5）Access支持ODBC（開發(fā)數(shù)據(jù)庫互連，OpenDataBaseConnectivity），運用Access強大DDE（動態(tài)數(shù)據(jù)互換）和OLE（對象聯(lián)接和嵌入）特性，可以在一種數(shù)據(jù)表中嵌入位圖、聲音、Excel表格、Word文檔，還可以建立動態(tài)數(shù)據(jù)庫報表和窗體等。Access還可以將程序應用于網(wǎng)絡(luò)，并與網(wǎng)絡(luò)上動態(tài)數(shù)據(jù)相聯(lián)接。運用數(shù)據(jù)庫訪問頁對象生成HTML文獻，輕松構(gòu)建Internet/Intranet應用。（6）支持廣泛，易于擴展，彈性較大可以將通過鏈接表方式來打開EXCEL文獻、格式化文本文獻等，這樣就可以運用數(shù)據(jù)庫高效率對其中數(shù)據(jù)進行查詢、解決。還可以通過以Access作為前臺客戶端，以SQLServer作為后臺數(shù)據(jù)庫方式（如ADP）開發(fā)大型數(shù)據(jù)庫應用系統(tǒng)?？傊珹ccess是一種既可以只用來存儲數(shù)據(jù)數(shù)據(jù)庫，也可以作為一種客戶端開發(fā)工具來進行數(shù)據(jù)庫應用系統(tǒng)開發(fā)；即可以開發(fā)以便易用小型軟件，也可以用來開發(fā)大型應用系統(tǒng)。2.系統(tǒng)規(guī)劃2.1引言本軟件使用MicrosoftVisualBasic6.0進行編寫。數(shù)據(jù)庫技術(shù)產(chǎn)生與發(fā)展源于對于數(shù)據(jù)組織和管理。數(shù)據(jù)庫技術(shù)是數(shù)據(jù)管理技術(shù)，它隨著數(shù)據(jù)管理任務(wù)需要而產(chǎn)生于20世紀60年代中期。這是一門綜合性技術(shù)，涉及操作系統(tǒng)，數(shù)據(jù)構(gòu)造，算法設(shè)計和程序設(shè)計等知識。數(shù)據(jù)庫技術(shù)基本思想是對數(shù)據(jù)實行集中，統(tǒng)一，獨立管理，顧客可以最大限度共享數(shù)據(jù)資源。數(shù)據(jù)庫系統(tǒng)事實上是一種應用系統(tǒng)，它是在計算機硬，軟件系統(tǒng)支持下，由顧客，數(shù)據(jù)庫管理系統(tǒng)，存儲在存儲設(shè)備上數(shù)據(jù)和數(shù)據(jù)庫應用程序構(gòu)成數(shù)據(jù)解決系統(tǒng)。數(shù)據(jù)庫系統(tǒng)是由數(shù)據(jù)，數(shù)據(jù)庫管理系統(tǒng)，應用程序，顧客構(gòu)成。數(shù)據(jù)庫特點：（1）實現(xiàn)數(shù)據(jù)共享；（2）實現(xiàn)數(shù)據(jù)獨立；（3）減少了數(shù)據(jù)冗余度；（4）避免了數(shù)據(jù)不一致性；（5）加強了對數(shù)據(jù)保護。數(shù)據(jù)庫應用系統(tǒng)（DATABASEAPPLICATIONSYSTEMSDBAS：管理信息系統(tǒng)（2）開放式信息服務(wù)系統(tǒng)一種數(shù)據(jù)庫應用系統(tǒng)普通是由數(shù)據(jù)庫和應用程序兩某些構(gòu)成，它們是在數(shù)據(jù)庫管理系統(tǒng)支持下設(shè)計和開發(fā)出來。對于這套社區(qū)物業(yè)管理系統(tǒng)而言，在投入使用前，會由開發(fā)并能純熟操作本系統(tǒng)工程人員對顧客群進行專業(yè)系統(tǒng)培訓。培訓內(nèi)容應涉及，純熟掌握系統(tǒng)各個功能和簡樸系統(tǒng)維護，在開發(fā)設(shè)計程序過程中直觀界面和控件文字解釋完全能使得顧客充分理解起功能和意義，在計算機普及今天，顧客對本系統(tǒng)操作完全可以看做是一種簡樸，配合形式手工操作，由于本系統(tǒng)最合用于微型機，可以說幾乎任何人都可以使用和管理。因此本系統(tǒng)操作是完全可行。2.2硬件配備服務(wù)器：I3及其以上配備高性能PC機，內(nèi)存應在2G以上，硬盤在1T以上。確認該計算機已經(jīng)安裝數(shù)據(jù)庫軟件MicrosoftVisualBasic6.0軟件。操作系統(tǒng)：Windows、WindowsXP、WindowsVista，辨別率：1024*768?？蛻舳耍篒系列及其以上配備PC機，內(nèi)存應在512M以上，硬盤在320G以上。WindowsXP及其以上操作系統(tǒng)。開發(fā)工具：前臺開發(fā)工具：MicrosoftVisualBasic6.0后臺數(shù)據(jù)庫：Access2.3功能分析(1)系統(tǒng)顧客管理功能涉及系統(tǒng)顧客添加，涉及顧客名、密碼信息。(2)社區(qū)住戶信息管理功能涉及如下幾方面：住戶基本信息錄入，涉及住戶電話、住戶姓名、物業(yè)地址、身份證號、入住時間等信息；住戶基本信息修改；住戶基本信息刪除；住戶基本信息查詢。(3)社區(qū)房產(chǎn)信息管理功能涉及如下幾方面：房產(chǎn)基本信息錄入，涉及物業(yè)地址、使用面積、房屋構(gòu)造、設(shè)備、出售信息等信息；房產(chǎn)基本信息修改；房產(chǎn)基本信息刪除；房產(chǎn)基本信息查詢。(4)社區(qū)收費管理功能：其中涉及物業(yè)收費和儀表收費兩大類信息錄入，涉及收費住址、水費、電費、寬帶費、物業(yè)管理費、收費時間等信息；收費基本信息修改；收費基本信息刪除；收費基本信息查詢。(5)社區(qū)住戶故障解決管理功能涉及如下幾方面：住戶報修基本信息錄入，涉及住址、報修故障、經(jīng)辦人、解決時間、查詢等信息；住戶故障基本信息修改；住戶故障基本信息刪除；住戶故障基本信息查詢。3系統(tǒng)主體設(shè)計3.1系統(tǒng)總體構(gòu)造設(shè)計社區(qū)物業(yè)管理系統(tǒng)某些實體E-R圖如圖3.1所示:圖3.1（a）住戶基本信息實體E-R圖圖3.1（b）房產(chǎn)基本信息實體E-R圖圖3.1（c）水表基本信息實體E-R圖圖3.1（d）停車場基本信息實體E-R圖圖3.1（e）住戶投訴基本信息實體E-R圖通過調(diào)研與可行性分析，社區(qū)物業(yè)管理系統(tǒng)基本設(shè)計思想是把整個系統(tǒng)按照實現(xiàn)功能進行分解，將社區(qū)物業(yè)管理系統(tǒng)分為四個某些，第一某些為“登陸系統(tǒng)”，第二某些為“基本資料”，第三某些為“物業(yè)管理”，第四某些為“數(shù)據(jù)報表記錄”．此系統(tǒng)構(gòu)造圖如圖3.2所示：圖3.2社區(qū)信息管理系統(tǒng)構(gòu)造圖依照該社區(qū)信息管理特點和該社區(qū)實際狀況，社區(qū)信息管理系統(tǒng)流程如圖3.3所示。該系統(tǒng)重要功能涉及:（1）系統(tǒng)登錄：涉及顧客登錄，修改密碼，添加顧客,退出系統(tǒng)；（2）基本資料：涉及住戶資料和財產(chǎn)資料；（3）物業(yè)管理：涉及物業(yè)設(shè)備,儀表數(shù)據(jù),停車場管理,收費管理,住戶投訴,住戶報修管理,設(shè)備維修管理等；（4）數(shù)據(jù)報表記錄：涉及物業(yè)設(shè)備,儀表數(shù)據(jù)記錄,收費記錄,信戶投訴記錄,信戶報修記錄,設(shè)備維修記錄等。社區(qū)物業(yè)社區(qū)物業(yè)業(yè)務(wù)受理當場辦理待辦業(yè)務(wù)打印簽報上報資料核算管理處打印錄表核對整頓上報關(guān)于部門資料室訂立合同社區(qū)物業(yè)憑證辦理手續(xù)，結(jié)算資料上報經(jīng)理室審批，修改記錄資料室存檔做動態(tài)資料修改數(shù)據(jù)存檔生成報表公示客戶訂立報表審批經(jīng)理辦公室通過，轉(zhuǎn)社區(qū)物業(yè)辦結(jié)手續(xù)資料上傳駁回重新核算補辦管理處圖3.3社區(qū)信息管理系統(tǒng)流程圖3.2數(shù)據(jù)庫設(shè)計依照該公司業(yè)務(wù)狀況和行業(yè)特點，本系統(tǒng)采用了ACCESS數(shù)據(jù)庫，數(shù)據(jù)庫名稱為XiaoQuGuanLi,包括如下幾種表：報修表(BaoXiu)，Client表，Emp表，Equipment表，Gas表,House表,Park表,Power表,Repair表,Tousu表,UserTable表,Water表,WuyeFee表,YiBiaoFee表.各表構(gòu)造闡明如表3.1所示:表3.1（a）住戶報修管理信息表（Baoxiu）字段名稱數(shù)據(jù)類型字段大小必填字段備注報修編號文本10否報修日期日期/時間否接待人員文本10否報修住戶文本10否物業(yè)地址文本50否電話文本20否完畢日期文本50否維修人員文本50否服務(wù)費用文本50否物料費用文本50否共計費用文本50否報修內(nèi)容文本250否維修狀況文本250否表3.1（b）系統(tǒng)登錄信息表（UserTable）字段名稱數(shù)據(jù)類型字段大小必填字段備注Username文本10否用戶名Password文本20否密碼Truename文本20否真實姓名Regtime日期/時間否注冊時間表3.1（c）水費信息表（Water）字段名稱數(shù)據(jù)類型字段大小必填字段備注儀表編號文本10否住戶姓名文本10否物業(yè)地址文本50否年份數(shù)字整型否月份數(shù)字整型否上月數(shù)據(jù)數(shù)字單精度型否本月數(shù)據(jù)數(shù)字單精度型否本月用量數(shù)字單精度型否單價數(shù)字單精度型否本月費用數(shù)字單精度型否上月抄表日期日期/時間否本月抄表日期日期/時間否本月交費日期日期/時間否辦理人文本10否表3.1（d）住戶資料信息表（Client）字段名稱數(shù)據(jù)類型字段大小必填字段備注住戶編號文本10否物業(yè)地址文本50否房型文本10否建筑面積數(shù)字整型否使用面積數(shù)字整型否業(yè)主姓名文本10否籍貫文本50否工作單位文本50否郵編文本10否身份證號文本20否電話文本20否開戶銀行文本50否銀行帳號文本20否入住時間日期/時間否遷出時間日期/時間否性別文本1否表3.1（e）電費信息表（Power）字段名稱數(shù)據(jù)類型字段大小必填字段備注儀表編號文本10否住戶姓名文本10否物業(yè)地址文本50否年份數(shù)字整型否月份數(shù)字整型否上月數(shù)據(jù)數(shù)字單精度型否本月數(shù)據(jù)數(shù)字單精度型否本月用量數(shù)字單精度型否單價數(shù)字單精度型否本月費用數(shù)字單精度型否上月抄表日期日期/時間否本月抄表日期日期/時間否本月交費日期日期/時間否辦理人文本10否表3.1（f）氣費信息表（Gas）字段名稱數(shù)據(jù)類型字段大小必填字段備注儀表編號文本10否住戶姓名文本10否物業(yè)地址文本50否年份數(shù)字整型否月份數(shù)字整型否上月數(shù)據(jù)數(shù)字單精度型否本月數(shù)據(jù)數(shù)字單精度型否本月用量數(shù)字單精度型否單價數(shù)字單精度型否本月費用數(shù)字單精度型否上月抄表日期日期/時間否本月抄表日期日期/時間否本月交費日期日期/時間否辦理人文本10否3.3系統(tǒng)詳細設(shè)計3.3.1主程序界面設(shè)計因本設(shè)計涉及窗體比較多,故咱們只選用有代表性窗體加以重點描述。圖3.3社區(qū)信息管理系統(tǒng)主界面如圖3.3所示，其涉及四大模塊：（1）登錄系統(tǒng)：顧客登錄、修改密碼、添加顧客、退出系統(tǒng)；（2）基本資料：住戶資料、房產(chǎn)資料；（3）物業(yè)管理：物業(yè)設(shè)備管理、儀表數(shù)據(jù)管理、停車場管理、收費管理、住戶投訴管理、住戶報修管理、設(shè)備維修管理；（4）數(shù)據(jù)記錄報表：物業(yè)設(shè)備記錄、儀表數(shù)據(jù)記錄、收費記錄、住戶投訴記錄、住戶報修記錄、設(shè)備維修記錄。3.3.2系統(tǒng)登陸界面設(shè)計圖3.4顧客登錄圖如圖3.4所示,新建一種窗體,在窗體中添加二個Lable控件，二個TextBox控件,二個commandButton控件,設(shè)立其屬性。然后添加程序代碼。其中登錄按鈕源碼如下:PrivateSubcmdLogin_Click()'一方面檢查顧客與否輸入了顧客名和密碼IftxtUser.Text=""ThenMsgBox"請輸入顧客名！"，vbOKOnly+vbInformation，"注意"txtUser.SetFocusExitSubElseIftxtPwd.Text=""ThenMsgBox"請輸入密碼！"，vbOKOnly+vbInformation，"注意"txtPwd.SetFocusExitSubEndIfDimsqluserAsString'構(gòu)造查詢該顧客名和密碼sql語句sqluser="select*fromUserTablewhereUsername='"&txtUser.Text_&"'andPassword='"&txtPwd.Text&"'"rs_user.CursorLocation=adUseClient'打開數(shù)據(jù)游標rs_user.Opensqluser，conn，adOpenKeyset，adLockPessimisticIfrs_user.EOF=TrueThenMsgBox"顧客名或密碼不對的！"，vbOKOnly+vbInformation，"注意"rs_user.Close'清空txtUser和txtPwd文本框txtUser.Text=""txtPwd.Text=""ExitSubElse'還需使其她菜單可用MDIfrmMain.mnAddUser.Enabled=TrueMDIfrmMain.mnBasicData.Enabled=TrueMDIfrmMain.mnWuYe.Enabled=TrueMDIfrmMain.mnDataTg.Enabled=True'提示顧客登錄成功并關(guān)閉游標和登錄窗口MsgBox"登錄成功！"，vbOKOnly+vbInformation，"注意"rs_user.CloseUnloadMeEndIfEndSub3.3.3基本資料模塊設(shè)計圖3.5（a）住戶資料圖如圖3.5，同理窗體中控件添加比較直接,參照登錄窗體設(shè)計,并添加有關(guān)代碼.其中重點分析按鈕源碼如下:。添加按鈕代碼：PrivateSubcmdAdd_Click()'設(shè)立除保存和取消按鈕外其她按鈕不可用cmdAdd.Enabled=FalsecmdEdit.Enabled=FalsecmdDel.Enabled=FalsecmdSave.Enabled=TruecmdCancel.Enabled=TruecmdFirst.Enabled=FalsecmdPrev.Enabled=FalsecmdNext.Enabled=FalsecmdLast.Enabled=FalsecmdQuery.Enabled=False'需要清空所有text框，并且設(shè)立它們可寫Fori=0To14Text1(i).Text=""Text1(i).Enabled=TrueNextiCombo1.Enabled=True'add變量用于保存時判斷是從添加還是修改后保存add=1Text1(0).SetFocusText1(13).Text=DateEndSub修改按鈕源碼:PrivateSubcmdEdit_Click()'設(shè)立除保存和取消按鈕外其她按鈕不可用cmdAdd.Enabled=FalsecmdEdit.Enabled=FalsecmdDel.Enabled=FalsecmdSave.Enabled=TruecmdCancel.Enabled=TruecmdFirst.Enabled=FalsecmdPrev.Enabled=FalsecmdNext.Enabled=FalsecmdLast.Enabled=FalsecmdQuery.Enabled=False'需要設(shè)立除主鍵之外text框可寫Fori=1To14Text1(i).Enabled=TrueNextiCombo1.Enabled=Trueadd=0EndSub刪除按鈕源碼如下:PrivateSubcmdDel_Click()'當單擊刪除記錄時，需要彈出一種提示框，警告顧客DimanswerAsStringanswer=MsgBox("擬定要刪除嗎？"，vbYesNo，"")'的確刪除Ifanswer=vbYesThenrs_client.Delete'刪除當前記錄rs_client.Update'更新刪除MsgBox"成功刪除！"，vbOKOnly+vbExclamation，""ElseExitSubEndIf'刪除之后，顯示總信息條數(shù)需要減1Text2.Text=Val(Text2.Text)-1'刪除當前記錄后，需要顯示下一條記錄，如果刪除是最后一條記錄，則顯示上一條記錄'先移動rs_client記錄到后一條rs_client.MoveNextIfrs_client.EOFThenrs_client.MovePrevious'如果沒有到記錄首則顯示改記錄IfNotrs_client.BOFThenFori=0To14Text1(i).Text=rs_client.Fields(i)NextiIfrs_client.Fields(15)="男"ThenCombo1.ListIndex=0ElseCombo1.ListIndex=1EndIf'如果到記錄首，則表格已經(jīng)為空，置所有text框顯示為空ElseIfrs_client.BOFThenFori=0To14Text1(i).Text=""NextiEndIf'如果刪除不是首尾記錄，則顯示當前記錄即可ElseFori=0To14Text1(i).Text=rs_client.Fields(i)NextiIfrs_client.Fields(15)="男"ThenCombo1.ListIndex=0ElseCombo1.ListIndex=1EndIfEndIfEndSub保存按鈕源碼如下:PrivateSubcmdSave_Click()'檢測數(shù)據(jù)與否完整IfText1(0).Text=""ThenMsgBox"住戶編號不可為空！"，vbOKOnly+vbInformation，"注意"Text1(0).SetFocusExitSubElseIfText1(1).Text=""ThenMsgBox"物業(yè)地址不可為空！"，vbOKOnly+vbInformation，"注意"Text1(1).SetFocusExitSubElseIfText1(3).Text=""OrIsNumeric(Text1(3).Text)=FalseThenMsgBox"建筑面積應為數(shù)字！"，vbOKOnly+vbInformation，"注意"Text1(3).SetFocusExitSubElseIfText1(4).Text=""OrIsNumeric(Text1(4).Text)=FalseThenMsgBox"使用面積應為數(shù)字！"，vbOKOnly+vbInformation，"注意"Text1(4).SetFocusExitSubElseIfText1(5).Text=""ThenMsgBox"業(yè)主姓名不可為空！"，vbOKOnly+vbInformation，"注意"Text1(5).SetFocusExitSubElseIfIsDate(Text1(13).Text)=FalseThenMsgBox"入住日期書寫不對，應為-1-1這樣格式！"，vbOKOnly+vbInformation，"注意"Text1(13).SetFocusExitSubElseIfNotText1(14).Text=""AndIsDate(Text1(14).Text)=FalseThenMsgBox"遷出時間應為空或-1-1這樣格式！"，vbOKOnly+vbInformation，"注意"Text1(14).SetFocusExitSubEndIf'添加數(shù)據(jù)后保存Ifadd=1Then'檢測住戶編號這個主鍵與否已經(jīng)在表中存在Dimrs_checkAsNewADODB.RecordsetDimsqlCheckAsStringsqlCheck="select*fromClientwhere住戶編號='"&(Text1(0).Text)&"'"rs_check.OpensqlCheck，conn，adOpenStatic，adLockOptimisticIfNotrs_check.EOFAndNotrs_check.BOFThenMsgBox"該住戶編號已經(jīng)存在，請重填一種！"，vbOKOnly+vbInformation，"注意"rs_check.CloseText1(0).SetFocusText1(0).Text=""ExitSubEndIfrs_check.Close'主鍵不重復，可以加入表中rs_client.AddNewFori=0To14rs_client.Fields(i)=Text1(i).TextNextirs_client.Fields(15)=Combo1.Textrs_client.Update'添加保存之后，顯示總信息條數(shù)需要加1Text2.Text=Val(Text2.Text)-1'修改數(shù)據(jù)后保存Elsers_client.UpdateEndIfMsgBox"保存數(shù)據(jù)成功！"，vbOKOnly+vbInformation，"祝賀"'保存后需要設(shè)立其她按鈕可用，以及各個text框不可寫cmdAdd.Enabled=TruecmdEdit.Enabled=TruecmdDel.Enabled=TruecmdSave.Enabled=FalsecmdCancel.Enabled=FalsecmdFirst.Enabled=TruecmdPrev.Enabled=TruecmdNext.Enabled=TruecmdLast.Enabled=TruecmdQuery.Enabled=TrueFori=0To14Text1(i).Enabled=FalseNextiCombo1.Enabled=FalseEndSub基本資料模塊其他截圖如圖3.5所示：圖3.5（b）房產(chǎn)資料圖圖3.5（c）房產(chǎn)資料圖圖3.5（d）房產(chǎn)資料圖基本資料模塊設(shè)計涉及住戶資料和房產(chǎn)資料兩某些，其囊括住戶詳細個人信息和房屋使用信息，完畢了社區(qū)信息管理基本功能實現(xiàn)。兩某些均能實現(xiàn)對顧客信息增、查、刪、改，并且“以表格顯示”功能實現(xiàn)了對所有信息直接可視化管理，各種信息一目了然，以便操作，便于記錄，有效減少了管理員工作強度，節(jié)約了大量時間。3.3.4物業(yè)管理模塊設(shè)計圖3.6（a）物業(yè)設(shè)備管理圖如圖3.6，其中添加,修改,刪除按包源碼設(shè)計同上,重點分析保存按鈕源碼如下:PrivateSubcmdSave_Click()'檢測數(shù)據(jù)與否完整IfText1(0).Text=""ThenMsgBox"設(shè)備編號不可為空！"，vbOKOnly+vbInformation，"注意"Text1(0).SetFocusExitSubElseIfText1(1).Text=""ThenMsgBox"設(shè)備名稱不可為空！"，vbOKOnly+vbInformation，"注意"Text1(1).SetFocusExitSubElseIfIsDate(Text1(5).Text)=FalseThenMsgBox"購買日期書寫不對，應為-1-1這樣格式！"，vbOKOnly+vbInformation，"注意"Text1(5).SetFocusExitSubEndIf'添加數(shù)據(jù)后保存Ifadd=1Then'檢測房間編號這個主鍵與否已經(jīng)在表中存在Dimrs_checkAsNewADODB.RecordsetDimsqlCheckAsStringsqlCheck="select*fromEquipmentwhere設(shè)備編號='"&(Text1(0).Text)&"'"rs_check.OpensqlCheck，conn，adOpenStatic，adLockOptimisticIfNotrs_check.EOFAndNotrs_check.BOFThenMsgBox"該設(shè)備編號已經(jīng)存在，請重填一種！"，vbOKOnly+vbInformation，"注意"rs_check.CloseText1(0).SetFocusText1(0).Text=""ExitSubEndIfrs_check.Close'主鍵不重復，可以加入表中rs_equip.AddNewFori=0To6rs_equip.Fields(i)=Text1(i).TextNextirs_equip.Update'添加之后顯示總共條數(shù)信息加1Text2.Text=Val(Text2.Text)+1'修改數(shù)據(jù)后保存Elsers_equip.UpdateEndIfMsgBox"保存數(shù)據(jù)成功！"，vbOKOnly+vbInformation，"祝賀"'保存后需要設(shè)立其她按鈕可用，以及各個text框不可寫cmdAdd.Enabled=TruecmdEdit.Enabled=TruecmdDel.Enabled=TruecmdSave.Enabled=FalsecmdCancel.Enabled=FalsecmdFirst.Enabled=TruecmdPrev.Enabled=TruecmdNext.Enabled=TruecmdLast.Enabled=TruecmdQuery.Enabled=TrueFori=0To6Text1(i).Enabled=FalseNextiEndSub物業(yè)管理其他模塊截圖如圖3.6所示：圖3.6（b）儀表數(shù)據(jù)管理圖圖3.6（c）停車場管理圖圖3.6（d）收費管理圖圖3.6（e）住戶投訴管理圖圖3.6（f）顧客報修管理圖圖3.6（g）物業(yè)設(shè)備維修管理圖圖3.6（h）查找表圖3.6（i）查找表物業(yè)管理模塊下各項表都實現(xiàn)了基本管理信息增、查、刪、改。從物業(yè)設(shè)備管理到儀表數(shù)據(jù)管理、停車場管理、收費管理、住戶投訴管理、顧客報修管理、物業(yè)設(shè)備維修管理，基本囊括了一種社區(qū)細節(jié)管理項目。并且在查找功能中實現(xiàn)了精準查找和模糊查找兩種功能。查找關(guān)系涉及“=”、“﹥”和“﹤”，而邏輯關(guān)系則涉及了“and”、“or”和“not”，以保證明現(xiàn)不同規(guī)定查找，極大以便了管理員操作，簡化了環(huán)節(jié)，節(jié)約了時間。3.3.5數(shù)據(jù)報表記錄模塊設(shè)計圖3.7（a）物業(yè)設(shè)備記錄圖如圖3.7，其中排序按鈕源碼如下:PrivateSubcmdOrder_Click()DimsqlAsStringIfrs_order.State=adStateOpenThenrs_order.CloseEndIfsql="select*