1、浙江長征職業(yè)技術(shù)學(xué)院 畢業(yè)設(shè)計(jì)（論文）論文題目：企業(yè)工資管理系統(tǒng)系別：信息系專業(yè)班級：學(xué)生姓名：指導(dǎo)教師：彭小玲二OG九年五月十七日目錄摘要1引言 21系統(tǒng)設(shè)計(jì)使用的工具、環(huán)境簡介21.1 VFP的簡介21.2 VFP的基本功能 21.3 VFP的特點(diǎn) 32系統(tǒng)分析 32.1設(shè)計(jì)目標(biāo)和任務(wù)2.2可行性分析32.3 需求分析43企業(yè)工資管理系統(tǒng)功能模塊圖54主要功能模塊設(shè)計(jì)54.1項(xiàng)目的建立54.2用戶登陸64.3系統(tǒng)主菜單設(shè)計(jì)74.4系統(tǒng)主控表單設(shè)計(jì)84.5工資錄入表單設(shè)計(jì)84.6工資瀏覽表單設(shè)計(jì) 94.7工資修改表單設(shè)計(jì) 104.8工資統(tǒng)計(jì)表單設(shè)計(jì) 144.9工資查找表單設(shè)計(jì) 15164.1

2、0工資初始化表單設(shè)計(jì)4.11工資備份表單設(shè)計(jì) 174.12記錄打印表單設(shè)計(jì) 174.13系統(tǒng)幫助表單設(shè)計(jì) 184.14相關(guān)報(bào)表 195主程序的設(shè)計(jì) 196程序的連編 207系統(tǒng)運(yùn)行的效果 20附錄A數(shù)據(jù)庫相關(guān)數(shù)據(jù)表 21參考文獻(xiàn)22致謝23企業(yè)工資管理系統(tǒng)【摘 要】企業(yè)的工資管理是公司管理的一個(gè)重要內(nèi)容。隨著企業(yè)人員數(shù)量增加， 企業(yè)的工資管理工作也變得越來越復(fù)雜。工資管理既涉及到企業(yè)勞動(dòng)人事的管理， 同時(shí)也是企業(yè)財(cái)務(wù)管理的重要組成部分。工資管理需要和人事管理相聯(lián)系，同時(shí)連 接工時(shí)考勤和醫(yī)療保險(xiǎn)等等，來生成企業(yè)每個(gè)職工的基本工資、補(bǔ)貼、醫(yī)療保險(xiǎn)、 保險(xiǎn)費(fèi)、實(shí)際發(fā)放工資等。資金是企業(yè)生存的主要元素

3、，資金的流動(dòng)影響到企業(yè)的 整體運(yùn)作，企業(yè)員工的工資是企業(yè)資金管理的一個(gè)重要的組成部分。早期的工資統(tǒng) 計(jì)和發(fā)放都是使用人工方式處理紙質(zhì)材料，不僅花費(fèi)財(cái)務(wù)人員大量的時(shí)間且不易保 存，往往由于個(gè)人的因素抄寫不慎或計(jì)算疏忽，出現(xiàn)工資發(fā)放錯(cuò)誤的現(xiàn)象。早期工 資管理都采取紙質(zhì)材料和 具有較強(qiáng)的時(shí)間限制?；谝陨显?，企業(yè)工資管理系統(tǒng) 使用電腦安全保存、快速計(jì)算、全面統(tǒng)計(jì)，實(shí)現(xiàn)工資管理的系統(tǒng)化、規(guī)范化、自動(dòng) 化。本企業(yè)工資管理系統(tǒng)極大提高了工作效率，節(jié)省了人力和物力，最終滿足企業(yè) 財(cái)務(wù)管理、員工工資發(fā)放的需要，同時(shí)也成為現(xiàn)代化企業(yè)管理的標(biāo)志?！娟P(guān)鍵詞】工資管理財(cái)務(wù)管理系統(tǒng)化規(guī)范化自動(dòng)化引言當(dāng)今社會(huì)，資金是企

