超市消防系統(tǒng)畢業(yè)論文.doc

炎黃職業(yè)技術(shù)學(xué)院信息工程系 畢業(yè)設(shè)計 論文 超市消防系統(tǒng) 年 級 311 級 學(xué) 號 07000903017 姓 名 張 瀟 專 業(yè) 樓宇智能化 指導(dǎo)老師 張 爽 二零一三年十二月 第 頁 摘 要 消防監(jiān)控系統(tǒng)是大型超市不可缺少的重要組成部分 能夠及時發(fā)現(xiàn)和通報火情 并能采取措施滅火 保證超市內(nèi)設(shè)備正常運行和人員逃離 本設(shè)計包裹兩個主要部 分 硬件部分設(shè)計和軟件部分設(shè)計 硬件部分設(shè)計首先通過探測器和控制器監(jiān)控超 市的溫度 可燃氣體的濃度 煙灰密度 光的強度等物理量 然后進行數(shù)據(jù)采集 最后將采集到的數(shù)據(jù)通過二總線傳到消防報警監(jiān)控聯(lián)動系統(tǒng) 再由消防聯(lián)動系統(tǒng)監(jiān) 控聯(lián)動設(shè)備發(fā)出警報 噴淋滅火動作 矚慫潤厲釤瘞睞櫪廡賴 火災(zāi)自動報警系統(tǒng)選用海灣公司的二總線火災(zāi)報警控制系統(tǒng) 考慮消防栓滅火 系統(tǒng) 閉式濕式自動滅火系統(tǒng) 氣體滅火系統(tǒng)等顯示工程中常見的固定滅火系統(tǒng) 同時 增加了計算機聯(lián)動控制和消防控制室多線控制盤硬件直接控制電路 加強了 系統(tǒng)的可靠性 聞創(chuàng)溝燴鐺險愛氌譴凈 關(guān)鍵詞 火災(zāi)自動報警 聯(lián)動控制 自動噴水滅火系統(tǒng) 第 I 頁 目目 錄錄 摘 要 I殘騖樓諍錈瀨濟溆塹籟 第 1 章 緒 論 1釅錒極額閉鎮(zhèn)檜豬訣錐 1 1 本課題的研究意義 1彈貿(mào)攝爾霽斃攬磚鹵廡 1 2 本課題的研究目的 1謀蕎摶篋飆鐸懟類蔣薔 1 3 本論文的主要內(nèi)容與創(chuàng)新點 2廈礴懇蹣駢時盡繼價騷 第 2 章 人事工資系統(tǒng)概述 3煢楨廣鰳鯡選塊網(wǎng)羈淚 2 1 國內(nèi)人事工資系統(tǒng)現(xiàn)狀和發(fā)展 3鵝婭盡損鵪慘歷蘢鴛賴 2 2 人事工資系統(tǒng)理論介紹 3籟叢媽羥為贍僨蟶練淨 2 3 系統(tǒng)特征與主要使用技術(shù) 6預(yù)頌圣鉉儐歲齦訝驊糴 第 3 章 系統(tǒng)分析與設(shè)計 7滲釤嗆儼勻諤鱉調(diào)硯錦 3 1 系統(tǒng)分析 7鐃誅臥瀉噦圣騁貺頂廡 3 2 系統(tǒng)功能分析 7擁締鳳襪備訊顎輪爛薔 3 3 數(shù)據(jù)流程圖 7贓熱俁閫歲匱閶鄴鎵騷 第四章 系統(tǒng)詳細設(shè)計與模塊的具體實現(xiàn) 9壇摶鄉(xiāng)囂懺蔞鍥鈴氈淚 4 1 系統(tǒng)的登錄界面 9蠟變黲癟報倀鉉錨鈰贅 4 1 1 登錄界面的具體實現(xiàn) 10買鯛鴯譖曇膚遙閆擷凄 4 2 主界面的具體實現(xiàn) 12綾鏑鯛駕櫬鶘蹤韋轔糴 4 3 錄入信息界面的具體實現(xiàn) 12驅(qū)躓髏彥浹綏譎飴憂錦 4 4 查看統(tǒng)計界面的具體實現(xiàn) 15貓蠆驢繪燈鮒誅髏貺廡 4 5 查看信息界面的具體實現(xiàn) 17鍬籟饗逕瑣筆襖鷗婭薔 4 6 管理工資界面的具體實現(xiàn) 18構(gòu)氽頑黌碩飩薺齦話騖 4 7 工資條界面的具體實現(xiàn) 19輒嶧陽檉籪癤網(wǎng)儂號澩 4 8 考勤和應(yīng)扣項目界面的具體實現(xiàn) 20堯側(cè)閆繭絳闕絢勵蜆贅 4 9 工資標準界面的具體實現(xiàn) 21識饒鎂錕縊灩筧嚌儼淒 結(jié) 論 23凍鈹鋨勞臘鍇癇婦脛糴 致 謝 24恥諤銪滅縈歡煬鞏鶩錦 參考文獻 25鯊腎鑰詘褳鉀溈懼統(tǒng)庫 附 錄 程序相關(guān)代碼 26碩癘鄴頏謅攆檸攜驤蘞 炎黃職業(yè)技術(shù)學(xué)院 信息工程系畢業(yè)設(shè)計 論文 第 0 頁共 31 頁 第 1 章 緒 論 隨著市場經(jīng)濟的迅速發(fā)展 商業(yè)路通改變了傳統(tǒng)的模式 減少了流通中間環(huán)節(jié) 而趨于大型化 市場化 集成化 各地相繼建成了諸多大型超市 這些大型超市的 出現(xiàn) 在給消費者帶來了很大便利的同時 也給人們帶來了巨大的安全隱患 由于 其商品品種豐富 商品價格低廉 收到了廣大市民的歡迎 與一般商場相比 倉儲 式超市多位單層或者兩層 具有封閉式 面積大 體積大 點苦何以的特點 由于 超市內(nèi)人員高度密集 貨物集中 一旦發(fā)生火災(zāi)事故 燃燒速度快 火災(zāi)溫度高 容易形成立體燃燒 且人員疏散困難 會造成嚴重的財產(chǎn)損失和人員傷亡 近年來 國內(nèi)也相繼發(fā)生商場 市場的特大火災(zāi)事故 唐山林西百貨大樓 鄭州天然商廈 南昌萬壽宮商城等 這些建筑火災(zāi)給人民生命和財產(chǎn)造成了重大損失 由此可以看 出 大型超市建筑火災(zāi)的預(yù)防不容忽視 特別是黨中央提出建設(shè)社會主義和諧社會 戰(zhàn)略 堅持以人為本的理念 使涉及人員生命安全 消防工作顯得尤為重要 閿擻輳 嬪諫遷擇楨秘騖 1 1 本課題的研究意義 本設(shè)計采用或者自動報警系統(tǒng)及消防聯(lián)動系統(tǒng) 一方面 它能夠在或者初期 將燃燒產(chǎn)生的 煙霧 熱量和光輻射及變化的空氣組分等物理量 通過感溫 感煙 感光及氣體濃度等或者探 測器等轉(zhuǎn)變成電信號 傳輸?shù)交蛘邎缶刂破?并同時顯示出火災(zāi)發(fā)生的位置 記錄或者發(fā)生 的時間 另一方面 火災(zāi)自動報警系統(tǒng) 自動噴水滅火系統(tǒng) 室內(nèi)消防栓系統(tǒng) 放煙排煙系統(tǒng) 防火門和防火卷簾門 擋煙垂壁 通風(fēng)系統(tǒng)等相關(guān)系統(tǒng)聯(lián)動 通過自動和手動方式發(fā)出指令 控制外圍聯(lián)動裝置的啟停并接受其反饋信號 從而實現(xiàn)減少人員傷亡和財產(chǎn)損失的目的 因此 消防監(jiān)控系統(tǒng)在超市中的安全具有重要意義 氬嚕躑竄貿(mào)懇彈瀘頷澩 1 2 本課題的研究目的 國內(nèi)外大型商場 超市的火災(zāi)事故呈現(xiàn)迅猛抬頭之勢 群死群上惡性火災(zāi)事故 屢見報端 如 2004 年 8 月 1 日位于首都亞松森嚼蛆的一座大型超市特大火災(zāi)造成 504 人死亡 2006 年 4 月 28 日 臺州市路橋區(qū)路橋街道文昌路 201 號商住樓一層的 金路超市發(fā)生火災(zāi) 燒毀建筑面積 1000 余平方米 直接財產(chǎn)損失 25 萬余元 2011 年 江蘇淮安漣水安東路新時代超市發(fā)生大火 導(dǎo)致整個超市休整近一年多 因此 在煙具的火災(zāi)形勢下 或者教訓(xùn)充分說明大型商場防火的重要性必須引起我們的重 視 釷鵒資贏車贖孫滅獅贅 炎黃職業(yè)技術(shù)學(xué)院 信息工程系畢業(yè)設(shè)計 論文 第 1 頁共 31 頁 1 3 設(shè)計的主要內(nèi)容 本設(shè)計主要運動海灣公司的消防設(shè)備實現(xiàn)消防監(jiān)控系統(tǒng)設(shè)計 包括兩個主要部 分 消防系統(tǒng)控制的硬件設(shè)計部分和軟件部分設(shè)計 慫闡譜鯪逕導(dǎo)嘯畫長涼 硬件部分受限通過探測器和變送器監(jiān)控超市的溫度 可燃氣體的濃度 煙塵密 度 光的強度等物理量 然后進行數(shù)據(jù)的采集 最后將采集的數(shù)據(jù)通過二總線傳到 消防報警監(jiān)控聯(lián)動系統(tǒng) 再由消防聯(lián)動系統(tǒng)控制聯(lián)動設(shè)備發(fā)出警報 噴淋滅火動作 諺辭調(diào)擔(dān)鈧諂動禪瀉類 軟件部分的設(shè)計需要繪制超市的平面圖 探測器和噴頭的布局圖以及聯(lián)動編程 此外 要求熟悉常用的火災(zāi)探測器 報警控制器及它們的工作原理 選型 使 用方法 炎黃職業(yè)技術(shù)學(xué)院 信息工程系畢業(yè)設(shè)計 論文 第 2 頁共 31 頁 第 2 章 超市的平面設(shè)計和消防設(shè)計超市的平面設(shè)計和消防設(shè)計 2 1 某大型超市簡介 此超市位于該市最繁華的地段 超市共有三層 營業(yè)面積 2600 平方米 屬于一級 保護建筑 由于其商品品種豐富 商品價格低廉 便利的交通再加上有利的地形 使得該超 市的平均日人流量很多 但它與此同時也帶來了很大的安全隱患 作為一個大型的 儲物型超市 一旦發(fā)生火災(zāi)就可能帶來很大的危險 貨物的損失 人員的上網(wǎng) 這 就要求超市必須做好消防工作 現(xiàn)代消防監(jiān)控系統(tǒng)就可以幫上很大的忙 火災(zāi)消防 自動報警系統(tǒng)中檢測系統(tǒng) 滅火系統(tǒng) 消防電話系統(tǒng) 消防廣播系統(tǒng)的設(shè)計和應(yīng)用 將幫助我們隊超市火災(zāi) 能做到提前預(yù)防 有效防止嘰覲詿縲鐋囁偽純鉿錈 2 2超市平面布局 該超市營業(yè)面積 26000 平方米 共三層 一樓 百貨區(qū) 箱包 皮具 女裝男裝 床用 童裝 化妝品專柜 二樓 蔬菜 水果 熟食 面點 肉類 高檔煙酒 名茶 保健補品 休閑食 品 顧客服務(wù)中心 三樓 服裝特價區(qū) 家電售后服務(wù)中心 團購接待處 家用電器 音響制品 床上用品 廚具五金 兒童玩具 辦公文具 家庭精品 熒紿譏鉦鏌觶鷹緇機庫 2 3 該超市的消防要求 人事工資管理系統(tǒng)是集人事管理與工資管理為一體的系統(tǒng) 通過它可以方便地 使您進行人力資源的管理 它可以自定義工資欄目 內(nèi)置一套基本工式 即應(yīng)付工 資 計算狀態(tài)為加的所有欄目之和 實付工資 應(yīng)付工資 計算狀態(tài)為減的所有欄目之 和 用戶生成第一個月的工資單 然后錄入 以后每個月只要復(fù)制上個月的工資單 再加上小幅修改就可以了 這對工資變動不太大的企事業(yè)單位就更加方便了 系統(tǒng) 提供工資單 工資條 以及工資匯總表 工資統(tǒng)計表 適用于各種場合 系統(tǒng)還提 供人力資源結(jié)構(gòu)分析 工齡結(jié)構(gòu)分析 學(xué)歷結(jié)構(gòu)分析等人力資源分析報表 同時系 統(tǒng)提供數(shù)據(jù)輸入輸出功能 為用戶的特殊要求提供了一個方便的接口 鶼漬螻偉閱劍鯫腎 邏蘞 系統(tǒng)特征 炎黃職業(yè)技術(shù)學(xué)院 信息工程系畢業(yè)設(shè)計 論文 第 3 頁共 31 頁 操作簡單方便 使您可以迅速掌握使用方法 通用化程序高 適用大部分企業(yè)使用 可多用戶 網(wǎng)絡(luò)化操作 可自定義工資條目及人事檔案條目 提供獨特的個性設(shè)置功能 讓您有極大的自由調(diào)整報表項目的顯示 打印設(shè) 置 精心設(shè)計輸入方式 方便操作人員 有效地減少了數(shù)據(jù)輸入的工作量 極大 地提高了您的工作效率 計算準確 自動化程序高 可靠性強 數(shù)據(jù)安全性高 有效地防止無關(guān)人員盜取您的商業(yè)機密 對數(shù)據(jù)庫進行了特 別地加密處理 同時充許您隨意的轉(zhuǎn)移數(shù)據(jù)庫 比如您可以將數(shù)據(jù)庫保存在 USB 盤 上 這樣 您的數(shù)據(jù)就可以隨身帶在身上了 紂憂蔣氳頑薟驅(qū)藥憫騖 主要實現(xiàn)技術(shù) Visual Basic for Applications VBA 是一種 Visual Basic 的一種宏語言 主要能 用來擴展 Windows 的應(yīng)用程式功能 特別是 Microsoft Office 軟件 也可說是一種應(yīng) 用程式視覺化的 Basic Script 1994 年發(fā)行的 Excel 5 0 版本中 即具備了 VBA 的宏 功能 穎芻莖蛺餑億頓裊賠瀧 VBA 不但繼承了 VB 的開發(fā)機制 而且 VBA 還具有與 VB 相似的語言結(jié)構(gòu) 它們的集成開 發(fā)環(huán)境 IDE Intergrated Development Environment 也幾乎相同 但是 經(jīng)過優(yōu)化 VBA 專門用 于 Office 的各應(yīng)用程序 VB 可運行直接來自 Windows 95 或 NT 桌面上的應(yīng)用程序 而 VBA 的 項目 Project 僅由使用 VBA 的 Excel Word PowerPoint 等稱為宿主 Host 的 Office 應(yīng)用 程序 Application 來調(diào)用 濫驂膽閉驟羥闈詔寢賻 炎黃職業(yè)技術(shù)學(xué)院 信息工程系畢業(yè)設(shè)計 論文 第 4 頁共 31 頁 第 3 章 系統(tǒng)分析與設(shè)計 3 1 系統(tǒng)分析 隨著國民經(jīng)濟的飛速發(fā)展 國內(nèi)企事業(yè)單位對員工 職稱等跟人事工資管理相 關(guān)的信息隨之集聚增加 在這種情況下 如果還是像過去那樣僅僅單靠采用傳統(tǒng)的 手工方式來處理這些員工的工資信息 不但會浪費大量的人力 物力 而且還容易 出錯 銚銻縵嚌鰻鴻鋟謎諏涼 正是由于上述原因 開發(fā)本系統(tǒng)的具體任務(wù)是設(shè)計一個由計算機來代替手工執(zhí)行一 系列操作 諸如添加新員工 刪除舊員工 工資修改 查詢 統(tǒng)計及打印等操作的 人事工資數(shù)據(jù)庫管理系統(tǒng) 這樣 我們就可以使管理人員輕松 快捷的完成本單位 的工資管理任務(wù)了 擠貼綬電麥結(jié)鈺贖嘵類 3 2 系統(tǒng)功能分析 系統(tǒng)開發(fā)的總體任務(wù)是要利用 VBA 實現(xiàn)人事工資信息關(guān)系的系統(tǒng)化 規(guī)范化和 自動化 系統(tǒng)功能分析是在系統(tǒng)開發(fā)的總體任務(wù)的基礎(chǔ)之上完成的 人事工資管理系統(tǒng) 主要有以下幾項功能 1 在系統(tǒng)中建立員工數(shù)據(jù)庫 用來存儲員工系統(tǒng) 2 有信息的的錄入系統(tǒng) 這是數(shù)據(jù)庫更新的基礎(chǔ) 3 有更新員工信息的功能 因為員工信息是不斷變化 所以這一步是必需的 4 實現(xiàn)員工信息查詢功能 5 能將每個員工的信息分離 以便打印個人簡歷 6 能夠方便員工預(yù)算的工資結(jié)算 考勤 等 7 具備可拓展性 3 3 數(shù)據(jù)流程圖 系統(tǒng)功能的要求 可以將系統(tǒng)分解成幾個功能模塊來分別設(shè)計 如系統(tǒng)先進入 登陸模塊然后輸入用戶名和密碼進入主界面 接著根據(jù)用戶需求進入相應(yīng)模塊界面 最后在進行相應(yīng)操作 賠荊紳諮侖驟遼輩襪錈 基本功能模塊流程圖如下 炎黃職業(yè)技術(shù)學(xué)院 信息工程系畢業(yè)設(shè)計 論文 第 5 頁共 31 頁 考 勤 和 應(yīng) 扣 項 目 人事工資管理系統(tǒng) 登錄界面 主界面 錄 入 信 息 查 看 信 息 查 看 統(tǒng) 計 工 資 管 理 用 戶 切 換 退 出 系 統(tǒng) 添 加 成 員 清 除 數(shù) 據(jù) 刪 除 記 錄 搜 索 員 工 統(tǒng) 計 工 資 條 主 界 面 工 資 標 準 管 理 員 登 陸 普 通 用 戶 登 錄 塤礙籟饈決穩(wěn)賽釙冊庫 圖 3 1 功能模塊流程圖 炎黃職業(yè)技術(shù)學(xué)院 信息工程系畢業(yè)設(shè)計 論文 第 6 頁共 31 頁 第四章 系統(tǒng)詳細設(shè)計與模塊的具體實現(xiàn) 4 1 系統(tǒng)的登錄界面 企業(yè)人事工資管理系統(tǒng)的主界面采用窗體 使系統(tǒng)更加美觀 方便實用 在登 陸主界面之前 首先登記用戶管理窗體如圖 4 1 裊樣祕廬廂顫諺鍘羋藺 倉嫗盤紲囑瓏詁鍬齊驁 圖 4 1 登錄模塊流程圖 從新輸入 非法用戶 進入系統(tǒng) 管理員及 密碼 用戶名及 密碼 正確 非法用戶 正確 從新輸入 進入系統(tǒng) 進入系統(tǒng) 判斷是管理員 還是普通用戶 用戶登錄系統(tǒng) 進入系統(tǒng) 炎黃職業(yè)技術(shù)學(xué)院 信息工程系畢業(yè)設(shè)計 論文 第 7 頁共 31 頁 4 1 1 登錄界面的具體實現(xiàn) 1 界面實現(xiàn) 1 新建工作表 按 ALT F11 快捷鍵進入 Visual Basic 編輯器 2 在工程窗口中 選擇該工程 選擇 插入 用戶窗體 命令 給該工程 添加一個窗體 3 右擊該窗體 在彈出的快捷菜單中選擇 屬性 命令 在彈出的屬性對話框 中 將他的 Caption 屬性改為 登錄窗口 綻萬璉轆娛閬蟶鬮綰瀧 4 在途中合適的位置繪制控件 最終效果如下圖 圖 4 2 登錄界面 2 功能介紹 登錄界面有登錄和重置兩個按鈕 登錄按鈕主要用來實現(xiàn)用戶的登錄 當用 戶輸入用戶名時 先判斷用戶名及密碼是否正確 如果錯誤則提示 非法用戶 請重新輸入 如果輸入的用戶名及密碼正確則進行判斷該用戶是管理員還是普通 用戶 若為普通用戶則隱藏敏感工作表 打開用戶主界面 否則則打開管理員主 界面 驍顧燁鶚巰瀆蕪領(lǐng)鱺賻 圖 4 3 非法用戶登錄提示 炎黃職業(yè)技術(shù)學(xué)院 信息工程系畢業(yè)設(shè)計 論文 第 8 頁共 31 頁 圖 4 4 管理員登錄提示 相關(guān)代碼 Dim s As String Dim m As String s TextBox1 Text m TextBox2 Text If s admin And m 123456 Then Worksheets 主界面 Visible True Worksheets 資料庫 Visible True Worksheets 用戶主界面 Visible False Worksheets 打印簡歷 Visible True Worksheets 用戶打印簡歷 Visible False Worksheets 統(tǒng)計表 Visible True UserForm1 Hide MsgBox 管理員您好 歡迎登錄 圖 4 5 用戶登錄提示 相關(guān)代碼 ElseIf s user And m 654321 Then Worksheets 主界面 Visible False Worksheets 打印簡歷 Visible False Worksheets 用戶主界面 Visible True Worksheets 用戶打印簡歷 Visible True Worksheets 資料庫 Visible False Worksheets 統(tǒng)計表 Visible False 炎黃職業(yè)技術(shù)學(xué)院 信息工程系畢業(yè)設(shè)計 論文 第 9 頁共 31 頁 UserForm1 Hide MsgBox 用戶您好 歡迎登錄 4 2 主界面的具體實現(xiàn) 1 界面實現(xiàn) 1 將新建的工作表命名為主界面 2 選擇 視圖 工具欄 控制工具箱 命令 彈出工具箱窗口 3 選擇 button 按鈕 在表中添加控件 4 選擇控件右擊 在彈出的快捷菜單中選擇 屬性 命令 在彈出的屬性對話 框中 改變它的 Caption 屬性 瑣釙濺曖惲錕縞馭篩涼 5 設(shè)計整體界面更 最終效果如下圖 圖 4 6 主界面 2 功能介紹 主界面主要包括 6 個功能按鈕 如錄入信息 查看信息 查看統(tǒng)計 工資管理 用戶切換 退出系統(tǒng) 這些按鈕主要的功能是用來實現(xiàn)各個界面之間 的連接跳轉(zhuǎn) 鎦 詩涇艷損樓紲鯗餳類 4 3 錄入信息界面的具體實現(xiàn) 1 界面實現(xiàn) 1 新建工作表命名為資料庫 2 選擇 視圖 工具欄 控制工具箱 命令 彈出工具箱窗口 3 選擇 button 按鈕 在表中添加控件 炎黃職業(yè)技術(shù)學(xué)院 信息工程系畢業(yè)設(shè)計 論文 第 10 頁共 31 頁 4 選擇控件右擊 在彈出的快捷菜單中選擇 屬性 命令 在彈出的屬性對話 框中 改變它的 Caption 屬性 櫛緶歐鋤棗鈕種鵑瑤錟 5 添加相關(guān)字段 6 設(shè)計整體界面更 最終效果如下圖 圖 4 7 資料庫界面 2 功能介紹 信息錄入界面連接的是資料庫工作表 其主要包括職員姓名 性別 出生日期 身份證號碼 參加工作時間 民族 籍貫 學(xué)歷 畢業(yè)學(xué)校及專業(yè) 職稱 現(xiàn)任職 務(wù) 工作簡歷 部門 職工號等字段 還包含添加成員 清除數(shù)據(jù) 刪除記錄 工 資管理 主界面 打印簡歷 6 個功能按鈕來實現(xiàn)員工信息的錄入 員工記錄的刪除 以及界面之間的轉(zhuǎn)換 如當單擊添加員工按鈕就會錄入新添加的員工信息 若信息 填寫不完整則系統(tǒng)出現(xiàn) 信息不完整 請完善信息 的提示 當添加完成時則提示 記錄已添加完成 當單擊抒情數(shù)據(jù)按鈕時 會清除字段中填寫的員工信息 并給予 數(shù)據(jù)以清除 的提示 在姓名字段輸入要刪除員工姓名 單擊刪除記錄按 鈕 如若存在則提示 員工記錄已刪除 否則提示 無此記錄 因此無法刪除 請核實 轡燁棟剛殮攬瑤麗鬮應(yīng) 圖 4 8 添加信息殘缺提示 相關(guān)代碼 If YorN vbYes Then 判斷記錄是否完整 If Trim Cells 5 3 Or Trim Cells 4 10 Or 峴揚斕滾澗輻灄興渙藺 炎黃職業(yè)技術(shù)學(xué)院 信息工程系畢業(yè)設(shè)計 論文 第 11 頁共 31 頁 Trim Cells 4 6 Or Trim Cells 4 8 Or 詩叁撻訥燼憂毀厲鋨驁 Trim Cells 6 7 Or Trim Cells 7 2 Or 則鯤愜韋瘓賈暉園棟瀧 Trim Cells 5 11 Then MsgBox 信息不完整 請完善信息 Exit Sub 圖 4 9 姓名字段為空時提示 相關(guān)代碼 判斷是否存在用戶名 If Trim Cells 4 2 Then MsgBox 請輸入姓名 Exit Sub End If 圖 4 10 記錄刪除成功提示 相關(guān)代碼 Dim i As Integer 定義判斷記錄是否在的布爾變量 Dim CunZai As Boolean 定義用于保存 資料庫 記錄數(shù)的整型變量 Dim iCount As Integer 把記錄行數(shù)賦予 iCount iCount Sheets 資料庫 A10 CurrentRegion Rows Count 10脹鏝彈奧秘孫戶孿 釔賻 炎黃職業(yè)技術(shù)學(xué)院 信息工程系畢業(yè)設(shè)計 論文 第 12 頁共 31 頁 為 CunZai 布爾變量賦初值 CunZai False 使用 For Next 循環(huán)語句 For i 11 To iCount 判斷讀者編號是否與已有記錄的相同 If Trim Cells 4 2 Trim Cells i 1 Then 把 CunZai 布爾變量的值設(shè)為 True CunZai True 選擇符合條件的記錄行 Rows i Select 刪除符合條件的記錄行 Selection Delete 彈出記錄已經(jīng)刪除的信息 Sheets 工資標準 Rows i 9 Delete Sheets 考勤和應(yīng)扣項目 Rows i 9 Delete Sheets 工資條 Rows i 9 Delete MsgBox 員工記錄已經(jīng)刪除 vbOKOnly 提示 Exit For 退出 For Next 循環(huán)語句 End If 圖 4 11 刪除不存在員工提示 相關(guān)代碼 If CunZai False Then 彈出無法刪除記錄的信息 MsgBox 無此記錄 因此無法刪除 請核實 vbOKOnly 無法刪除 End If 4 4 查看統(tǒng)計界面的具體實現(xiàn) 1 界面實現(xiàn) 1 新建工作表命名為統(tǒng)計表 炎黃職業(yè)技術(shù)學(xué)院 信息工程系畢業(yè)設(shè)計 論文 第 13 頁共 31 頁 2 選擇 視圖 工具欄 控制工具箱 命令 彈出工具箱窗口 3 選擇 button 按鈕 在表中添加控件 4 選擇控件右擊 在彈出的快捷菜單中選擇 屬性 命令 在彈出的屬性對話 框中 改變它的 Caption 屬性 鰓躋峽禱紉誦幫廢掃減 5 添加相關(guān)字段 6 設(shè)計整體界面更 最終效果如下圖 圖 4 12 統(tǒng)計表界面 2 功能介紹 查看統(tǒng)計界面連接的是統(tǒng)計表 其包括一個統(tǒng)計按鈕一個主界面按鈕 當單擊 統(tǒng)計按鈕則系統(tǒng)會按照性別 年齡 學(xué)歷來查詢統(tǒng)計 當單擊主界面按鈕時則會實 現(xiàn)界面之間的跳轉(zhuǎn) 稟虛嬪賑維嚌妝擴踴糶 統(tǒng)計按鈕相關(guān)代碼 Private Sub CommandButton1 Click While Not IsEmpty Sheets 資料庫 Cells TempY 1 Value 陽簍埡鮭罷規(guī)嗚舊巋錟 統(tǒng)計男女性別人數(shù) Dim sex sex Sheets 資料庫 Cells TempY 2 Value If 男 sex Then men men 1 Else women women 1 End If 統(tǒng)計個階段學(xué)歷人數(shù) Dim xueli xueli Sheets 資料庫 Cells TempY 8 Value If 高中 xueli Then 炎黃職業(yè)技術(shù)學(xué)院 信息工程系畢業(yè)設(shè)計 論文 第 14 頁共 31 頁 xueli1 xueli1 1 ElseIf 大專 xueli Then xueli2 xueli2 1 ElseIf 本科 xueli Then xueli3 xueli3 1 ElseIf 碩士 xueli Then xueli4 xueli4 1 Else xueli5 xueli5 1 End If 統(tǒng)計各年齡段人數(shù) Dim nowyear As Integer Dim thatyear As Integer nowyear Year Cells 6 1 thatyear Year Sheets 資料庫 Cells TempY 3 If nowyear thatyear 49 Then class1 class1 1 ElseIf nowyear thatyear 39 Then class2 class2 1 ElseIf nowyear thatyear 29 Then class3 class3 1 ElseIf nowyear thatyear 19 Then class4 class4 1 Else class5 class5 1 End If 進入下一行 TempY TempY 1 4 5 查看信息界面的具體實現(xiàn) 1 界面實現(xiàn) 1 新建工作表命名為打印簡歷 2 選擇 視圖 工具欄 控制工具箱 命令 彈出工具箱窗口 3 選擇 button 按鈕 在表中添加控件 炎黃職業(yè)技術(shù)學(xué)院 信息工程系畢業(yè)設(shè)計 論文 第 15 頁共 31 頁 4 選擇控件右擊 在彈出的快捷菜單中選擇 屬性 命令 在彈出的屬性對話 框中 改變它的 Caption 屬性 溈氣嘮戇萇鑿鑿櫧諤應(yīng) 5 添加相關(guān)字段 6 設(shè)計整體界面更 最終效果如下圖 圖 4 13 打印簡歷界面 2 功能介紹 該界面連接的時打印簡歷表 其包括一個搜索員工按鈕一個主界面按鈕 當在 姓名字段輸入要查找員工的姓名時 單擊搜索按鈕 若存在此人則會顯示該員工的 所有信息 否則則會提示 沒有搜到符合條件的記錄 請核實 鋇嵐縣緱虜榮產(chǎn)濤團藺 圖 4 14 搜索不存在員工提示 相關(guān)代碼 判斷是否搜索到讀者 If CunZai False Then 彈出提示沒有搜索到符合條件讀者的信息 MsgBox 沒有搜索到符合條件的記錄 請核實 vbOKOnly 提示 End If 4 6 管理工資界面的具體實現(xiàn) 1 界面實現(xiàn) 1 將新建的工作表命名為工資管理 炎黃職業(yè)技術(shù)學(xué)院 信息工程系畢業(yè)設(shè)計 論文 第 16 頁共 31 頁 2 選擇 視圖 工具欄 控制工具箱 命令 彈出工具箱窗口 3 選擇 button 按鈕 在表中添加控件 4 選擇控件右擊 在彈出的快捷菜單中選擇 屬性 命令 在彈出的屬性對話 框中 改變它的 Caption 屬性 懨俠劑鈍觸樂鷴燼觶騮 5 設(shè)計整體界面更 最終效果如下圖 圖 4 15 工資管理界面 2 功能介紹 該界面包括 4 個功能按鈕 工資條按鈕 主界面按鈕 考勤和應(yīng)扣項目按鈕 工資標準按鈕 這些按鈕主要是用來實現(xiàn)個界面之間的跳轉(zhuǎn) 謾飽兗爭詣繚鮐癩別瀘 4 7 工資條界面的具體實現(xiàn) 1 界面實現(xiàn) 1 新建工作表命名為工資條 2 選擇 視圖 工具欄 控制工具箱 命令 彈出工具箱窗口 3 選擇 button 按鈕 在表中添加控件 4 選擇控件右擊 在彈出的快捷菜單中選擇 屬性 命令 在彈出的屬性對話 框中 改變它的 Caption 屬性 咼鉉們歟謙鴣餃競蕩賺 5 添加相關(guān)字段 6 設(shè)計整體界面更 最終效果如下圖 炎黃職業(yè)技術(shù)學(xué)院 信息工程系畢業(yè)設(shè)計 論文 第 17 頁共 31 頁 圖 4 16 工資條界面 2 功能介紹 該界面里主要記錄的是企業(yè)員工的一些工資所得情況 該界面里還包含一個工 資管理按鈕 一個主界面按鈕 用來實現(xiàn)界面之間的跳轉(zhuǎn) 瑩諧齷蘄賞組靄縐嚴減 2011 年 6 月第十一屆全國人大常委會第二十一次會議 30 日表決通過關(guān)于修改 個人所得稅法的決定 征稅點從 3500 元起 個人所得稅計算公式 應(yīng)納個人所得 稅稅額 應(yīng)納稅所得額 適用稅率 速算扣除數(shù)麩肅鵬鏇轎