工資管理系統(tǒng)課程設(shè)計(jì)報(bào)告(共33頁)

1、軟件工程(run jin n chn)課程設(shè)計(jì)報(bào)告(bogo)題目(tm)：工資管理系統(tǒng)設(shè)計(jì)與實(shí)現(xiàn)班級(jí)： 教師： 學(xué)號(hào)： 姓名： 大學(xué)計(jì)算機(jī)科學(xué)與技術(shù)學(xué)院年 月課程設(shè)計(jì)任務(wù)書姓 名 學(xué) 號(hào) 班 級(jí) 課程名稱軟件工程導(dǎo)論課程性質(zhì)專業(yè)基礎(chǔ)課設(shè)計(jì)時(shí)間2009 年 9月 20 日 2009年 11 月 12 日設(shè)計(jì)名稱工資管理系統(tǒng)設(shè)計(jì)與實(shí)現(xiàn)項(xiàng)目組成員姓名學(xué)號(hào)在本項(xiàng)目中的分工 代碼實(shí)現(xiàn) 文檔編寫設(shè)計(jì)要求使用傳統(tǒng)軟件工程方法對(duì)工資管理系統(tǒng)進(jìn)行分析和設(shè)計(jì)，本程序是建立在Windows操作系統(tǒng)上，以VB為開發(fā)軟件的應(yīng)用程序，主要功能包括：人事信息的錄入，修改，刪除和查詢操作：工資的核算查詢；用戶信息的管理等。

2、計(jì)劃與進(jìn)度9日20日至9月30日學(xué)習(xí)項(xiàng)目開發(fā)的背景目標(biāo)10日1日至10月7日可行性研究10日8日至10月13日系統(tǒng)分析（包括需求分析，數(shù)據(jù)流圖，數(shù)據(jù)字典等）10日14日至10月24日系統(tǒng)設(shè)計(jì)（包括功能設(shè)計(jì)，數(shù)據(jù)庫設(shè)計(jì)及數(shù)據(jù)庫的實(shí)現(xiàn)）10月25日至11月2日系統(tǒng)實(shí)現(xiàn)11月3日至11月12日軟件測(cè)試及資料整理指導(dǎo)教師意見目錄(ml)內(nèi)容(nirng)概要第一章 引 言項(xiàng)目開發(fā)(kif)背景項(xiàng)目開發(fā)的目標(biāo)及意義系統(tǒng)的開發(fā)方法 可行性研究2.1 系統(tǒng)流程圖2.2 完成新系統(tǒng)的可行性第三章 系統(tǒng)分析3.1 系統(tǒng)的設(shè)計(jì)思想3.2 需求分析3.3 系統(tǒng)的運(yùn)行環(huán)境和開發(fā)平臺(tái)3.4 數(shù)據(jù)流圖3.5 數(shù)據(jù)字典第四

3、章 系統(tǒng)設(shè)計(jì) 4.1 功能模塊設(shè)計(jì) 4.2 系統(tǒng)總體功能模塊 4.3 數(shù)據(jù)庫設(shè)計(jì)4.4 數(shù)據(jù)庫結(jié)構(gòu)的實(shí)現(xiàn)第五章 工資管理系統(tǒng)功能實(shí)現(xiàn) 5.1 開發(fā)環(huán)境簡介 5.2 系統(tǒng)界面的設(shè)計(jì) 5.3 員工基本信息管理功能設(shè)計(jì) 5.4 工資管理功能設(shè)計(jì) 軟件測(cè)試 用戶操作手冊(cè) 總結(jié)8.1 參考文獻(xiàn)8.2 設(shè)計(jì)體會(huì)與建議內(nèi)容摘要工資管理系統(tǒng)是使用Visual Basic 6.0開發(fā)的一個(gè)數(shù)據(jù)庫管理系統(tǒng)。在此主要講述了使用SQL Server 2000和Visual Basic 6.0完成工資管理系統(tǒng)基本功能的過程。開發(fā)這個(gè)系統(tǒng)的步驟主要有系統(tǒng)分析、系統(tǒng)設(shè)計(jì)、系統(tǒng)實(shí)現(xiàn)和系統(tǒng)維護(hù)。在系統(tǒng)的設(shè)計(jì)中，詳細(xì)的展現(xiàn)了系統(tǒng)