4、業(yè)生存的主要元素，資金的流動(dòng)影響到企業(yè)的整體 運(yùn)作，企業(yè)員工的工資是企業(yè)資金管理的一個(gè)重要的組成部分，因?yàn)槠?業(yè)每個(gè)月都要涉及發(fā)放企業(yè)員工工資的問題。而隨著企業(yè)人員數(shù)量的增 力，企業(yè)的工資管理也變得越來越復(fù)雜。企業(yè)員工的人數(shù)越多，工資的 統(tǒng)計(jì)工作就越多，工資的發(fā)放困難就越大。如果能夠?qū)崿F(xiàn)工資管理的自 動(dòng)化，無疑將給企業(yè)管理部門帶來很大的方便。傳統(tǒng)的紙質(zhì)材料的數(shù)據(jù) 信息管理方式已經(jīng)不適合現(xiàn)代企業(yè)公司的發(fā)展了，實(shí)現(xiàn)工資管理的系統(tǒng) 化、規(guī)范化、自動(dòng)化，將成為現(xiàn)代公司管理工資的首選。隨著計(jì)算機(jī)的 誕生和普及以及計(jì)算機(jī)網(wǎng)絡(luò)的發(fā)展，我們就可以開發(fā)一個(gè)工資管理系 統(tǒng)，用電腦代替大量的人工統(tǒng)計(jì)和計(jì)算，完成許多

5、工資信息的處理，同 時(shí)，使用電腦還可以安全地、完整地保存大量的工作記錄。1系統(tǒng)設(shè)計(jì)使用的工具、環(huán)境簡介系統(tǒng)設(shè)計(jì)使用的工具主要有Visual FoxPro 6.0,現(xiàn)簡介如下。1.1 VFP的簡介Visual FoxPro 6.0 是由美國Microsoft 公司于1998年推出的新一代數(shù)據(jù)庫軟 件系統(tǒng)。Visual FoxPro 數(shù)據(jù)庫是一個(gè)關(guān)系型數(shù)據(jù)庫，主要用于 Windows環(huán)境。由 于Visual FoxPro 需要很少編程就可以建立一個(gè)面向?qū)ο蟮臄?shù)據(jù)庫應(yīng)用程序，所 以在眾多的數(shù)據(jù)庫軟件中，Visual FoxPro 拖穎而出，成為一種通用的數(shù)據(jù)庫軟 件。利用Visual FoxPro

6、可以設(shè)計(jì)出豐富多彩的用戶界面，在用戶界面中可以放 置各種控制部件，如命令按鈕，圖形，圖片，圖表等，從而設(shè)計(jì)出完全圖形化的界 面，方便用戶操作和使用。1.2 VFP的基本功能1可以為每一種類型的信息創(chuàng)建一個(gè)表，利用表存儲(chǔ)相應(yīng)的信息。2可以定義各個(gè)表之間的關(guān)系，從而很容易地將各個(gè)表中相關(guān)的數(shù)據(jù)有機(jī)地聯(lián)系在 一起。3可以創(chuàng)建查詢搜索那些滿足指定條件的記錄，也可以根據(jù)需要對這些記錄排序和 分組，并根據(jù)查詢結(jié)果創(chuàng)建報(bào)表、表及圖表。4使用視圖，可以從一個(gè)或多個(gè)相關(guān)聯(lián)的表中，按一定條件抽取一系列數(shù)據(jù)，并可以通過視圖更新這些表中的數(shù)據(jù)。5可以創(chuàng)建表單來直接查看和管理表中的數(shù)據(jù)。6可以創(chuàng)建一個(gè)報(bào)表來分析數(shù)據(jù)或?qū)?/p>

