【導讀】統(tǒng)設(shè)計與開發(fā)》是在指導教師的指導下，獨立開展研究取得的成果，使用的數(shù)據(jù)真實可靠。對當代社會這一市場需要應(yīng)運而生。用計算機操作的小區(qū)物業(yè)管理系統(tǒng)是為小區(qū)管理者和。的實地調(diào)查，弄清楚了該小區(qū)現(xiàn)在的物業(yè)管理狀況；熟悉了該小區(qū)的管理流程和運作方式，管理和收費管理共七大模塊。每個模塊除了基本的增加、修改、刪除、更新、查詢功能外，還有統(tǒng)計、報表打印、數(shù)據(jù)備份等功能。功能強大；有開發(fā)背景，系統(tǒng)具有一定的實用性。這種體系結(jié)構(gòu)下，物業(yè)管理中日常信息。的查詢方便快捷，財務(wù)的管理準確高效，同時又不相互影響，能更好的為業(yè)主服務(wù)。

　　

【正文】 員工 管理 日期： 20210331 由下列模塊調(diào)用： 小區(qū)物業(yè) 管理 調(diào)用系列模塊： 員工設(shè)置、員工信息 操作 輸入：員工 資料數(shù)據(jù) 輸出：操作后的員工 數(shù)據(jù) 處理內(nèi)容： 如輸入的員工資料信息無誤則登入員工 管理系統(tǒng) 如輸入的員工 資料有誤返回到初始界 面 備注： 表 33 收費管理模塊 IPO圖 北京理工大學珠海學院 2021屆本科生畢業(yè)設(shè)計 23 IPO 圖 系統(tǒng)名：小區(qū)物業(yè) 管理系統(tǒng) 制圖者： XX 模塊名： 收費管理 日期： 20210331 由下列模塊調(diào)用： 小區(qū)物業(yè)管理 調(diào)用系列模塊： 儀表數(shù)據(jù)管理、收費 操作 、欠費警報管理 輸入：儀表數(shù)據(jù) 輸出：操作后的收費 數(shù)據(jù) 處理內(nèi)容： 如輸入的儀表資料信息無誤則登入收費 管理系統(tǒng) 進行操作 如輸入的儀表 資料有誤返回到初始界面 備注： 表 34 報修維修模塊 IPO圖 IPO 圖 系統(tǒng)名 ：小區(qū)物業(yè)管理系統(tǒng) 制圖者： XX 模塊名：報修維修管理 日期： 20210331 由下列模塊調(diào)用： 小區(qū)物業(yè)管理系統(tǒng) 調(diào)用系列模塊： 事件申報、維修管理、統(tǒng)計維修事件、登記維修結(jié)果、報修維修查詢等模塊 輸入：相關(guān)數(shù)據(jù) 輸出：對應(yīng)表格 處理內(nèi)容： 如輸入正確數(shù)據(jù)，則登入系統(tǒng)進行報修維修操作 北京理工大學珠海學院 2021屆本科生畢業(yè)設(shè)計 24 如輸入的數(shù)據(jù)或者資料不正確，則不能進入系統(tǒng) 備注： 表 35 停車場管理模塊 IPO圖 IPO 圖 系統(tǒng)名：小區(qū)物業(yè)管理系統(tǒng) 制圖者： XX 模塊名：停車場管理 日期： 20210331 由下列模塊調(diào)用： 小區(qū)物業(yè)管理 調(diào)用系列模塊： 判斷、檢查證件、登記出入記錄 輸入：車輛及車主資料 輸出：車輛進出表 處理內(nèi)容： 先判斷車主的類型，查看車位情，作出判斷 如車主的證件檢查無誤，則進入系統(tǒng)登記車輛出入的信息 如非固定用戶或臨時用戶證件有誤，則不進入系統(tǒng) 備注： 表 36 出入信息管理模塊 IPO圖 IPO 圖 系統(tǒng)名：小區(qū)物業(yè)管理系統(tǒng) 制圖者： XX 模塊名：出入信息管理 日期： 20210331 由下列模塊調(diào)用： 小區(qū)物業(yè)管理 調(diào)用系列模塊： 判斷、檢查證件、登記出入記錄 輸入：來訪者詳細資料 輸出：出入記錄 北京理工大學珠海學院 2021屆本科生畢業(yè)設(shè)計 25 處理內(nèi)容： 先詢問來訪目的，核對被訪業(yè)主信息，作出判斷 如來訪者的證件檢查無誤，則進入系統(tǒng)登記出入信息 如被訪業(yè)主不存在或來訪者證件有誤，則不進入系統(tǒng) 備注： 表 37 房屋 管理模塊 IPO圖 IPO 圖 系統(tǒng)名：小區(qū)物業(yè) 管理系統(tǒng) 制圖者： XX 模塊名：房屋 管理 日期： 20210331 由下列模塊調(diào)用： 小區(qū)物業(yè) 管理 調(diào)用系列模塊： 戶型登記、狀態(tài)查詢、房產(chǎn)所有權(quán)管理、監(jiān)理資料、建筑資料管理 輸入：房屋 資料數(shù)據(jù) 輸出：操作后 的房屋信息 處理內(nèi)容： 如輸入的房屋信息無誤則登入房屋登記管理 對房屋 資料 進行相關(guān)的查詢、資料查看 備注： 北京理工大學珠海學院 2021屆本科生畢業(yè)設(shè)計 26 數(shù)據(jù)庫設(shè)計 實體關(guān)系模型（ ER 圖） 管 理物 管 人 員2m業(yè) 主2操 作n房 間姓 名性 別職 工 號房 間 號實 住 人 員建 筑 面 積住 宅 人員 資 料公 共 設(shè) 施使 用 面 積姓 名業(yè) 主 I D工 作 單 位單 位 地 址聯(lián) 系 電 話身 份 證 號房 間 號性 別物 管 人 員 署 名物 管 人 員 簽 名14使 用房 間 號 圖 33 ER圖 基本信息表 報修維修表： 車輛出入記錄： 北京理工大學珠海學院 2021屆本科生畢業(yè)設(shè)計 27 出入信息表： 房屋信息表 ： 人事考勤： 設(shè)備登記表： 收費表： 北京理工大學珠海學院 2021屆本科生畢業(yè)設(shè)計 28 收費類別： 業(yè)主信息表： 儀表數(shù)據(jù)： 應(yīng)繳費用： 員工表： 北京理工大學珠海學院 2021屆本科生畢業(yè)設(shè)計 29 員工工資： 代碼設(shè)計 ○ 1 房間 號： X – X X – X門 牌 號住 房 樓 區(qū) 號樓 層 號 其中：住房樓區(qū)號為 A、 B、 C、 D 共 4 棟樓；樓房號為 130 共三十層樓；門牌號為 18 代表每層樓共八戶住戶。 ○ 2 業(yè)主 ID： X X X X X X X 業(yè) 主 編 號樓 層 號門 牌 號住 房 樓 區(qū) 號 其中：住房樓區(qū)號為 A、 B、 C、 D 共 4 棟樓；樓房號為 130 共三十層樓；門牌號為 18 代表每層樓共八戶住戶；業(yè)主編號為 1100 表示所住同一房間的秩序號。 表 38 業(yè)主 ID 住 房 樓 區(qū)號 住宅房單元號 房間號 業(yè)主編號 A 1 1 1 B 2 ? ? 北京理工大學珠海學院 2021屆本科生畢業(yè)設(shè)計 30 C ? ? ? D 30 8 100 ○ 3 員工 ID 編號： X X X部 門 編 號員 工 內(nèi) 部 編 號 表 39 員工 ID 服務(wù)部 人員 工號 姓名 工程部 人員 工號 姓名 信息部 人員 工號 姓名 財務(wù)部人員工號 姓名 F01 何曉 G01 田 敢 X01 張 屋 C01 王莽 F02 張咪 G02 何 殿 X02 鄧 游 C02 張飛飛 F03 王紅 G03 朱珠 X03 孫毅 C03 陳燕 F04 張平 G04 黎平 X04 鄧家 C04 李工 F05 李煜 G05 張樟 X05 吳靈 C05 姚郜 ?? ?? ?? ?? ?? ?? ?? ?? 輸入 /輸出設(shè)計 ① 輸出設(shè)計工作主要包括：首先，此系統(tǒng)的輸出方式， 主要是電腦屏幕 界面 顯示輸出的表格樣式輸出；其次 ，系統(tǒng) 輸出的類型 有外部輸出，也就是向計算機系統(tǒng)外的輸 出，如有關(guān)的業(yè)主信息 表、房間信息表、 報修 維修 表 、出入信息表、車輛進出表、員工表、收費表 、儀表數(shù)據(jù)等 。 輸出 的格式主要以表格為主，當然其 輸出設(shè)備是打印機，輸出介質(zhì) 為 打印紙。 ② 輸入設(shè)計工作主要包括：首先，確保輸入數(shù)據(jù)的分析與內(nèi)容的精確性和 有效性，比如輸入的房間信息和業(yè)主信息是正確的，報修維修信息是無誤的等等；其次 ，輸入方式選擇的是鍵盤輸入，輸入設(shè)備有鍵盤、鼠標、掃描儀。 北京理工大學珠海學院 2021屆本科生畢業(yè)設(shè)計 31 界面設(shè)計 歡迎界面： 登陸界面： 北京理工大學珠海學院 2021屆本科生畢業(yè)設(shè)計 32 4 系統(tǒng)實現(xiàn) 主界面設(shè)計 報修維修管理模塊 設(shè)備登記： 報修管理： 北京理工大學珠海學院 2021屆本科生畢業(yè)設(shè)計 33 報修管理查詢： 報修類型統(tǒng)計： 對應(yīng)代碼： 北京理工大學珠海學院 2021屆本科生畢業(yè)設(shè)計 34 Private Sub Combo2_Change() If Then If = Then MsgBox 請選擇報修事件 , vbOKOnly + vbInformation, 提示 End If Else If = And xg = ture Then MsgBox 報修事件不能為 空 !, vbOKOnly + vbInformation, 提示 End If End If End Sub Private Sub Command1_Click() = False End Sub Private Sub Command11_Click() MsgBox 報修管理總數(shù)為 : amp。 End Sub Private Sub Command2_Click() s = MsgBox(真的要刪除這個記錄嗎？ , vbYesNo + vbInformation, 刪除記錄 ) If s = vbYes Then If Then End If End If End Sub 維修管理： 北京理工大學珠海學院 2021屆本科生畢業(yè)設(shè)計 35 維修查詢： 界面和代碼請見附件 2 維修統(tǒng)計： 界面和代碼請見附件 2 停車場管理模塊 北京理工大學珠海學院 2021屆本科生畢業(yè)設(shè)計 36 房屋管理模塊 房間查詢： 請見 附件 2 房產(chǎn)所有權(quán) ： 請見附件 2 監(jiān)理資料： 北京理工大學珠海學院 2021屆本科生畢業(yè)設(shè)計 37 建筑資料： 收費管理模塊 收費類別添加： 收費類別修改： 請見附件 2 收費查詢： 請見附件 2 儀表數(shù)據(jù)： 北京理工大學珠海學院 2021屆本科生畢業(yè)設(shè)計 38 用戶繳費： 應(yīng)收費用： 北京理工大學珠海學院 2021屆本科生畢業(yè)設(shè)計 39 對應(yīng)代碼： Private Sub Command10_Click() MsgBox 應(yīng)收費用總數(shù)為 : amp。 End Sub Private Sub Command12_Click() Dim txtsql As String Dim msgtext As String Dim dd(4) As Boolean txtsql = select * from 收費表 where 0=0 = adCmdText If ( + + = 0) Then MsgBox 請設(shè)置查詢方式！ , vbOKOnly + vbExclamation, 警告 Exit Sub Else txtsql = txtsql 39。Set mrc = ExecuteSQL(txtsql, msgtext) 39。Set = mrc = txtsql MsgBox txtsql, vbOKOnly, s End If End Sub Private Sub Command8_Click() Dim txtsql As String Dim msgtext As String Dim dd(4) As Boolean txtsql = select * from 應(yīng)繳費用表 where 0=0 = adCmdText If Then If Trim() = Then MsgBox 當前房間號不能為空 , vbOKOnly + vbExclamation, 警告 北京理工大學珠海學院 2021屆本科生畢業(yè)設(shè)計 40 Exit Sub Else txtsql = txtsql amp。 and 房間號 =39。 amp。 Trim() amp。 39。 End If End If If ( + = 0) Then MsgBox 請設(shè)置查詢方式！ , vbOKOnly + vbExclamation, 警告 Exit Sub Else txtsql = txtsql 39。Set mrc = ExecuteSQL(txtsql, msgtext) 39。Set = mrc = txtsql MsgBox txtsql, vbOKOnly, s End If End