4、的各個(gè)模塊、所需的數(shù)據(jù)庫表及表字段菜單的設(shè)計(jì)等。在系統(tǒng)的實(shí)現(xiàn)中，給出了實(shí)現(xiàn)表單中相應(yīng)的功能控件的事件、代碼及菜單實(shí)現(xiàn)的方法。本系統(tǒng)具有數(shù)據(jù)輸入，數(shù)據(jù)存儲(chǔ)，信息計(jì)算修改刪除等功能，本系統(tǒng)也提供了友好(yuho)的人際對(duì)話界面。 引 言 項(xiàng)目開發(fā)(kif)背景 眾所周知當(dāng)今(dngjn)時(shí)代的世界經(jīng)濟(jì)正從工業(yè)經(jīng)濟(jì)向知識(shí)經(jīng)濟(jì)轉(zhuǎn)變，而知識(shí)經(jīng)濟(jì)的兩個(gè)重要特征就是信息化合全球化。要實(shí)現(xiàn)信息化和全球化就必須依靠完善的網(wǎng)絡(luò)和數(shù)據(jù)庫機(jī)制。處于現(xiàn)在這樣一個(gè)飛速發(fā)展的信息時(shí)代，在各行各業(yè)中都離不開信息處理，這正是計(jì)算機(jī)被廣泛應(yīng)用于管理信息系統(tǒng)的環(huán)境，使用計(jì)算機(jī)進(jìn)行信息控制不僅提高了工作效率，而且大大的提高了其安全性

5、。尤其是對(duì)于復(fù)雜的信息管理，計(jì)算機(jī)能夠充分發(fā)揮其優(yōu)越性。計(jì)算機(jī)進(jìn)行信息管理與信息管理系統(tǒng)的開發(fā)密切相關(guān)，系統(tǒng)的開發(fā)時(shí)系統(tǒng)管理的前提。因此，對(duì)于企業(yè)或是事業(yè)單位來說開發(fā)一套工資管理系統(tǒng)是很必要的。雖然企業(yè)事業(yè)單位的管理已經(jīng)進(jìn)入信息化管理，但對(duì)于不同的單位所需要的功能是不一樣的，這樣通用的軟件使用效率不高，還會(huì)造成人力，財(cái)力的浪費(fèi)，這樣就不能滿足所有單位和部門的需求。所以必須做好客戶的需求分析工作，設(shè)計(jì)符合用戶要求的系統(tǒng)。 系統(tǒng)開發(fā)的目標(biāo)及意義企業(yè)和事業(yè)單位工資管理系統(tǒng)唯有采用自動(dòng)化，高效率，人性化的管理，才能滿足服務(wù)員工的需求。工資管理系統(tǒng)的主要目標(biāo)在于加強(qiáng)服務(wù)而不在于精簡人力。所以系統(tǒng)要能提供

6、更自動(dòng)化的服務(wù)，期望以最快的速度將人事工資信息做最適當(dāng)?shù)倪\(yùn)用。主要目標(biāo)有：以自動(dòng)化、系統(tǒng)化、高效管理代替分散重復(fù)操作；提高單位效益和現(xiàn)代化信息管理水平；提高員工的自律性，促進(jìn)員工人才的成長和流動(dòng)；減輕人事工資管理員的負(fù)擔(dān)，節(jié)省人力物力的開支等。引進(jìn)以計(jì)算機(jī)信息管理技術(shù)和網(wǎng)絡(luò)通訊技術(shù)，是加快人事工資管理信息服務(wù)進(jìn)程的重要手段。新的管理系統(tǒng)的使用會(huì)給人事管理體系發(fā)生變化。這促進(jìn)了工資數(shù)據(jù)管理方式和理念的轉(zhuǎn)變，提高了企業(yè)單位的現(xiàn)代化和信息化水平，為企業(yè)帶來更多的效益。 系統(tǒng)的開發(fā)方法本系統(tǒng)采用Visual Basic 6.0可視化開發(fā)工具開發(fā)，采用ADO對(duì)象數(shù)據(jù)技術(shù)來提高系統(tǒng)的安全性和穩(wěn)定性。工資管