7、數(shù)據(jù)以特定的方式打印出來。1.3 VFP的特點(diǎn)與其他數(shù)據(jù)庫不同，VFP在實(shí)現(xiàn)上述功能時(shí)提供了各種向?qū)?，用戶在操作時(shí)，只需按照向?qū)峁┑牟襟E執(zhí)行，使用起來非常方便。1）易于使用2）可視化開發(fā)3）事件驅(qū)動(dòng)4）面向?qū)ο缶幊?）應(yīng)用向?qū)Ш蜕善?）組件庫7）VFP基礎(chǔ)類8）活動(dòng)文檔9）對動(dòng)態(tài)圖形文件的支持10）程序語言的增強(qiáng)11）支持OLE拖放12）新增和改進(jìn)的生成器和編譯器系統(tǒng)分析設(shè)計(jì)目標(biāo)和任務(wù)目標(biāo)企業(yè)工資管理系統(tǒng)使用電腦安全保存、快速計(jì)算、全面統(tǒng)計(jì)，實(shí)現(xiàn)工資管理的系 統(tǒng)化、規(guī)范化、自動(dòng)化。本企業(yè)工資管理系統(tǒng)極大提高了工作效率，節(jié)省了人力和 物力，最終滿足企業(yè)財(cái)務(wù)管理、員工工資發(fā)放的需要，同時(shí)也成

8、為現(xiàn)代化企業(yè)管理 的標(biāo)志通過此系統(tǒng)，實(shí)現(xiàn)工資管理的完全信息化和數(shù)字化。任務(wù)為了加快企業(yè)自動(dòng)化的步伐，建立工資管理系統(tǒng)，盡可能地減少工資管理的復(fù)雜 性和低效性。運(yùn)用數(shù)據(jù)庫、VFP等相關(guān)知識來編寫系統(tǒng)，系統(tǒng)的開發(fā)包括系統(tǒng)分 析、需求設(shè)計(jì)、各功能模塊的開發(fā)及代碼設(shè)計(jì)。系統(tǒng)應(yīng)具備基本的信息輸入、修 改、查詢、統(tǒng)計(jì)及結(jié)果的輸出。2.2可行性分析以下從四個(gè)方面對企業(yè)工資管理系統(tǒng)進(jìn)行可行性分析：技術(shù)可行性、經(jīng)濟(jì)可行性、操作可行性和法律可行性。技術(shù)可行性為了確定現(xiàn)有技術(shù)能否實(shí)現(xiàn)目標(biāo)系統(tǒng)。VFP 6.0自帶的工具和控件，完全可以實(shí)現(xiàn) 本系統(tǒng)要求達(dá)到的各種功能。經(jīng)濟(jì)可行性為了確定待開發(fā)的系統(tǒng)的經(jīng)濟(jì)效益能否超過開發(fā)

9、成本。企業(yè)工資管理系統(tǒng)是一個(gè) 不會(huì)直接產(chǎn)生經(jīng)濟(jì)效益的投資，但是能夠節(jié)省人員資源的消耗和浪費(fèi)，從而節(jié)約成 本，提高效率。從成本效益角度來觀察，這個(gè)系統(tǒng)的開發(fā)成本不是很高，在使用 后，能夠起到的作用也是十分可觀的。操作可行性企業(yè)工資管理系統(tǒng)是基于VFP 6.0平臺開發(fā)的，VFP系列是被廣泛應(yīng)用于數(shù)據(jù)庫開發(fā)和操作的一套成熟的軟件平臺，而且它對于一個(gè)小型的數(shù)據(jù)庫處理具有不可比擬的優(yōu)點(diǎn)和簡單方便。所以叢操作可行性方面是可行的。開發(fā)出來的界面也是十分容易使用，具有簡單，容易上手的特點(diǎn)。法律可行性本系統(tǒng)完全是本人在指導(dǎo)老師的指導(dǎo)下獨(dú)立完成的，故不存在侵權(quán)行為或者由于本系統(tǒng)帶來的法律糾紛等問題，所以在法律上是

10、可行的 所以從上面四點(diǎn)出發(fā)，可以確定系統(tǒng)分析是可行的。2.3需求分析總體需求1建立對企業(yè)員工工資全面管理的信息系統(tǒng)；2. 對所有的職工提供全面管理；3. 對系統(tǒng)的安全提供全面管理；4. 對職工信息的添加、刪除提供全面管理；功能需求（1）對工資記錄進(jìn)行錄入。（2）對工資信息進(jìn)行查找。（3）對多個(gè)工資記錄進(jìn)行瀏覽。（4）對記錄進(jìn)行滿足各種實(shí)際需要的修改。（5）對各項(xiàng)工資的總和和總的人數(shù)進(jìn)行統(tǒng)計(jì)。（6）對記錄進(jìn)行打印233性能需求(1) 硬件配置中央處理器：硬盤10G內(nèi)存16M顯卡SVGA光驅(qū)CD-ROM(2) 軟件環(huán)境操作系統(tǒng) WINDOWS2000/WINDOWSXP/WINDOWS ME3企業(yè)

