【正文】 據(jù)條件羅列、統(tǒng)計已經(jīng)發(fā)放的工資。管理人員可以根據(jù)條件增加、修改和查看員工考核記錄。主要用來統(tǒng)一各個職位的與工資有關(guān)的基本信息。主要完成查看歷史工資發(fā)放信息。主要 完成每期對員工進行考核。主要員工基本檔案信息的管理。最新的是 ADO，它是比 RDO 和 DAO 更加簡單，然而更加靈活的對象模型。 在 使用 Visual Basic 進行數(shù)據(jù)庫程序的開發(fā)時 ， 必須建立與數(shù)據(jù)庫的連接。 數(shù)據(jù)庫應(yīng)用總是會涉及到這 3 個方面的問題：前端程序、數(shù)據(jù)庫結(jié)構(gòu)、前端程序和數(shù)據(jù)庫之間的連接， 在這里 Visual Basic 通過 ADO 這一中間連接件而實現(xiàn)對數(shù)據(jù)庫操作的。在數(shù)據(jù)庫應(yīng)用系統(tǒng)的創(chuàng)建過程中， Visual Basic 能夠出色地承擔(dān)起前端界面層和中間連接層的創(chuàng)建任務(wù)。 ：基于事件驅(qū)動的編程方法體現(xiàn)在程序的執(zhí)行是依靠系統(tǒng)能夠被識別的觸發(fā)事件啟動的。 畢業(yè)設(shè)計（論文） 第 頁 9 ：基于部件的編程方法是分布式構(gòu)架 思想體系的具體化?？梢暬h(huán)境下創(chuàng)作前端界面就如同做拼圖游戲那樣簡單， Visual Basic 之所以成為 Windows 環(huán)境下快捷、便利的前端開發(fā)工具，并獲得最廣泛的用戶群體支持，其所具有高度智能的人性化開發(fā)環(huán)境起了很大的作用。這是也是需要說明的業(yè)務(wù)規(guī)則。我們所開發(fā)的工資管理信息系統(tǒng)是基于這一業(yè)務(wù)流程的。 4) 系統(tǒng)根據(jù)職位和考核成績自動生成工資單 需求分析是對系統(tǒng)開發(fā)提出明確要求的過程，其結(jié)果是后續(xù)系統(tǒng)開發(fā)工作的基礎(chǔ)。 4) 輸出：員工信息、員工工資 ， 報表等。 基本表字段的設(shè)計只取其重點，初始版本將重點放在系統(tǒng)的實現(xiàn)上，后續(xù)版本才能最終適用。這些優(yōu)點能夠極地提高工資管理的效率 ,也是企業(yè)的科學(xué)化、正規(guī)化管理 ,與世界接軌的重要條件。另外時間一長 ,將產(chǎn)生大量的文件和數(shù)據(jù) ,這對于查找、更新和維護都帶來了不少的困難。它的特點是使用數(shù)據(jù)庫和分時處理的計算機網(wǎng)絡(luò)，并充分利用運籌學(xué)等數(shù)學(xué)方法，實現(xiàn)了硬件、軟件和數(shù)據(jù)資源的共享。這個階 段的處理方式已發(fā)展為面向終端的聯(lián) 機實時處理。這個階段的處理方式主要是集中式的批處理。從工業(yè)發(fā)達(dá)國家來看，管理信息系統(tǒng)的發(fā)展經(jīng)歷了以下幾個階段。 Realization report form function. This system is the typical information management , Its development mainly includes the backstage database the establishment, the maintenance as well as front end the application procedure development two regarding the database to have the data uniformity and the integrity strong, the data security good characteristic。 該系統(tǒng)是典型的信息管理系統(tǒng) ,其開發(fā)主要包括后臺數(shù)據(jù)庫的建立、維護以及前端應(yīng)用程序的開發(fā)兩個方面。畢業(yè)設(shè)計（論文） 第 頁 1 工資管理系統(tǒng) 摘 要 本論文的主要內(nèi)容是小型企業(yè)工資管理系統(tǒng)的設(shè)計與開發(fā)。對于數(shù)據(jù)庫要求具有數(shù)據(jù)一致性和完整性強、數(shù)據(jù)安全性好的特點；而對于應(yīng)用程序，則要求系統(tǒng)功能完備、易操作、界面友好等特點。 But regarding application procedure, then requests the system function plete, easy to operate, the contact surface in a friendly way and so on the characteristics. Key word: Management information system。 第一階段：（ 1953 年至 1965 年）單項數(shù)據(jù)處理階段，也稱電子數(shù)據(jù)處理（ EDP）階段。 第二階段：（ 1965 年至 1970 年）綜合數(shù)據(jù)處理階段，也稱事務(wù)處理系統(tǒng)（ TPS）階段。 第三階段：（ 1970 年至今）管理信息系統(tǒng)（ MIS）階段。 本系統(tǒng)開發(fā)的目的和意義 工資管理系統(tǒng)是一個企業(yè)單位不可缺少的部分 ,它的內(nèi)容對于企業(yè)的決策者和管理者來說都至關(guān)重要 。 隨著科學(xué)技術(shù)的不斷提高 ,計算機科學(xué)日漸成熟 ,其強大的功能已為人們深刻認(rèn)識 ,它已進入人類社會的各個領(lǐng)域并發(fā)揮著越來越重要的作用。 因此，開發(fā)這樣 一 套 工資 管理軟件成為很有必要的事情 。所開發(fā)的軟件系統(tǒng)應(yīng)該滿足如下基本要求： 1) 功能：管理員工基本信息、 績效考核、職位管理和工資發(fā)放記錄。 基本數(shù)據(jù)流程和處理流程： 1) 用戶輸入員工信息，包括姓名、性別、出生日期、職位等。需求分析是在用戶調(diào)查的基礎(chǔ)上，通過分 析，逐步明確用戶對系統(tǒng)的需求，包括數(shù)據(jù)需求和圍繞這些數(shù)據(jù)的業(yè)務(wù)需求 。 畢業(yè)設(shè)計（論文） 第 頁 8 圖 工資管理信息系統(tǒng)業(yè)務(wù)流程圖 首先員工將自己的個人檔案提交給系統(tǒng)管理人員（企業(yè)管理人員），管理員將檔案信 息錄入系統(tǒng)；職位信息統(tǒng)一修改由職位確定的基本工資等信息，對系統(tǒng)來說，屬于靜態(tài)工資；績效信息是對一段時間（比如一個月）對員工的考評成績，系統(tǒng)將根據(jù)員工的檔案信息和考評成績自動確定員工的工資數(shù)量，最后生成工資清單。 技術(shù)要求 前臺開發(fā)語言的選擇 Visual Basic 繼承了 BASIC 語言簡單易學(xué)的優(yōu)點，又增加了許多新的功能，它采用面向?qū)ο笈c事件驅(qū)動的程序設(shè)計思想，使編程變得更加方便、快捷。 ：面向?qū)ο缶幊趟枷耄?OOP）誕生與 20世紀(jì) 80 年代初期，并先期在 Ada、 Small Talk、 C++等程序設(shè)計語言中實現(xiàn)。在 Visual Basic 中進行部件編程是通過微軟的部件對象模型（ COM， Compo Object Model） 實現(xiàn)的。用戶操作、系統(tǒng)信息，以及程序等各種因素都可能觸發(fā)事件。 后臺數(shù)據(jù)庫的選擇 Access 是 Office 軟件包的成員之一， 擅長對數(shù)據(jù)進行處理，例如建立，排序，分類及匯總數(shù)據(jù)等操作。 什么是 ADO ADO（ Active Data Objects）： Active 數(shù)據(jù)對象。 Visual Basic 中 有三種可用的數(shù)據(jù)訪問接口： ActiveX 數(shù)據(jù)對象 (ADO)、遠(yuǎn)程數(shù)據(jù)對象 (RDO) 和數(shù)據(jù)訪問對象(DAO)。 目前普遍 使用 ADO 作為數(shù)據(jù)訪問接口。 2) 職位信息管理。 4) 工資發(fā)放。 畢業(yè)設(shè)計（論文） 第 頁 11 系統(tǒng)總體功能圖 概要設(shè)計階段，我們可以得到系統(tǒng)總體功能圖如圖 所示： 圖 系統(tǒng)總體功能圖 模塊設(shè)計 根據(jù)上面的分析，工資管理信息系統(tǒng)各個模塊的名稱和功能概要說明如下： 1) 員工檔案信息管理。用戶功能包括增加、修改和查看基本職位的各項工資信息。 4) 工資發(fā)放。 數(shù)據(jù)庫設(shè)計 概念設(shè)計 系統(tǒng)在概念設(shè)計階段常用 ER 圖表現(xiàn)。 實體關(guān)系圖中的實體有三種：一般實體（ normal entity,表示邏輯或物理數(shù)據(jù)集）；聯(lián)系實體（ associate entity，表示含有多對多關(guān)系的關(guān)系表）；分解實體（ depositions,表示一組將在下畢業(yè)設(shè)計（論文） 第 頁 12 層實體關(guān)系圖中細(xì)化的數(shù)據(jù)）。 “關(guān)系 ”的基數(shù)類型有三種：一對一關(guān)系；一對多關(guān)系（即實體 B 的多個實例可以與實體 A 的一個實例存在關(guān)系，反之亦然）；多對多關(guān)系（即實體 B的多個實 例可以與實體 A的多個實例存在關(guān)系，反之亦然）。要實現(xiàn)這一點，必須能夠自動生成實體（表示物理意義的表）以及基于表間關(guān)系的實體間關(guān)系。如圖 所示 圖 創(chuàng)建數(shù)據(jù)庫 使用設(shè)計器創(chuàng)建數(shù)據(jù)庫所需各個表格 。一個過程可能用來響應(yīng)幾個不同對象中的事件，應(yīng)該將這個過程放在標(biāo)準(zhǔn)模塊中，而不應(yīng)在每一個對象的事件過程中重復(fù)相同的代碼。數(shù)據(jù)庫連接對象 Public gCon As New 39。 設(shè)計與實現(xiàn) 相應(yīng) MDIForm 對象的 Load 事件，對整體進行初始化 39。如圖 所示： 圖 4 . 6 人 員 管 理 窗 體 用戶重新選擇 DataGrid1 控件中的行列，則記錄用戶所在的行。用戶單擊“修改員工”按鈕，則顯示 修改員工窗體，并將相關(guān)的用戶選定信息傳遞給修改員工窗體。首先新建一個窗體，添加員工窗體包含兩個控件數(shù)組， lblField 是一個 Label 控件數(shù)組，用于顯示字段名稱， txtValue 用于輸入這些字段的值；另外還有一個“添加”按鈕和“取消”按鈕，分別實現(xiàn)添加員工和退出窗體的功能。單擊“修改”按鈕，則生成并執(zhí)行ＳＱＬ語句，實 現(xiàn)修改功能。如圖 所示： 圖 職位管理窗體 用戶重新選擇 DataGrid1 控件中的行列，則記錄用戶所在的行。操作完畢，用戶單擊“取消”按 畢業(yè)設(shè)計（論文） 第 頁 22 鈕，可以退出本窗體。 。用戶對 txtValue 控件數(shù)組的屬性進行修改，當(dāng)用戶單擊“添加”時，生成 SQL 語句并執(zhí)行，同時刷 新職位管理窗體的數(shù)據(jù)。用戶單擊“取畢業(yè)設(shè)計（論文） 第 頁 23 消”按鈕，退出該窗體。用戶單擊“添加特殊項”按鈕，則顯示添加特殊項窗體。 創(chuàng)建添加特 殊項窗體 本窗體實現(xiàn)添加一條記錄到特殊項表，并刷新人員管理窗體中的 ADO 數(shù)據(jù)控件，保持?jǐn)?shù)據(jù)的一致性。保證姓名與 ID 一致 Private Sub cmbName_Click() = () End Sub 如圖 所示： 圖 添加特殊項窗體 創(chuàng)建修改特殊項窗體 窗體初始化時，會把“特殊項管理”窗體中選種的數(shù)據(jù)顯示到 TxtValue 控件數(shù)組中。本窗體實現(xiàn)的具體功能如下：動態(tài)生成當(dāng)月的工資表，查詢指定員工的工資信息，發(fā)放工資，打印工資憑條。分別是月表的名稱和員工的工資總額： Option Explicit 39。而月表的名稱都會變?yōu)?202106 Public mTableName As String 39。本窗體的工作流程就是在用戶單擊需要的按鈕，顯示相應(yīng)的窗體。 經(jīng)過這段時間的設(shè)計和開發(fā)，工資管理系統(tǒng)基本開發(fā)完畢。這些都有待在以后的版本中進一步改善。s COM+ Programming with Visual Basic】 作者： Scot Hillier，出版社：Sams，出版時間： 1 畢業(yè)設(shè)計過程中查閱的網(wǎng)站： 附錄 源程序清單 一、標(biāo)準(zhǔn)模塊 39。數(shù)據(jù)庫集合對象 Public gRst As New 39。自由文件號 On Error GoTo ErrGoto 39。 。 ErrGoto: 39。打開錯誤處理陷阱 Dim intErrFileNo As Integer 39。 ErrGoto: 39。自由文件號 On Error GoTo ErrGoto 39。把錯誤信息保存在文件里 intErrFileNo = FreeFile() Open For Append As intErrFileNo Print intErrFileNo, Chr(34) + Format(Now, YYYYMMDD HH:MM:SS) + Chr(34), Chr(34) + 信息 + Chr(34), Chr(34) + + Chr(34), Chr(34) + OpenRS(Module1) + Chr(34), Chr(34) + + Chr(34) Close intErrFileNo End Sub 39。 畢業(yè)設(shè)計（論文） 第 頁 33 CloseDBFile 39。調(diào)用 統(tǒng)計報表 窗體 Private Sub Analysis_Click() End Sub 39。 \職工工資管理系統(tǒng) .mdb 畢業(yè)設(shè)計（論文） 第 頁 34 Set gX = CreateObject() End Sub 39。調(diào)用 特殊項管理 窗體 Private Sub SpecialManage_Click() End Sub 三、創(chuàng)建人員管理窗體 39。刪除員工 Private Sub cmdDeleteEmployee_Click() 39。打開數(shù)據(jù)庫連接 OpenDBFile = 0 = CurEm If vbYes = MsgBox(是否刪除 amp。 amp。 Exit Sub