7、理系統(tǒng)可為企業(yè)和事業(yè)單位使用，屬于C/S結(jié)構(gòu)的數(shù)據(jù)庫系統(tǒng)，固定后臺(tái)數(shù)據(jù)庫采用SQL Server 2000。 可行性研究2.1 系統(tǒng)(xtng)流程圖 員工錄入人事信息管理部門錄入員工出勤工資核算工資管理基本工資出勤信息基本信息工資報(bào)表圖2.1 系統(tǒng)(xtng)流程圖 2.2 完成(wn chng)新系統(tǒng)的可行性 工資管理系統(tǒng)吸取通用系統(tǒng)的優(yōu)點(diǎn)的基礎(chǔ)上，根據(jù)具體企業(yè)單位所要求的功能進(jìn)行設(shè)計(jì)。添加業(yè)務(wù)管理模塊，在業(yè)務(wù)管理模塊中添加管理員工的業(yè)務(wù)檔案，當(dāng)用戶的業(yè)務(wù)工種等發(fā)生變化時(shí)只需修改業(yè)務(wù)檔案表記錄即可。通用型工資管理的技術(shù)比較成熟，所以可以學(xué)習(xí)技術(shù)并添加一些企業(yè)需要的功能，這樣就能完成此系統(tǒng)以

8、滿足客戶的需求。 系統(tǒng)分析3.1 系統(tǒng)的設(shè)計(jì)(shj)思想工資(gngz)管理系統(tǒng)是企業(yè)和事業(yè)單位常見的計(jì)算機(jī)信息管理系統(tǒng)。它的主要任務(wù)是對(duì)各種( zhn)工資信息進(jìn)行日常的管理，如工資信息的輸入、查詢、修改、增加、刪除，迅速準(zhǔn)確地完成各種工資信息的統(tǒng)計(jì)計(jì)算和匯總，快速打印出報(bào)表。在建立與實(shí)現(xiàn)工資管理系統(tǒng)時(shí)，應(yīng)進(jìn)行功能劃分，能夠由數(shù)據(jù)庫管理系統(tǒng)完成的功能應(yīng)盡可能由數(shù)據(jù)庫管理系統(tǒng)完成，這樣才能夠充分發(fā)揮數(shù)據(jù)庫管理系統(tǒng)高效、完全、可靠、便捷的性能，減少編程人員的工作量。3.2 需求分析工資管理系統(tǒng)是針對(duì)企事業(yè)單位的大量業(yè)務(wù)處理工作用計(jì)算機(jī)進(jìn)行全面現(xiàn)代化管理主要包括信息輸入功能，信息修改刪除功能，信

9、息的查詢以及工資的計(jì)算管理等。1.信息輸入功能1）輸入職工的基本信息。包括：Eno(員工編號(hào))、Ename（員工姓名）、Epart(所屬部門)、Eduty(職務(wù))、Esex（性別）、Eedu(學(xué)歷)、Eaddr(住址)、Ebir(出生年月)、Etel(電話號(hào)碼)等。2）輸入工資的信息。包括：（基本工資）、（崗位工資）、（住房補(bǔ)貼）、（津貼）、(工會(huì)會(huì)費(fèi))、(水電費(fèi))、（住房公積金）、（養(yǎng)老保險(xiǎn)）、（獎(jiǎng)懲）。3）輸入員工的部門信息。包括：Bno（部門編號(hào)）、Bname（部門名稱）、Bzg（部門總管）、Bmount(部門人數(shù))等。2.數(shù)據(jù)修改和刪除功能1）修改和刪除員工的基本信息。當(dāng)單位人員的信息

10、發(fā)生變化，如職稱的改變，工作部門變動(dòng)，或調(diào)離本單位等，系統(tǒng)應(yīng)能修改員工的信息或?qū)⑵鋸膯T工信息表中刪除。2）修改和刪除員工的工資信息。員工升職加薪、工資普調(diào)是企業(yè)中常見的事情，這就需要系統(tǒng)能方便對(duì)員工工資進(jìn)行個(gè)別及批量的修改；如員工調(diào)離本單位，就應(yīng)當(dāng)從員工信息表中刪除這個(gè)員工信息，將其工資信息表中相應(yīng)的數(shù)據(jù)刪除。3）修改和刪除部門信息。當(dāng)撤消一個(gè)部門時(shí)，文學(xué)藝術(shù)在能從部門信息表中將其刪除。而當(dāng)一個(gè)部門的名稱發(fā)生改變時(shí)，系統(tǒng)中所有該項(xiàng)部門的名稱應(yīng)一致的改變。3.查詢和統(tǒng)計(jì)功能1）能夠查詢指定員工的基本信息。2）能夠查詢指定某個(gè)部門或全部部門的基本信息。3）查詢某個(gè)員工的工資信息。4）統(tǒng)計(jì)、匯總指定