11、工資管理系統(tǒng)功能模塊圖退出系統(tǒng)圖3-1企業(yè)工資管理系統(tǒng)功能模塊圖4主要功能模塊設(shè)計(jì)4.1項(xiàng)目的建立A. 在硬盤上建一個(gè)目錄B. 啟動(dòng)VFP系統(tǒng)，在“項(xiàng)目管理器”窗口中建立一個(gè)項(xiàng)目，項(xiàng)目的名稱為“工資管理系統(tǒng)”，保存到新建的目錄中，如圖 4-1所示。圖4-1項(xiàng)目的建立4.2用戶登陸為了保證應(yīng)用程序的安全，通常要設(shè)計(jì)系統(tǒng)登錄表單驗(yàn)證用戶是否合法。只有 合法的用戶才可進(jìn)入系統(tǒng)。本模塊是系統(tǒng)的封面表單，運(yùn)行時(shí)將通過此表單調(diào)用主 控模塊，進(jìn)而管理整個(gè)工資管理系統(tǒng)。系統(tǒng)登錄模塊運(yùn)行結(jié)果。如圖4-2所示企業(yè)工資曽理系統(tǒng)趕掙用戶# Ihg最$ w圖4-2用戶登陸表單的設(shè)計(jì)表單form的屬性Autocenter

