【正文】 調(diào)動(dòng)信息實(shí)體 ER 圖 小結(jié) 本章 對(duì)系統(tǒng)的后臺(tái)數(shù)據(jù)庫(kù)進(jìn)行了數(shù)據(jù)需求分析，利用 Access2021 進(jìn)行了數(shù)據(jù)表的建立，從而為下面的設(shè)計(jì)工作做好數(shù)據(jù)庫(kù)準(zhǔn)備工作，分析 規(guī)劃出的實(shí)體有：職工基本信息實(shí)體、職工考勤信息實(shí)體、職工調(diào)動(dòng)信息實(shí)體。 模塊設(shè)計(jì) 通過(guò)前面的數(shù)據(jù)庫(kù)分析設(shè)計(jì)，已經(jīng)完成了必要的數(shù)據(jù)庫(kù)準(zhǔn) 備工作，現(xiàn)在開(kāi)始用Visual Basic 軟件來(lái)編寫數(shù)據(jù)庫(kù)的應(yīng)用程序。 為了提高代 碼的效率方便維護(hù)，在 Visual Basic 中可以用公用模塊來(lái)存放工程中經(jīng)常使用的函數(shù)、過(guò)程和全局變量等。保存用戶名稱 Public flag As Integer 39。保存查詢其他考勤結(jié)果 SQL 語(yǔ)句 Public ArecordID As Integer 39。保存出差記錄編號(hào) Public iflag As Integer 39。對(duì) 于一個(gè)多任務(wù)的應(yīng)用程序，使用多文檔窗體還可以減少占用的系統(tǒng)資源。 第 17 頁(yè) 圖 41 添加 MDI 菜單 圖 42 添加 MDI 體對(duì)話框 第 18 頁(yè) 圖 43 主窗體的屬性 2． 添加菜單 在添加好的窗體中，單擊鼠標(biāo)右鍵，從彈出的快捷菜單中選擇“菜單編輯器”命令， 在彈出的如圖 44 所示的菜單編輯器對(duì)話 框中添加需要的菜單，并且使用方向鍵為菜單分級(jí)， 設(shè)計(jì)好的主窗體如圖 45 所示： 第 19 頁(yè) 圖 44菜單編輯器 圖 45 設(shè)計(jì)好的主窗體 第 20 頁(yè) 表 41 人事管理系統(tǒng)菜單結(jié)構(gòu) 菜單名稱 屬性 系統(tǒng) System … 添加用戶 Add_User … 修改密碼 Change_PWD … 退出 System_ EXIT 職工基本信息 Stuff_Info ?添加職工信息 Add_Stuff ?修改職工信息 Change_Stuff … 查詢職工信息 Check_Stuff … 刪除職工信息 Del_ Stuff 職工考勤信息 Stuff_Checkin ?添加考勤信息 Add_Checkin … 添加上下班信息 AddAttendance … 添加其他考勤信息 AddOtherKQ … 修改考勤信息 Change_ Checkin … 修改上下班信息 ChangeAttendance … 修改其他考勤信息 ChangeOtherKQ ?查詢考勤信息 Check_Checkin ?刪除考勤信息 Del_Checkin … 刪除上下班信息 DellnOut … 刪除其他考勤信息 DelOtherKQ 職 工調(diào)動(dòng)信息 Stuff_A1teration … 添加調(diào)動(dòng)信息 Add_Alter ?修改調(diào)動(dòng)信息 Change_A1ter ?查詢調(diào)動(dòng)信息 Check_Alter … 刪除調(diào)動(dòng)信息 Del_A1ter … 查詢考勤信息 Check_Checkin … 幫助 System_Help … 關(guān)于 About 第 21 頁(yè) 程序的具體實(shí)現(xiàn) 本系統(tǒng)共有四個(gè)子模塊組成。這些控件的屬性設(shè)置如表 42所示。 原代碼如下： Private Sub cmdOK_Click() Dim SQL As String Dim rs As If Trim( = ) Then MsgBox 沒(méi)有輸入用戶名稱，請(qǐng)重新輸入！ , vbOKOnly + vbExclamation, 警告 Else 39。 39。這些控件的屬性設(shè)置如表 43 所示。判斷是否輸入新密碼 MsgBox 請(qǐng)輸入新密碼！ , vbOKOnly + vbExclamation, 警告 Exit Sub ElseIf Trim() Trim() Then 39。 NewPWD amp。 gUserName amp。 1) 添加職工 基本 信息管理 第 26 頁(yè) 2) 添加員工信息管理界面 及添加后顯示職工信息列表如圖 48，圖 49 圖 48 添加職工基本信息 圖 49 職工基本信息列表 第 27 頁(yè) 表 44 添加職工基本信息窗體中控件屬性設(shè)置 這個(gè)窗體中添加了 18 個(gè)標(biāo)簽，用來(lái)顯示“職工編號(hào)”信息，再添加了 17 個(gè)文本框以及一個(gè)下拉列表（ ComboBox），用來(lái)接收輸入的信息。 表 45 選擇修改條件窗 體中控件屬性設(shè)置 控件 屬性 屬性值 Labell Caption 選擇查詢條件 Name Topic CheckBox Name IDCheck Caption 職工編號(hào) CheckBox Name NameCheck Caption 職工姓名 CheckBox Name TimeCheck Caption 進(jìn)入本單位時(shí)間 ComboBox Name FromYear ComboBox Name FromMonth ComboBox Name ToYear ComboBox Name ToMonth CommandButton Name cmdOK Caption 確定 CommandButton Name cmdCancel Caption 取消 3． 員工考勤信息管理 員工基本考勤管理主要任務(wù)是記錄員工的上下班時(shí)間，用戶可以手工對(duì)員工考勤信息進(jìn)行添加、修改、刪除、查詢等操作。 第 31 頁(yè) 2) 考勤信息界面： 圖 412 職工基本信息 窗體載入時(shí)會(huì)先判斷是添加還是修改，如果是添加自動(dòng)載入職工編號(hào)以及相應(yīng)的職工姓名，選擇一個(gè)職工編號(hào)后，職工姓名也會(huì)隨之變化：如果是修 改就會(huì)載入選中的考勤信息。查詢時(shí)，輸入條件后，單擊“確定”按鈕，系統(tǒng)會(huì)顯示查詢結(jié)果。 第 35 頁(yè) 2) 調(diào)動(dòng)信息列表窗體： 圖 417 調(diào)動(dòng)信息列表窗體 這個(gè)窗體中使用了 2 個(gè)新的控件，一個(gè)是 Adodc 控件，另一個(gè)是 DataGrid 控件 。然后再單擊鼠標(biāo)右鍵，在彈出的菜單中選擇 “插入 ”命令，插入足夠多的列。 第 37 頁(yè) 第 5 章 系統(tǒng) 測(cè)試與出錯(cuò)處理 系統(tǒng) 測(cè)試 為了保證軟件的質(zhì)量和可靠性，應(yīng)力求在分析、設(shè)計(jì)等這個(gè)開(kāi)發(fā)階段結(jié)束前，對(duì)軟件進(jìn)行嚴(yán)格的技術(shù)評(píng)審。在軟件開(kāi)發(fā)的過(guò)程中，人們使用了許多保證軟件質(zhì)量的方法分析、設(shè)計(jì)和實(shí)現(xiàn)軟件，但難免還會(huì)在工作中犯錯(cuò)誤。但到那時(shí)，不僅改正這些錯(cuò)誤的代價(jià)更高，而且往往造成很惡劣的后果。在結(jié)束這個(gè)階段之后，對(duì)軟件系統(tǒng)還要進(jìn)行各種綜合測(cè)試，這是軟件生存期的另一個(gè)獨(dú)立的階段，即測(cè)試階段。在實(shí)現(xiàn)過(guò)程中，遇上的大問(wèn)題為進(jìn)行操作時(shí)的錯(cuò)誤處理： 如： Private Sub change_Click() 39。 39。 小結(jié) 本章主要是對(duì)初步完成編程工作的考勤管理系統(tǒng)進(jìn)行測(cè)試和出錯(cuò)管理， 本章力求使用有限的時(shí)間找出盡可能多的錯(cuò)誤，力求系統(tǒng)盡量運(yùn)行正常。比如：功能還不夠強(qiáng)大，聯(lián)機(jī)文檔比 較少，用戶界面不夠美觀，出錯(cuò)處理不夠等多方面問(wèn)題，這些問(wèn)題都有待進(jìn)一步改善。 第 41 頁(yè) 參考文獻(xiàn) [1] 周之英編著 .現(xiàn)代軟件工程 [M].北京：科學(xué)出版社， 2021 年 1 月 ： 150 [2] 陳明編著 .Visual Baasic 程序設(shè)計(jì) [M].北京：中央廣播電視大學(xué)出版社， 2021年 12 月 ： 2060 [3] 唐任仲編著 .工程應(yīng)用軟件開(kāi) 發(fā)技術(shù) [M].北京：化學(xué)工業(yè)出版社， 1999 年 5 月第一次印刷 ： 2540 [4] 王瑞，梁為民編著 .中文版 Access2021 入門與提高 [M].北京：國(guó)際文化出版公司， 1999 年 9 月 ： 125 [5] 李懷明編著 . Visual Basic 中文版 參考詳解 [M].北京：清華大學(xué)出版社， 2021 年 4 月 ： 10120 [6] 李善茂 等編著 . Visual Basic 高級(jí)編程技巧 [M].北京：化學(xué)工業(yè)出版社， 2021 年 7 月 ： 30160 [7] 譚浩強(qiáng)編著 . Visual Basic 中文版 提高與應(yīng)用 [M].北京：電子工業(yè)出版社， 2021 年 1 月 [8] 李寧，徐孝凱，張紀(jì)勇編著 . C++語(yǔ)言程序設(shè)計(jì)實(shí)驗(yàn) [M].北京：中央廣播電視大學(xué)出版社， 2021 年 7 月 ： 120 [9] 許卓群編著 .數(shù)據(jù)結(jié)構(gòu) [M].北京：中央廣播電視大學(xué)出版社， 2021年 1月 ： 1056 [10] [美 ]Diane Zak. Visual Basic 編程 （ 提高版 ） ［ M］ . 北京： 電子工業(yè) 出版社 , 2021. [11] Bracchi G. Data Base Architechture. 1979： 356370 [12] Brodie ML. On Conceptual Modeling. Springer Verlag, 1984： 583587 。在系統(tǒng)開(kāi)發(fā)過(guò)程中，首先要感謝指導(dǎo)老師，本論文是在老師的指導(dǎo)下修改完成的，在此 ,要對(duì)他們的細(xì)心幫助和指導(dǎo)表示由衷的感謝 .在這段時(shí)間里 ,我從他們身上不僅學(xué)到了許多的專業(yè)知 識(shí) ,更感受到了他們工作中的兢兢業(yè)業(yè) ,生活中的平易近人 .此外 ,他們嚴(yán)謹(jǐn)?shù)闹螌W(xué)態(tài)度和忘我的工作精神值得我去學(xué)習(xí) . 通過(guò)這次畢業(yè)設(shè)計(jì)，提高了我的動(dòng)手能力和獨(dú)立思考能力，以及團(tuán)隊(duì)協(xié)作能力。 第 39 頁(yè) 第 6 章 結(jié)束語(yǔ) 隨著計(jì)算機(jī)的發(fā)展與普及，以及互聯(lián)網(wǎng)技術(shù)的擴(kuò)展，企業(yè)員工考勤管理必將實(shí)現(xiàn)無(wú)紙化辦公，并且加入到公司內(nèi)部的 Intra 或者是 Inter 上去，實(shí)現(xiàn)數(shù)據(jù)的共享，這樣有利于勞資人事信息在單位內(nèi)部的查詢，提高了數(shù)據(jù)資源的利用，并且能及時(shí)的得到更新，不需要象過(guò)去那樣浪費(fèi)大量的人力物力去進(jìn)行抄寫，提高了工作的效率。有些小錯(cuò)誤，通過(guò)指導(dǎo)老師葉 老師的指導(dǎo)，逐個(gè)完成。 amp。打破習(xí)慣的操作順序，從中發(fā)現(xiàn)錯(cuò)誤，在此階段系統(tǒng)的大量錯(cuò)誤得到了改正。首先進(jìn)行的是單元測(cè)試，即在編寫出每一個(gè)模塊之后就對(duì)它做必要的測(cè)試。對(duì)于規(guī)模大、復(fù)雜性高的軟件更是如此。而 且在編碼階段還會(huì)引進(jìn)大量的錯(cuò)誤。 小結(jié) 本章創(chuàng)建了一個(gè)考勤管理系統(tǒng)，用于統(tǒng)計(jì)企業(yè)員工出勤，加班，出差，請(qǐng)假等情況。 添加 Adodc 控件，需要設(shè)置的是將 Visible 屬性設(shè)置為 False，其他的屬性保持不變。 圖 414 出勤查詢結(jié)果列表 第 33 頁(yè) 4) 設(shè)置上下班時(shí)間界面： 圖 415 設(shè)置上下班時(shí)間 輸 入上下班的時(shí)間，員工考勤時(shí)間管理信息在結(jié)果列表中列出。填寫后單擊“確定”按鈕，就會(huì)調(diào)用 cmdOK_Click()函數(shù)，添加相應(yīng)的考勤信息。 第 30 頁(yè) 添加職工 上下班信息如 圖： 圖 411 添加職工上下班信息 窗體的屬性和上面介紹的窗體屬性設(shè)置大致相同，惟一不同的地方就是Caption 一項(xiàng)的設(shè)置。 控件 屬性 屬性值 TextBox Name ID TextBox Name StuffName TextBox Name P1ace TextBox Name Age TextBox Name Birthday TextBox Name Degree TextBox Name Speciality TextBox Name Address TextBox Name Code TextBox Name Tel TextBox Name Email TextBox Name WorkTime TextBox Name InTime