11、年份企業(yè)各部門(bmn)或某個(gè)部門每個(gè)月或全年工資總額，匯總各部門的人數(shù)或本單位的總?cè)藬?shù)。5）工資表月工資記錄的生成功能(gngnng)。生成當(dāng)月所有員工或某個(gè)部門的工資記錄，同時(shí)能進(jìn)行員工工資的計(jì)算，即計(jì)算應(yīng)發(fā)金額、應(yīng)扣金額及實(shí)發(fā)金額。3.3 系統(tǒng)的運(yùn)行(ynxng)環(huán)境和開發(fā)平臺(tái)本系統(tǒng)使用Visual Basic進(jìn)行軟件開發(fā)，SQL Server 2000進(jìn)行數(shù)據(jù)庫開發(fā)。VB是微軟公司開發(fā)的最為流行的軟件之一，也是社會(huì)上使用較多的開發(fā)工具之一。VB是一個(gè)完全可視化，面向?qū)ο蟮拈_發(fā)工具，因此此系統(tǒng)具有兼容性較好，安全性強(qiáng)，通用性好等優(yōu)點(diǎn)。3.4 數(shù)據(jù)流圖在對(duì)企業(yè)和事業(yè)單位工資管理過程進(jìn)行分析

12、后，根據(jù)系統(tǒng)功能的描述，得到工資管理系統(tǒng)的數(shù)據(jù)流圖如下：1. 頂層數(shù)據(jù)流圖與0層數(shù)據(jù)流圖圖3.1 頂層數(shù)據(jù)流圖圖3.2 0層數(shù)據(jù)流圖2.人事管理模塊(m kui)、工資管理模塊查詢模塊分層數(shù)據(jù)流圖 部門(bmn)表1.1查詢部門及員工信息1.2工資錄入員工(yungng)編號(hào) 員工與考勤數(shù)據(jù)工資數(shù)據(jù)考勤表 工資表圖3.3 員工信息查詢與錄入考勤表2.2計(jì)算工資2.1查詢考勤內(nèi)容員工名稱考勤數(shù)據(jù)工資信息工資表圖3.4 工資(gngz)核算 備份(bi fn)員工名3.2數(shù)據(jù)備份3.1查詢工資數(shù)據(jù)備份(bi fn)工資表備份數(shù)據(jù)工資表工資備份表圖3.5 工資備份工資表考勤表4.2查詢處理4.1要求

13、加工員工信息查詢要求查詢規(guī)則查詢結(jié)果員工表圖3.6 員工信息查詢35 數(shù)據(jù)字典數(shù)據(jù)字典是系統(tǒng)中各類數(shù)據(jù)描述的集合簡要說明工資管理系統(tǒng)的數(shù)據(jù)字典。1).名字：職工編號(hào)，部門編號(hào)別名：職工號(hào)，部門號(hào)描述：職工號(hào)唯一地標(biāo)識(shí)數(shù)據(jù)庫中職工信息相關(guān)表中的一個(gè)特定員工的關(guān)鍵域；部門號(hào)唯一地標(biāo)識(shí)部門信息表中的一個(gè)特定部門的關(guān)鍵域定義：職工號(hào)=6字符6位置：員工信息表 考勤表 工資表2).名字：職工(zhgng)信息報(bào)表 別名(bimng)：職工信息 描述：用戶指定條件下的員工基本信息情況(qngkung)查詢結(jié)果的信息表 定義：職工信息表=職工號(hào)+職工姓名+性別+出生年月+職務(wù)+學(xué)歷+電話號(hào)碼+住址+所屬部門

14、+身份證號(hào) 位置：輸出到打印機(jī)3).名字：考勤信息報(bào)表 別名：考勤信息 描述：用戶指定條件下的員工考勤信息查詢結(jié)果的信息表 定義：員工考勤信息查詢報(bào)表=考勤編號(hào)+員工號(hào)+員工姓名+加班天數(shù)+出差天數(shù)+曠工天數(shù)+遲到次數(shù)+考勤日期 位置：輸出到打印機(jī)4).名字：工資報(bào)表 別名：工資信息 描述：記錄工資的組成部分以及員工的工資情況的信息 定義：工資信息報(bào)表=職務(wù)+基本工資+每日工資+加班系數(shù)+出差天數(shù)+曠工標(biāo)準(zhǔn)+遲到標(biāo)準(zhǔn)+獎(jiǎng)金位置：輸出到打印機(jī) 系統(tǒng)設(shè)計(jì)4.1 系統(tǒng)功能設(shè)計(jì) 軟件所實(shí)現(xiàn)的功能強(qiáng)弱是衡量一個(gè)軟件最根本的標(biāo)準(zhǔn)。經(jīng)過系統(tǒng)的可行性研究，需求分析后，得出中小型企業(yè)的工資信息管理系統(tǒng)的功能分層

