【正文】 Dim Ws As Workspace //定義變量 //變量定義 Dim Db As Database Dim Rs As Recordset Dim SQLs As String Set Ws = (0) Set Db = ( amp。 　　　　　　 最后，我還要感謝四年以來辛勤培育我的系部領(lǐng)導(dǎo)、老師以及幫助我的同學(xué)們和同事，是你們幫助我一步一步成長(zhǎng)，成長(zhǎng)成為一個(gè)有理想、有道德、有文化、有紀(jì)律的四有青年。同時(shí)，我還從馮老師身上學(xué)到了很多東西，劉老師認(rèn)真負(fù)責(zé)的工作態(tài)度，嚴(yán)謹(jǐn)?shù)闹螌W(xué)精神和深厚的理論水平都使我收益匪淺，這對(duì)于我以后的學(xué)習(xí)和工作都將是一種先導(dǎo)作用。為以后的工作、學(xué)習(xí)的進(jìn)一步提高打下了堅(jiān)實(shí)的基礎(chǔ)。對(duì)于后期的系統(tǒng)維護(hù)也提供了很大的幫助。這次的畢業(yè)設(shè)計(jì)開發(fā)，主要有以下幾點(diǎn)收獲：1．對(duì)原型化的系統(tǒng)開發(fā)方法有了一定的了解。他無論在理論上還是在實(shí)踐中，都給與我很大的幫助，使我得到很大的提高，這對(duì)于我以后的工作和學(xué)習(xí)都有一種巨大的幫助，在此感謝他耐心的輔導(dǎo)。相信該物業(yè)管理系統(tǒng)將是一套物業(yè)管理員必不可少的管理軟件，在本次畢業(yè)設(shè)計(jì)中，我從指導(dǎo)老師馮丁武老師身上學(xué)到了很多東西。雖然網(wǎng)絡(luò)在物業(yè)管理系統(tǒng)中的應(yīng)用已經(jīng)很普遍，但在開發(fā)過程由于硬件的限制，未能實(shí)現(xiàn)網(wǎng)絡(luò)功能，在大多數(shù)物業(yè)管理系統(tǒng)單機(jī)版中，數(shù)據(jù)庫(kù)是用普通的單機(jī)版數(shù)據(jù)庫(kù)，那么在以后的系統(tǒng)更新過程中會(huì)造成不必要的損失。因此，該系統(tǒng)必然會(huì)存在一些缺陷和不足。第六章 開發(fā)總結(jié)在本系統(tǒng)的開發(fā)過程中，由于本人是初次開發(fā)軟件，在知識(shí)、經(jīng)驗(yàn)方面都存在著不足。 系統(tǒng)的轉(zhuǎn)換方案本次開發(fā)的小區(qū)管理系統(tǒng)采用了并行轉(zhuǎn)換方式，以保證平衡可靠的過度。但它的前提是必須經(jīng)常利用“數(shù)據(jù)備份”功能將相應(yīng)數(shù)據(jù)庫(kù)的內(nèi)容進(jìn)行備份。 （4）預(yù)防性維護(hù) 為將要發(fā)生的變化或調(diào)整而進(jìn)行的主動(dòng)性維護(hù)。 （2）適應(yīng)性維護(hù) 使系統(tǒng)適用環(huán)境的變化而進(jìn)行的維護(hù)。系統(tǒng)維護(hù)的工作量往往是很大的，其費(fèi)用大約占整個(gè)生命周期的60%，所以我們必須對(duì)系統(tǒng)維護(hù)給予足夠的重視。 系統(tǒng)的維護(hù)系統(tǒng)維護(hù)的目的是保證管理信息系統(tǒng)正常而可靠地運(yùn)行，并能使系統(tǒng)不斷得到改善和提高，以充分發(fā)揮作用。 內(nèi)存：32MB以上。其主要代碼如下:Private Sub InitList1() //ListView初始化事件 With //設(shè)定標(biāo)題 .Add , , 車位編號(hào), 1000 .Add , , 住戶名稱, 1600 .Add , , 使用日期, 1600 .Add , , 備注, 3000 End WithEnd SubPrivate Sub Command1_Click() //新增按鈕單擊事件 intType = 1 //當(dāng)前執(zhí)行新增操作 = True //使控件有效，可訪問 = True SetButton (False) SetInputBox //清輸入框?yàn)榭誆nd SubPrivate Sub Command2_Click() //刪除按鈕單擊事件 DelRepair //刪除信息 Call ListRepair(ListView1) //重新顯示數(shù)據(jù)End Sub第五章 系統(tǒng)運(yùn)行與維護(hù)管理信息系統(tǒng)在完成系統(tǒng)實(shí)施、投入正常運(yùn)行之后，就進(jìn)入了系統(tǒng)運(yùn)行與維護(hù)階段。 39。 amp。刪除繳費(fèi)信息 Dim Ws As Workspace Dim Db As Database Dim Rs As Recordset Dim SQLs As String Set Ws = (0) Set Db = ( amp。 39。 amp。添加繳費(fèi)信息 Dim Ws As Workspace Dim Db As Database Dim Rs As Recordset Dim SQLs As String Set Ws = (0) Set Db = ( amp。 39。 amp。 此窗體的實(shí)現(xiàn)代碼，與上一個(gè)窗體類似，故省略. 住戶報(bào)修管理本窗體用于管理住戶的報(bào)修情況，可實(shí)現(xiàn)用戶維修情況的增加，刪除之類信息，以下是實(shí)現(xiàn)增加功能的主要代碼：Private Function AddRepair() As Boolean Dim Ws As Workspace Dim Db As Database Dim Rs As Recordset Dim SQLs As String On Error Resume Next Set Ws = (0) Set Db = ( amp。 　　復(fù)合表達(dá)式使用在適當(dāng)?shù)膱?chǎng)合可以使代碼更加簡(jiǎn)潔，但不能因?yàn)檫@個(gè)簡(jiǎn)潔而帶來理解的復(fù)雜 登錄模塊登錄界面登錄代碼：Private Sub Command1_Click() //新增按鈕單擊事件 //確定按鈕事件 If CheckLogin Then ，則隱去登錄窗體，顯示主界面 Else 基本資料管理住戶資料錄入本窗體，實(shí)現(xiàn)了對(duì)住戶基本信息的維護(hù)問題，包括新增、刪除、修改等基本的編輯操作。如系統(tǒng)中Form窗體的命名規(guī)則為:frm_main,frm_login；2. 運(yùn)算符的優(yōu)先級(jí) 　　如果代碼行中的運(yùn)算符比較多，應(yīng)該用括號(hào)確定表達(dá)式的操作順序，避免使用默認(rèn)的優(yōu)先級(jí)。本系統(tǒng)中相關(guān)數(shù)據(jù)庫(kù)表結(jié)構(gòu)設(shè)計(jì)舉例如下：Ddmin（管理員）表：字段名稱字段類型寬度小數(shù)位ID自動(dòng)編號(hào)UserName文本20Psw文本50BaseInfo（住戶信息）表：字段名稱字段類型寬度小數(shù)位住戶編號(hào)文本20戶主名稱文本20聯(lián)系電話文本20樓宇名稱文本50樓層文本20房屋號(hào)文本20單元文本20遷入日期日期/時(shí)間房型文本20備注備注DataMoney（收費(fèi)信息）表：字段名稱字段類型寬度小數(shù)位編號(hào)自動(dòng)編號(hào)單據(jù)編號(hào)文本20住戶名稱文本20繳費(fèi)日期日期/時(shí)間20收費(fèi)人員文本20繳費(fèi)方式文本20繳費(fèi)總額數(shù)字42備注備注Park（車位使用信息）表：字段名稱字段類型寬度小數(shù)位編號(hào)自動(dòng)編號(hào)車位編號(hào)文本20住戶名稱文本20使用日期日期/時(shí)間備注備注ParkBase（車位信息）表：字段名稱字段類型寬度小數(shù)位編號(hào)自動(dòng)編號(hào)車位編號(hào)文本20備注備注Repair（報(bào)修信息）表：字段名稱字段類型寬度小數(shù)位單據(jù)編號(hào)文本20住戶名稱文本20維修人員文本20報(bào)修日期日期/時(shí)間服務(wù)費(fèi)用數(shù)字4物料費(fèi)用數(shù)字4費(fèi)用合計(jì)數(shù)字4報(bào)修內(nèi)容備注TouShu（投訴信息）表：字段名稱字段類型寬度小數(shù)位投訴編號(hào)文本20投訴住戶文本20接待人員文本20投訴日期日期/時(shí)間投訴內(nèi)容備注處理人員文本20處理情況備注第四章 系統(tǒng)編碼與實(shí)現(xiàn) 編碼原則1. 標(biāo)識(shí)符命名 標(biāo)識(shí)符應(yīng)當(dāng)直觀且可以拼讀，可望文知意，最好采用英文單詞或其組合，便于記憶和閱讀，切忌使用漢語拼音來命名?；谝陨显O(shè)計(jì)原則，本系統(tǒng)設(shè)計(jì)了一個(gè)數(shù)據(jù)庫(kù)，包含管理員、住戶信息、收費(fèi)信息、車位使用信息、車位信息、報(bào)維信息、維護(hù)信息等幾個(gè)表。（2） 結(jié)構(gòu)設(shè)計(jì)與操作設(shè)計(jì)相結(jié)合。E——R圖由實(shí)體、屬性、聯(lián)系三部分組成。此管理信息系統(tǒng)的HIPO圖如下小區(qū)物業(yè)管理系統(tǒng)系統(tǒng)維護(hù)統(tǒng)計(jì)報(bào)表物業(yè)管理基本資料錄入住戶停車位住戶繳費(fèi)住戶報(bào)修投訴管理數(shù)據(jù)備份數(shù)據(jù)恢復(fù)報(bào)修報(bào)表投訴報(bào)表住戶資料停車場(chǎng)資料 物業(yè)管理主要模塊流程圖 投訴管理流程圖保存投訴信息（保存功能）生成投訴報(bào)表登記投訴信息 （增加功能）修改投訴信息（修改功能）終止投訴刪除投訴信息（刪除功能） 住戶報(bào)修管理流程圖登記維修信息（增加功能）修改報(bào)修信息（修改功能）刪除報(bào)修信息（刪除功能）確定維修繳納費(fèi)用生成維修統(tǒng)計(jì)報(bào)表 住戶繳費(fèi)管理流程圖登記繳費(fèi)信息（增加功能）繳費(fèi)情況出現(xiàn)變動(dòng)修改繳費(fèi)信息（修改功能）住戶遷離刪除住戶所有繳費(fèi)信息（刪除功能）保存住戶繳費(fèi)信息（保存功能） 住戶停車車位管理流程圖住戶申請(qǐng)登記車位（增加功能）繳納停車位費(fèi)用車輛遷出車位信息變更刪除車位信息（刪除功能）修改車位信息（修改功能）保存住戶停車位資料（保存功能） 數(shù)據(jù)庫(kù)設(shè)計(jì)數(shù)據(jù)庫(kù)設(shè)計(jì)是要在一個(gè)給定的應(yīng)用環(huán)境（DBMS）中，通過合理的邏輯設(shè)計(jì)和有效的物理設(shè)計(jì)，構(gòu)造較優(yōu)的數(shù)據(jù)庫(kù)模式、子模式，建立數(shù)據(jù)庫(kù)和設(shè)計(jì)應(yīng)用程序，滿足用戶的各種信息需求。 功能模塊管理信息系統(tǒng)設(shè)計(jì)階段的主要目的是將系統(tǒng)分析階段所提出的反映了用戶信息需求的系統(tǒng)邏輯方案轉(zhuǎn)換成可以實(shí)施的基于計(jì)算機(jī)與通信系統(tǒng)的物理（技術(shù)）方案。SQL語言的常用操作有：建立數(shù)據(jù)庫(kù)數(shù)據(jù)表（CREATE TABLE），如本系統(tǒng)中的學(xué)生及成績(jī)備份就用到該語句；從數(shù)據(jù)庫(kù)中篩選一個(gè)記錄集（SELECT），這是最常用的一個(gè)語句，功能強(qiáng)大，能有效地對(duì)數(shù)據(jù)庫(kù)中一個(gè)或多個(gè)數(shù)據(jù)表中的數(shù)據(jù)進(jìn)行訪問，并兼有排序、分組等功能；在數(shù)據(jù)表中添加一個(gè)記錄（INSERT）；刪除符合條件的記錄（DELETE）；更改符合條件的記錄（UPDATE）； VB中的數(shù)據(jù)庫(kù)操作對(duì)象都提供了對(duì)SQL語句的支持。 SQL查詢語言及使用SQL語言是結(jié)構(gòu)化語言（Structure Query Language）的縮寫，是一種用于數(shù)據(jù)庫(kù)查詢和編程的語言，已經(jīng)成為關(guān)系型數(shù)據(jù)庫(kù)普遍使用的標(biāo)準(zhǔn)，使用這種標(biāo)準(zhǔn)數(shù)據(jù)庫(kù)語言對(duì)程序設(shè)計(jì)和數(shù)據(jù)庫(kù)的維護(hù)都帶來了極大的方便，廣泛地應(yīng)用于各種數(shù)據(jù)查詢。ADO 支持用于建立基于客戶端/服務(wù)器和 Web 的應(yīng)用程序的主要功能。 Microsoft SQL與 ADO作為應(yīng)用程序與OLE DB連接的橋梁，ActiveX Data Objects (ADO)為Visual Basic 下開發(fā)的應(yīng)用程序訪問本地或遠(yuǎn)程數(shù)據(jù)庫(kù)提供了有效的手段。在Windows9x、WindowsNT或Windows2000環(huán)境下，用Visual Basic 。在應(yīng)用程序中，可以使用結(jié)構(gòu)化查詢語言SQL數(shù)據(jù)標(biāo)準(zhǔn)，直接訪問Server上的數(shù)據(jù)庫(kù)，并提供了簡(jiǎn)單的面向?qū)ο蟮膸?kù)操作指令、多用戶數(shù)據(jù)庫(kù)訪問的加鎖機(jī)制和網(wǎng)絡(luò)數(shù)據(jù)庫(kù)的SQL的編程技術(shù)，為單機(jī)上運(yùn)行的數(shù)據(jù)庫(kù)提供了SQL網(wǎng)絡(luò)接口，以便在分布式環(huán)境中快速而有效地實(shí)現(xiàn)客戶服務(wù)器方案。同時(shí)，Visual Basic還能直接編輯和訪問其他外部數(shù)據(jù)。Visual Basic系統(tǒng)具有很強(qiáng)的數(shù)據(jù)庫(kù)管理功能。在用Visual Basic設(shè)計(jì)大型應(yīng)用軟件時(shí)，不必建立具有明顯開始和結(jié)束的程序，而是編寫若干個(gè)微小的子程序，即過程，這些過程分別面向不同的對(duì)象，由用戶操作引發(fā)某個(gè)事件來驅(qū)動(dòng)執(zhí)行某特定的功能，或者由事件驅(qū)動(dòng)程序調(diào)用通用過程來執(zhí)行指定的操作。一個(gè)對(duì)象可能會(huì)產(chǎn)生多個(gè)事件，每個(gè)事件都可以通過一段程序來響應(yīng)。每個(gè)對(duì)象以圖形方式顯示在界面上，都是可視的。在一般的面向?qū)ο蟪绦蛟O(shè)計(jì)語言中，對(duì)象由程序代碼和數(shù)據(jù)組成，是抽象的概念；而Visual Basic則是應(yīng)用面向?qū)ο蟮某绦蛟O(shè)計(jì)方法（OOP），把程序和數(shù)據(jù)封裝起作為一個(gè)對(duì)象，并為每個(gè)對(duì)象賦予應(yīng)有的屬性，使對(duì)象成為實(shí)在的東西。總的來看，Visual Basic有以下主要特點(diǎn)： Visual Basic提供了可視化設(shè)計(jì)工具，把Windows界面設(shè)計(jì)復(fù)雜性“封裝”起來，開發(fā)人員不必為界面設(shè)計(jì)而編寫大量程序代碼，只需要按設(shè)計(jì)要求的屏幕布局，用系統(tǒng)提供的工具，在屏幕上畫出各種“部件”，即圖形對(duì)象，并設(shè)置這些圖形對(duì)象的屬性。它簡(jiǎn)單易學(xué)、效率高、且功能強(qiáng)大。 開發(fā)環(huán)境本系統(tǒng)采用面向?qū)ο蟮能浖_發(fā)方法，以Microsoft公司的可視開發(fā)環(huán)境Visual Basic ，使用Microsoft Access 2000作為關(guān)系數(shù)據(jù)庫(kù)，并在VB編程語言中采用ADO 數(shù)據(jù)庫(kù)編程模型，配合功能強(qiáng)大的SQL查詢語言實(shí)現(xiàn)建立關(guān)系數(shù)據(jù)庫(kù)，訪問數(shù)據(jù)庫(kù)，對(duì)數(shù)據(jù)庫(kù)的更新，較好地實(shí)現(xiàn)了預(yù)定的需求功能。E、住戶停車車位管理：這個(gè)功能可以輕松監(jiān)控住戶的車位信息。C、住戶報(bào)修管理：記錄報(bào)修信息，為住戶提供及時(shí)的維修服務(wù)。綜上所述，開發(fā)物業(yè)小區(qū)管理系統(tǒng)在技術(shù)上、經(jīng)濟(jì)上、管理上都是可行的。有計(jì)算機(jī)操作經(jīng)驗(yàn)，并有豐富的管理和工作經(jīng)驗(yàn)，因此因管理上可行。經(jīng)濟(jì)上可行：由于住戶需要支付管理費(fèi)，因此小區(qū)在采用計(jì)算機(jī)來進(jìn)行小區(qū)的管理，因開