12、 改為：.-真（運(yùn)行時(shí)居中）BorderStyle 改為：2-固定對話框（禁止更改表單大?。㏒howtips改為：.T.-真（指定表單上的控件等是否顯示提示信息）ShowWindow改為：2-作為頂層表單在表單的Form_Load事件下添加如下代碼：PUBLIC USERNAME(2USERNAME(1超級用戶'USERNAME(2普通用戶'登陸系統(tǒng)Command1_Click事件代碼：STORE '' TO MYUSER,P1,P2,P3P仁 P2=LEFT(ALLTRIM(TIME(,2+SUBSTR(ALLTRIM(TIME(,4,2P3=ALLTRIM(

13、STR(YEAR(DATE(IF MYUSER=USERNAME(1IF P仁P3THISFORM.RELEASEdo form gzglELSE=MESSAGEBO超級用戶密碼錯(cuò)誤,請?jiān)僭囈槐椋?quot;,65,'ENDIFELSEIF P仁P2THISFORM.RELEASEdo form gzglELSE=MESSAGEBO普通用戶密碼錯(cuò)誤，請?jiān)僭囈槐?",65,'ENDIF提示信息提示信息ENDIF4.3系統(tǒng)主菜單設(shè)計(jì)A. 在“項(xiàng)目管理器”窗口中，選擇“其他”選項(xiàng)卡B. 在“其他”選項(xiàng)卡中，選擇“菜單”，“新建”，“菜單”“菜單設(shè)計(jì) 器”窗口，如圖4-3所示

14、。，系統(tǒng)進(jìn)入圖4-3系統(tǒng)菜單設(shè)計(jì)器退出過程相應(yīng)代碼：byebye=messagebox("真的要退出系統(tǒng)嗎？",64+1,"提示信息"if byebye=1close all clear eve ntsquiten dif要注意的是，要在設(shè)計(jì)菜單結(jié)束后，選擇主菜單上的“顯示”菜單下的“常規(guī)選 項(xiàng)”命令，再選擇頂層表單復(fù)選框。然后保存文件，再選擇生成菜單選項(xiàng)。4.4系統(tǒng)主控表單設(shè)計(jì)主控表單用來調(diào)用系統(tǒng)菜單，以形成對整個(gè)工資管理系統(tǒng)的控制與管理。運(yùn)行結(jié)果。如圖4-4所示d 把丁 t? h J7 £ 臨圖4-4系統(tǒng)主控表單本表單form的屬性需做相應(yīng)

15、設(shè)置：Show win dow=2Win dowstate=2Showtips=.t.Form表單中的load事件代碼為Do xtcd.mpr with this ,.t.4.5工資錄入表單設(shè)計(jì)工資錄入模塊是用來錄入工資記錄的，在具體操作時(shí)有些數(shù)據(jù)需要自動(dòng)生成。運(yùn)行結(jié)果，如圖4-5所示。圖4-5工資錄入表Forml表單的屬性如下:Autoce nter=.t.Showwi ndow=1相應(yīng)事件代碼設(shè)置：Txt應(yīng)發(fā)工資的Click 和gotfocus的代碼如下：with this.pare ntthis.value=.TXT 職務(wù)工資.value+.TXT 綜合補(bǔ)貼.value+.TXT 出勤補(bǔ)

16、.value+.TXT 交通補(bǔ).value+.TXT 外租房補(bǔ).value+.TXT 補(bǔ)發(fā)工資.value en dwithTxt合計(jì)扣款的Click 和gotfocus的代碼如下：with this.pare nt this.value=.TXT 養(yǎng)老保險(xiǎn).value+.TXT 公積金.valueen dwithTxt實(shí)發(fā)工資的Click 和gotfocus的代碼如下：with this.pare ntthis.value=.TXT 應(yīng)發(fā)工資.value-.TXT 合計(jì)扣款.valueen dwithtxt所得稅、txt實(shí)發(fā)現(xiàn)金的代碼與其類似略去。各個(gè)按鈕的功能比較簡單，在此略去。4.6工資

17、瀏覽表單設(shè)計(jì)本表單用來對多個(gè)記錄進(jìn)行瀏覽，運(yùn)行結(jié)果，如圖4-6所示。圖4-6工資瀏覽此表單功能較簡單，其中所用控件代碼，在此省略4.7工資修改表單設(shè)計(jì)此表單由頁框控件組成，該頁框由四個(gè)頁面組成第一個(gè)頁面：對查找滿足條件的記錄進(jìn)行修改圖4-7-1對滿足條件的記錄修改第二個(gè)頁面：將已查找的記錄顯示在屏幕上，進(jìn)行修改，即單個(gè)記錄的修改* 3 V j御g-Iw r -.<l«* | t -_ a v I j UB |； JThMi| ；«-'/ 1at |圖4-7-2對已找到的記錄進(jìn)行修改第三個(gè)頁面：批量修改已滿足條件的記錄，也可以修改某一字段的內(nèi)容圖4-7-3批量修

18、改第四個(gè)頁面：瀏覽式修改記錄，在列表框中選擇一個(gè)記錄，在屏幕上顯示選定記 錄的內(nèi)容，可以修改記錄。圖4-7-4瀏覽式修改text1_l nteractivecha nge事件代碼:set exact offGETzgh 仁GETx m仁 GETrq 仁 s=''if len( getzgh1>0s=s+'職工號=GETZGH1' en difif len (getxm1>0s=s+'.a nd.'+'姓名=GETXM1'en difif GETRQ1<>/s=s+'.a nd.'+'

19、DTOC(日期=DT0C(GETRQ1' en difif left(s,5='.a nd.'.OR.LEFT(S,5='.AND.'s=subst(s,6en difIF LEN(ALLTRIM(S=0SET FILTER TOELSEset filter to &sENDIFGO TOP姓ON+"的詳細(xì)內(nèi)容"Text2, Text3,Text4,的 Interactivechange 事件代碼也類似，在此省略。 查找記錄command1_Click事件代碼：go n姓名 +" 的記錄內(nèi)容"thisfor

20、m.refreshelseset exact offGETzgh 仁GETrq 仁 if len( getzgh1>0s=s+'職工號=GETZGH1'en difif len (getxm1>0s=s+'.a nd.'+'姓名=GETXM1'en difif GETRQ1<>/s=s+'.a nd.'+'DTOC(日期=DT0C(GETRQ1' en difif left(s,5='.a nd.'.OR.LEFT(S,5='.AND.'s=subst(s,6

21、en difIF LEN(ALLTRIM(S=0SET FILTER TOELSEset filter to &sENDIFGO TOPen dif姓ON+"的詳細(xì)內(nèi)容"刪除記錄command2_Click事件代碼：INOTICE=MESSAGEBC確定刪除指定的記錄嗎？",65,"重要提示"IF INOTICE=1DELETE RECORD RECNO(ANOTICE=MESSAGEBOt定物理刪除指定的記錄嗎？"+CHR(13+一經(jīng)刪除，不能恢復(fù)!",65," 重要提示"IF ANOTICE=

22、1useuse gzbPACKusethisform.releaseENDIFTHISFORM.REFRESHENDIF恢復(fù)記錄command3_Click事件代碼：INOTICE=MESSAGEBO恢復(fù)所有邏輯刪除的記錄嗎？",65,"提示信息"IF INOTICE=1RECALL ALLENDIF自動(dòng)計(jì)算Click事件代碼：with this.pare nt.TXT應(yīng)發(fā)工資.VALUE=.TXT職務(wù)工資.value+.TXT 綜合補(bǔ)貼.value+.TXT 出勤補(bǔ).value+.TXT 交通補(bǔ).value+.TXT 外租房補(bǔ).value+.TXT補(bǔ)發(fā)工資.va

23、lue.TXT合計(jì)扣款.VALUE=.TXT養(yǎng)老保險(xiǎn).value+.TXT公積金.value TXT實(shí)發(fā)工資.VALUE=.TXT應(yīng)發(fā)工資.value-.TXT 合計(jì)扣款.value.TXT實(shí)發(fā)現(xiàn)金.VALUE=.TXT實(shí)發(fā)工資.value-.TXT 所得稅.value實(shí)發(fā)工資.value>800*如果工資高于800,則有所得稅，費(fèi)為5%.TXT 所得稅實(shí)發(fā)工資.value-800*0.05en difen dwith確認(rèn)修改Click事件代碼A=MESSAGEBO確定更改指定的項(xiàng)目嗎？",65,"提示信息"IF A=1 &&選擇確定按鈕時(shí)執(zhí)

24、行replace all職務(wù)工資 WITH 職務(wù)工資 replace all應(yīng)發(fā)工資 WITH 應(yīng)發(fā)工資 replace all實(shí)發(fā)工資 WITH 實(shí)發(fā)工資 replace all 公積金 WITH 公積金 replace all應(yīng)發(fā)工資 WITH 應(yīng)發(fā)工資 replace all實(shí)發(fā)工資 WITH 實(shí)發(fā)工資 replace all養(yǎng)老保險(xiǎn) WITH 養(yǎng)老保險(xiǎn) replace all應(yīng)發(fā)工資 WITH 應(yīng)發(fā)工資 replace all實(shí)發(fā)工資 WITH 實(shí)發(fā)工資 replace all 所得稅 with iif(實(shí)發(fā)工資-800>0,(實(shí)發(fā)工資-800*0.05 ,0replace al

25、l實(shí)發(fā)現(xiàn)金with實(shí)發(fā)工資-所得稅THISFORM.REFRESHENDIF4.8工資統(tǒng)計(jì)表單設(shè)計(jì)本表單用來統(tǒng)計(jì)各項(xiàng)工資的總和以及總的人數(shù)，運(yùn)行結(jié)果，如圖4-8所示圖4-8數(shù)據(jù)統(tǒng)計(jì)模塊開始計(jì)算command1_Click事件代碼：set talk offset filter toCOUNT TO XYZSUM TO A1,A2,A3,A4,A5,A6,A7,A8,A9,A10,A11,A12,A13THISFORM.TX職務(wù)工資.VALUE=A1THISFORM.TX綜合補(bǔ)貼.VALUE=A2THISFORM.TX出勤補(bǔ).VALUE=A3THISFORM.TX交通補(bǔ).VALUE=A4THISF

26、ORM.TX#租房補(bǔ).VALUE=A5THISFORM.TX補(bǔ)發(fā)工資.VALUE=A6THISFORM.TX應(yīng)發(fā)工資.VALUE=A7THISFORM.TX養(yǎng)老保險(xiǎn).VALUE=A8THISFORM.TX公積金.VALUE=A9THISFORM.TX合計(jì)扣款.VALUE=A10THISFORM.TX實(shí)發(fā)工資.VALUE=A11THISFORM.TX所 得稅.VALUE=A12THISFORM.TX實(shí)發(fā)現(xiàn)金.VALUE=A13*THISFORM.REFRESH4.9工資查找表單設(shè)計(jì)該模塊主要功能是實(shí)現(xiàn)對工資信息的查找工作。圖4-9-1查找滿足條件的記錄第二頁面圖4-9-2詳細(xì)內(nèi)容查看詳細(xì)內(nèi)容co

27、mmand1_Click事件代碼：thisform.refresh返回上一頁command1_Click事件代碼：Textl, Text2,Text3, 的Interactivechange事件代碼與修改中也類似，在此省略。4.10工資初始化表單設(shè)計(jì)本模塊是對下個(gè)月的工資記錄進(jìn)行初始化，該表單包括的內(nèi)容如下:圖4-10數(shù)據(jù)初始化初始化command1_Click事件代碼：set path toA="下面要進(jìn)行初始化，將對原來的內(nèi)容進(jìn)行改變，所以一定要先進(jìn)行備份，否則原來的數(shù)據(jù)將丟失，"+chr(13+"進(jìn)行備份嗎?"ino tice=messagebox

28、(A,65,"提示信息"if ino tice=1if file("temptemp.vfp"delete file temptemp.vfpen difcopy to temptemp.vfpreplace all 日期 with date ( thisform.refreshen dif 4.11工資備份表單設(shè)計(jì)本模塊是對本月的工資記錄進(jìn)行備份，該表單包括的內(nèi)容如下:圖4-11數(shù)據(jù)庫備份備份command1_Click事件代碼：copy to &ff4.12記錄打印表單設(shè)計(jì)本表單用來實(shí)現(xiàn)對記錄的打印，共有兩種打印模式：打印工資表和打印工資條。

29、運(yùn) 行結(jié)果如圖4-12所示01 V!：*圖4-12記錄打印表單forml的init事件代碼為：PARAMETERS TJPUBLIC TIAOJIANTIAOJIAN =TJ打印command1_Click事件代碼：xyz=rec no(do casecase thisform.optio ngroup1.value=1 if thisform.optio ngroup2.value=1 report form gzt.frx envi prev else report form gzb.frx envi preven dif case thisform.optio ngroup1.value

30、=2if thisform.optio ngroup2.value=1report form gzt.frx envi prev else report form gzb.frx envi prev en dif case thisform.optio ngroup1.value=3if thisform.optio ngroup2.value=1report form gzt.frx envi prev else report form gzb.frx envi preven dif4.13系統(tǒng)幫助表單設(shè)計(jì)該表單包括的內(nèi)容如下JIX.* F M W! -hl* * tTi S. * Vkta

31、JHl FuMpM"* R « * rj * w *> * # de. ”圖4-13系統(tǒng)幫助4.14相關(guān)報(bào)表工資表工漬«HJ.鋰'* g 鼻科*i髯 *>Vi«*rMtpHBfipBm #4> scE Q* * -MlhBB .tM 阡w>t| 'I '*HlB«M M H* 4H* >H1fe iriIT . |*MSBSEIj1 f4Mrt* fc IHf -*dV w4 Mi * gW1*UH! PH1 腆M"Bi 七. >f4 tMH f| mbnta 9 j Hl

32、W 4w» *-圖 4-14-1工資條斷9«i4* It if f 丁* T ifi*WlAft E#耳*J 1 * r馳MB it qjiIHf -：I4工遷HAwd.J(乂.號'*>| RH «- |W* im 圖4-14-2工資條5主程序的設(shè)計(jì)”，并單擊“新A.在“項(xiàng)目管理器”窗口中，單擊“代碼”選項(xiàng)卡，選擇 建”按鈕，即可創(chuàng)建程序文件。工資主程序的代碼內(nèi)容如下：close allclear allclear scree n=setpath(do form fmread eve nts on shutdow n do On ShutDow n(fun cti on setpath( local Icsys16,lcprogramIcsys16=sys(16Icprogram=substr(lcsys16,at(":"