15、圖如下：工資管理系統(tǒng)2.1添加人事信息2.2修改人事信息2.4查詢?nèi)耸滦畔?.1設(shè)置工資3.3查詢職務(wù)基本工資3.2計(jì)算工資2.0人事管理功能3.0工資管理功能1.0系統(tǒng)登錄4.0系統(tǒng)管理功能4.1管理用戶2.3刪除人事信息4.1.1添加用戶4.1.2修改用戶密碼 圖4.1 工資(gngz)管理系統(tǒng)層次圖4.2 系統(tǒng)(xtng)總體功能模塊此工資管理系統(tǒng)分為五個(gè)模塊(m kui)，具體如下： 1.人事基本信息管理模塊：員工信息錄入修改刪除及查詢。 2.部門管理模塊。3.考勤管理模塊。 4.工資計(jì)算及管理模塊。4.3 數(shù)據(jù)庫設(shè)計(jì)4.3.1概念結(jié)構(gòu)設(shè)計(jì)根據(jù)如上的信息可得到實(shí)體之間的關(guān)系E-R圖如下

16、：圖4.2 E-R圖2.概念(ginin)結(jié)構(gòu)模型 圖4.3 概念模型CDM4.3.2 邏輯(lu j)結(jié)構(gòu)設(shè)計(jì)將E-R圖轉(zhuǎn)換成如下(rxi)關(guān)系模式： 員工(yungng)表（員工號(hào)，員工名，職務(wù)，部門號(hào)，性別，出生年月，學(xué)歷，電話，住址，身份證號(hào)） 部門表（部門號(hào)，部門名，部門總管，部門人數(shù)，）考勤表（考勤編號(hào)，員工號(hào)，遲到次數(shù)，曠工次數(shù)，出差天數(shù)，加班次數(shù)，考勤日期）工資表（職務(wù)，員工號(hào)，基本工資，獎(jiǎng)金，出差標(biāo)準(zhǔn)，加班標(biāo)準(zhǔn)，遲到系數(shù)，曠工次數(shù)）依據(jù)上面的關(guān)系模式，設(shè)計(jì)數(shù)據(jù)表如下：用戶表 ：用于進(jìn)入系統(tǒng)(xtng)的權(quán)限設(shè)置等。 表1 用戶(yngh)信息表Users列名數(shù)據(jù)類型長度屬性描

17、述userIDchar5主鍵用戶編號(hào)usernamevarchar10不允許空用戶名passwordvarchar15不允許空密碼markvarchar20備注 2.職工(zhgng)表：職工的基本信息。表2 職工信息表Employee列名數(shù)據(jù)類型長度屬性描述Enochar6主鍵職工編號(hào)Enamevarchar15不允許為空職工姓名Esexvarchar10性別EbirthDatetime出生年月Edutyvarchar20外鍵職務(wù)Eeduvarchar20學(xué)歷Etelvarchar15電話號(hào)碼Eaddrvarchar20住址Bnovarchar20外鍵部門編號(hào)IDidentifyvarcha

18、r20身份證號(hào) 3.部門表：部門基本信息。 表3 部門信息表Department列名數(shù)據(jù)類型長度屬性描述Bnochar5主鍵部門號(hào)Bnamevarchar10不允許空部門名Bzgvarchar10部門總管Bmountint4部門人數(shù)4.工資表：工資的基本組成信息。表4 工資設(shè)置表WageConfig列名數(shù)據(jù)類型長度屬性描述DutyVarchar20主鍵職務(wù)BaseWageMoney8基本工資DayWageMoney8每日工資QvertinmeJobFloat8加班系數(shù)EvectionStandardMoney出差標(biāo)準(zhǔn)AbsenStandardMoney8曠工標(biāo)準(zhǔn)LateStandardMone

19、y8遲到標(biāo)準(zhǔn)Bonusmoney8獎(jiǎng)金5.考勤表：記錄員工(yungng)的到職情況。 表5 考勤(koqn)統(tǒng)計(jì)表CheckStat列名數(shù)據(jù)類型長度屬性描述CheckIDInt主鍵考勤編號(hào)EnoChar6外鍵員工號(hào)Enamechar15不允許空員工姓名OvertimeDayVarchar加班天數(shù)EvectionDaySmallint出差天數(shù)AbsentDaySmallint曠工天數(shù)LateDaySmallint遲到次數(shù)CheckDatesmalldatetime考勤日期 6.工資表：記錄保存(bocn)計(jì)算出來的工資。 表6 工資表Wage列名數(shù)據(jù)類型長度屬性描述WageIDint主鍵編號(hào)E

20、mployeeIDchar6不允許空員工編號(hào)EmployeeNamevarchar15不允許空員工姓名WageNamedatetime不允許空工作日期BaseWagemoney不允許空基本工資OvertimeWagemoney不允許空加班工資EvectionWagemoney不允許空出差補(bǔ)助AbsentWagemoney不允許空曠工減薪LateWagemoney不允許空遲到減薪EtcWagemoney不允許空其他補(bǔ)助BonusWagemoney不允許空獎(jiǎng)金TotalWagemoney不允許空總工資4.3.3 物理(wl)結(jié)構(gòu)模型圖4.4 物理結(jié)構(gòu)(jigu)模型PDM數(shù)據(jù)庫結(jié)構(gòu)(jigu)的實(shí)

21、現(xiàn)1、數(shù)據(jù)庫的創(chuàng)建 T-SQL語句：Create database 工資管理on(name=Wages_data,filename=E:MSSQLDataWages_data.mdf, size=10mb,maxsize=100mb,filegrowth=5%)log on ( name=Wages_log, filename=E:MSSQLDataWages_log.ldf, size=5mb, maxsize=30mb, filegrowth=2mb )2、數(shù)據(jù)表的創(chuàng)建（可同時(shí)在創(chuàng)建時(shí)定義相關(guān)(xinggun)的約束） T-SQL語句(yj)： 1) Users表：Create table

22、 Users( UID int not null defaultPrimary Key,Uname char(8) not null default, UPassword char( 16) default,URight char(20) default,) 2)Employee表：create table Employee( EmployeeID char(8) not null defaultPrimary Key, EmployeeName char(8) not null default, Sex char(2) default, Birthday smalldatetime defa

23、ult, Education char(8) default, Duty char(20) not null References WageConfig(Duty) ON UPDATE CASCADE ON DELETE CASCADE, DepartmentID char(20) not null, IdentityID char(20) not null, Telephone char(15) not null, Address char(40) not null, Remark varchar(100) default )3)WageConfig表：Create table WageCo

24、nfig( Duty char(20) not null defaultPrimary Key, BaseWage money not null, DayWage money not null, OvertimeJob float(8) not null, EvectionStandard money not null, AbsentStandard money not null, LateStandard money not null, EtcStandard money not null, Bonus money not null)4）CheckStat表：create table Che

25、ckStat( CheckID int IDENTITY(1,1) Primary Key, EmployeeID char(8) not null References Employee(EmployeeID) ON UPDATE CASCADE ON DELETE CASCADE, EmployeeName varchar(15) default, Overtimeday smallint default, Evectionday smallint default, Absentday smallint default, Lateday smallint default, CheckDat

26、e smalldatetime default )5）Wage表：create table Wage( WageID int IDENTITY(1,1) Primary Key, EmployeeID char(8) not null References Employee(EmployeeID) ON UPDATE CASCADE ON DELETE CASCADE, EmployeeName varchar(15) default, WageDate smalldatetime default, BaseWage money default 0, OvertimeWage money de

27、fault 0, EvectionWage money default 0, AbsentWage money default 0, LateWage money default 0, EtcWage money default 0, BonusWage money default 0, TotalWage money default 0, )6)DepartmentID表：Create table DepartmentID(DepartmentID int not null defaultPrimary Key,Departmentname char(16) not null default

28、, Departmentmanage char( 8) default,Departmentnumber int default,)向表中插入(ch r)基本信息1）插入用戶基本(jbn)信息insert into Usersselect01,1,1,系統(tǒng)(xtng)管理員union select 02,yy,1234,人事管理union select 03,ll,1234,工資管理union select 04,lxj,1234,人事管理union select 05,ws,1234,工資管理union select 06,mq,1234,系統(tǒng)管理員2）插入(ch r)職工基本信息inser

29、t into Employee(EmployeeID,EmployeeName,Sex,Birthday,Education,Duty,DepartmentID,IdentityID,Telephone,Address,Remark)select0101,時(shí)妍妍(yn yn),女,1988-08-15,總管(zn un),策劃部淮安,union select 0401,梁麗,女,1989-01-08,總管,財(cái)務(wù)部淮安,union select 0301,潘娟,女,1988-01-25,工人,生產(chǎn)部徐州,union s

30、elect 0402,許潔,女,1990-01-27,工人,財(cái)務(wù)部河南,union select 0501,王濤,1987-10-13,工人,銷售部福建,union select 0201,徐杰,1984-07-09,研究生,技術(shù)人員,研發(fā)部無錫,union select 0701,張凱,1985-04-12,總管,后勤部浙江,union select 0601,李璐,女,1986-05-16,大專,總管,宣傳部蘇州,union select 0302,石磊,198

31、5-02-07,工人,生產(chǎn)部揚(yáng)州,union select 0303,吳華,1986-06-24,工人,生產(chǎn)部山東,union select 0304,唐建青,1989-11-10,總管,生產(chǎn)部揚(yáng)州,union select 0502,李云,女,1988-03-17,工人,銷售部,158621100008,鎮(zhèn)江,union select 0202,王兆坤,1986-04-30,總管,研發(fā)部無錫,union select 0305,梁玉沖,1990-09-04,工人,生產(chǎn)部,158621100

32、10,無錫,union select 0503,金壇,1989-12-15,總管,銷售部上海,union select 0403,夏平,1986-01-13,大專,工人,財(cái)務(wù)部四川,union select 0602,邵建波,1984-03-17,工人,宣傳部徐州,union select 0603,李書生,1987-11-22,工人,宣傳部南通,union select 0102,陸林,1980-08-21,博士,工人,策劃部河北,union select 070

33、2,黃婷,女,1981-05-16,工人,后勤部安徽,union select 0203,周宇,1982-07-19,研究生,技術(shù)人員,研發(fā)部浙江,union select 0703,李曉梅,女,1982-04-03,工人,后勤部宿遷, 工資(gngz)管理系統(tǒng)功能實(shí)現(xiàn)5.1 開發(fā)環(huán)境(hunjng)簡介 Visual Basic是一個(gè)可視化、面向?qū)ο蟮?、采用事件?qū)動(dòng)的結(jié)構(gòu)化高級(jí)程序設(shè)計(jì)語言，它具有強(qiáng)大的數(shù)據(jù)庫操作功能，提供了數(shù)據(jù)管理器（Data Manager）、數(shù)據(jù)控件（data Control）以及ADO(Ac

34、tivex數(shù)據(jù)對(duì)象)等工具，利用它能夠建立多種類型的數(shù)據(jù)庫并可以管理維護(hù)和使用(shyng)這些數(shù)據(jù)。系統(tǒng)界面的設(shè)計(jì) 圖5.1 系統(tǒng)(xtng)界面系統(tǒng)主界面主要有系統(tǒng)菜單和運(yùn)行(ynxng)界面。給界面提供了系統(tǒng)設(shè)置，人事管理，工資管理和幫助等功能，下面又分多個(gè)子功能。5.3 員工基本(jbn)信息管理功能設(shè)計(jì)（代碼）添加操作：Dim EmployeeID, Employeename, Sex, birthday, Education, Duty, DepartmentName, IdentityID, Telephone, Address As StringEmployeeID = Tex

35、t1.TextEmployeename = Text2.TextEducation = Text3.TextDuty = Text8.TextDepartmentName = Text4.TextSex = Combo1.TextIdentityID = Text5.TextTelephone = Text6.TextAddress = Text7.TextIf Trim(EmployeeID) = Or Trim(Employeename) = Or Trim(DepartmentName) = Then MsgBox 員工基本信息不能為空,請(qǐng)?zhí)顚懀?Exit SubEnd IfmyCon.

36、Open Provider=SQLOLEDB.1;Integrated Security=SSPI;Persist Security Info=False;Initial Catalog=工資管理;Data Source=HP-PC;myRs.Open select * from Employee where EmployeeID= & Trim(Text1.Text) & and Employeename= & Trim(Text2.Text) & , myConIf myRs.EOF = False Then MsgBox 該員工已經(jīng)存在，請(qǐng)重新輸入！ myRs.Close myCon.C

37、lose Text1.SetFocusExit SubEnd IfmyRs.ClosemyRs.Open employee, myCon, 3, 2myRs.AddNew myRs.Fields(EmployeeID) = Text1.Text myRs.Fields(Employeename) = Text2.Text myRs.Fields(Education) = Text3.Text myRs.Fields(Duty) = Text8.Text myRs.Fields(DepartmentName) = Text4.Text myRs.Fields(Sex) = Combo1.Text

38、 myRs.Fields(IdentityID) = Text5.Text myRs.Fields(birthday) = DTPicker1.Value myRs.Fields(Telephone) = Text6.Text myRs.Fields(Address) = Text7.TextmyRs.UpdatemyRs.ClosemyCon.CloseMsgBox 添加(tin ji)成功!Adodc1.RecordSource = select * from employee jbxx.Adodc1.Refreshjbxx.DataGrid1.Refresh Text1.Text = T

39、ext2.Text = Text3.Text = Text4.Text = Combo1.Text = Text5.Text = Text6.Text = Text7.Text = Text8.Text = 修改(xigi)操作：Dim EmployeeID, Employeename, Sex, birthday, Education, Duty, Department, IdentityID, Telephone, Address As StringDim n As IntegerEmployeeID = Text1.TextEmployeename = Text2.TextEducati

40、on = Text3.TextDuty = Text8.TextDepartmentName = Text4.TextSex = Combo1.TextIdentityID = Text5.TextTelephone = Text6.TextAddress = Text7.TextIf Trim(EmployeeID) = Or Trim(Employeename) = Then MsgBox 請(qǐng)?zhí)顚懸獎(jiǎng)h除(shnch)員工的基本信息！ Exit SubEnd IfIf myCon.State = 1 ThenmyCon.CloseEnd IfmyCon.Open Provider=SQLOL

41、EDB.1;Integrated Security=SSPI;Persist Security Info=False;Initial Catalog=工資管理;Data Source=HP-PC;myRs.Open select * from employee where EmployeeID= & Text1.Text & , myCon, 3, 2n = MsgBox(您確定(qudng)要?jiǎng)h除嗎？, vbYesNo, 提示)If n = 6 ThenmyRs.DeletemyRs.ClosemyCon.CloseEnd IfAdodc1.RecordSource = select * f

42、rom employee jbxx.Adodc1.Refreshjbxx.DataGrid1.RefreshText1.Text = Text2.Text = Text3.Text = Text4.Text = Combo1.Text = Text5.Text = Text6.Text = Text7.Text = Text8.Text = 刪除(shnch)操作：Dim EmployeeID, Employeename, Sex, birthday, Education, DepartmentName, IdentityID, Telephone, Address As StringEmpl

43、oyeeID = Text1.TextEmployeename = Text2.TextEducation = Text3.TextDuty = Text8.TextDepartmentName = Text4.TextSex = Combo1.TextIdentityID = Text5.TextTelephone = Text6.TextAddress = Text7.TextIf Trim(EmployeeID) = Or Trim(Employeename) = Then MsgBox 請(qǐng)?zhí)顚懸薷牡膬?nèi)容(nirng)！, vbYesNo, 提示 Text2.Text = Exit S

44、ubEnd If myCon.Open Provider=SQLOLEDB.1;Integrated Security=SSPI;Persist Security Info=False;Initial Catalog=工資管理;Data Source=HP-PC;myRs.Open select * from employee where EmployeeID= & Text1.Text & , myCon, 3, 2 myRs!Employeename = Text2.Text myRs.UpdatemyRs.ClosemyCon.CloseMsgBox 您確定要修改(xigi)嗎？, vb

45、YesNo, 提示jbxx.Adodc1.Refreshjbxx.DataGrid1.RefreshText1.Text = Text2.Text = Text3.Text = Text4.Text = Combo1.Text = Text5.Text = Text6.Text = Text7.Text = Text8.Text = 5.4 工資管理功能設(shè)計(jì)員工信息(xnx)查詢：Option ExplicitPrivate Sub cmdExit_Click() Unload MeEnd SubPrivate Sub cmdQuery_Click() Dim sql As String 按編

46、號(hào)(bin ho)查詢 If chkNumber.Value = True Then If cboNumber.Text = Then MsgBox 請(qǐng)選擇員工編號(hào)！, vbExclamation cboNumber.SetFocus Exit Sub ElseIf IsNumeric(cboNumber.Text) = False Then MsgBox 員工編號(hào)是數(shù)字量！, vbExclamation cboNumber.SetFocus Exit Sub Else sql = select * from Wage where EmployeeID= & _ cboNumber.Text & Adodc1.RecordSource = sql Adodc1.Refresh End If End If 按姓名(xngmng)查詢 If chkName.Value = True Then If cboName.Text = Then MsgBox 請(qǐng)選擇(xunz)員工姓名！, vbExclamation cboName.SetFocus Exit Sub Else sql = select * from Wage where EmployeeName= & _ cboName.Text & Adodc1.RecordSource = sql Adodc1.Refre