畢業(yè)設(shè)計（論文）學(xué)校工資管理系統(tǒng)

1、畢業(yè)論文論文題目： 工資管理系統(tǒng) 專 業(yè)： 小學(xué)信息技術(shù)教育 班 級： 09大專計信班 學(xué)生姓名： 指導(dǎo)教師： 二一一 年 十 月 十三 日目 錄摘 要 3引 言41 、 系統(tǒng)設(shè)計使用的工具、環(huán)境簡介 51.1 vfp的簡介51.2 vfp的基本功能51.3 vfp的特點52 、 系統(tǒng)分析62.1 設(shè)計目標(biāo)和任務(wù)62.2 可行性分析62.3 需求分析73 、學(xué)校工資管理系統(tǒng)功能模塊圖74 、 主要功能模塊設(shè)計84.1 項目的建立84.2 用戶登陸84.3 系統(tǒng)主菜單設(shè)計94.4 系統(tǒng)主控表單設(shè)計104.5 工資錄入表單設(shè)計114.6 工資瀏覽表單設(shè)計124.7 工資修改表單設(shè)計124.8 工資

2、統(tǒng)計表單設(shè)計184.9 工資查找表單設(shè)計194.10 工資初始化表單設(shè)計204.11 工資備份表單設(shè)計214.12 記錄打印表單設(shè)計224.13 系統(tǒng)幫助表單設(shè)計234.14 相關(guān)報表235 、主程序的設(shè)計246 、 程序的連編257 、系統(tǒng)運(yùn)行的效果25附錄a 數(shù)據(jù)庫相關(guān)數(shù)據(jù)表26參考文獻(xiàn)27致謝28學(xué)校工資管理系統(tǒng)【摘 要】學(xué)校的工資管理是學(xué)校管理的一個重要內(nèi)容。隨著教職員工數(shù)量增加，學(xué)校的工資管理工作也變得越來越復(fù)雜。工資管理既涉及到學(xué)校勞動人事的管理，同時也是學(xué)校財務(wù)管理的重要組成部分。工資管理需要和人事管理相聯(lián)系，同時連接工時考勤和醫(yī)療保險等等，來生成學(xué)校每個職工的基本工資、補(bǔ)貼、醫(yī)

3、療保險、保險費(fèi)、實際發(fā)放工資等。早期的工資統(tǒng)計和發(fā)放都是使用人工方式處理紙質(zhì)材料，不僅花費(fèi)財務(wù)人員大量的時間且不易保存，往往由于個人的因素抄寫不慎或計算疏忽，出現(xiàn)工資發(fā)放錯誤的現(xiàn)象。早期工資管理都采取紙質(zhì)材料和具有較強(qiáng)的時間限制。基于以上原因，學(xué)校工資管理系統(tǒng)使用電腦安全保存、快速計算、全面統(tǒng)計，實現(xiàn)工資管理的系統(tǒng)化、規(guī)范化、自動化。本學(xué)校工資管理系統(tǒng)極大提高了工作效率，節(jié)省了人力和物力，最終滿足學(xué)校財務(wù)管理、員工工資發(fā)放的需要，同時也成為現(xiàn)代化學(xué)校管理的標(biāo)志?！娟P(guān)鍵詞】工資管理 財務(wù)管理 系統(tǒng)化 規(guī)范化 自動引 言 隨著社會的進(jìn)步和計算機(jī)技術(shù)的發(fā)展，特別是微型計算機(jī)的大范圍普及，計算機(jī)的應(yīng)用

4、逐漸由科學(xué)計算、實時控制等方面向非數(shù)值處理的各個領(lǐng)域中滲透。尤其是以微型計算機(jī)為處理核心，以數(shù)據(jù)庫管理系統(tǒng)為開發(fā)環(huán)境的管理系統(tǒng)在辦公室自動化以及商業(yè)信息管理等方面的應(yīng)用，日益受到人們的關(guān)注。當(dāng)今時代是飛速發(fā)展的信息時代。在各行各業(yè)中離不開信息處理，這正是計算機(jī)被廣泛應(yīng)用于信息管理系統(tǒng)的環(huán)境。計算機(jī)的最大好處在于利用它能夠進(jìn)行信息管理。使用計算機(jī)進(jìn)行信息控制，不僅提高了工作效率，而且大大的提高了其安全性。隨著社會信息量的迅速增長，計算機(jī)處理的數(shù)據(jù)量不斷增加。文件管理系統(tǒng)采用的一次最多存取一個記錄的訪問方式，以及在不同文件之間缺乏相互聯(lián)系的結(jié)構(gòu)，越來越不能適應(yīng)管理大量數(shù)據(jù)的需要，于是數(shù)據(jù)庫管理系統(tǒng)

5、便應(yīng)運(yùn)而生。數(shù)據(jù)庫管理系統(tǒng)是用來控制建立數(shù)據(jù)庫中的數(shù)據(jù)、數(shù)據(jù)的存取，并維護(hù)數(shù)據(jù)庫的數(shù)據(jù)。從文件管理到數(shù)據(jù)庫管理，代表了兩代不同的數(shù)據(jù)管理技術(shù)。今天，數(shù)據(jù)庫管理已成為計算機(jī)信息管理的主要方式。數(shù)據(jù)庫的應(yīng)用非常廣泛，可應(yīng)用于各行各業(yè)。尤其目前電腦發(fā)展神速，運(yùn)用廣泛，甚至每個公司、每戶都有電腦，只要是稍復(fù)雜的數(shù)據(jù)，都可制作成數(shù)據(jù)庫，交由電腦來管理。用電腦管理數(shù)據(jù)，可免除人為的疏忽，并且運(yùn)算速度快，可靠性提高。學(xué)校工資管理是一項瑣碎、復(fù)雜而又十分細(xì)致的工作，一般不允許發(fā)生差錯。最初的工資統(tǒng)計和發(fā)放都是使用人工方式處理，工作量大的時候，出現(xiàn)錯誤的機(jī)率也隨之升高，不僅花費(fèi)財務(wù)人員大量的時間，而且往往由于抄

6、寫不慎，或者由于計算的疏忽，出現(xiàn)工資發(fā)放錯誤的現(xiàn)象。同時工資的發(fā)放具有較強(qiáng)的時間限制，必須嚴(yán)格按照單位規(guī)定的時間完成計算和發(fā)放工作。久而久之，這種人工處理方式無論是在效率，還是正確性方面都達(dá)不到需求。經(jīng)常性的出錯已經(jīng)給學(xué)校帶來了諸多的不便。正是學(xué)校工資管理的這種重復(fù)性、規(guī)律性、時間性，使得學(xué)校工資管理計算機(jī)化成為可能。學(xué)校工資管理系統(tǒng)就是使用電腦代替大量的人工統(tǒng)計和計算，完成眾多學(xué)校工資信息的處理，同時使用電腦還可以安全地、完整地保存大量的學(xué)校工資記錄。1 、系統(tǒng)設(shè)計使用的工具、環(huán)境簡介系統(tǒng)設(shè)計使用的工具主要有visual foxpro 6.0 ， 現(xiàn)簡介如下。1.1 vfp的簡介visual

7、 foxpro 6.0 是由美國microsoft 公司于1998年推出的新一代數(shù)據(jù)庫軟件系統(tǒng)。visual foxpro 數(shù)據(jù)庫是一個關(guān)系型數(shù)據(jù)庫，主要用于windows環(huán)境。由于visual foxpro 需要很少編程就可以建立一個面向?qū)ο蟮臄?shù)據(jù)庫應(yīng)用程序，所以在眾多的數(shù)據(jù)庫軟件中，visual foxpro 拖穎而出，成為一種通用的數(shù)據(jù)庫軟件。利用visual foxpro 可以設(shè)計出豐富多彩的用戶界面，在用戶界面中可以放置各種控制部件，如命令按鈕，圖形，圖片，圖表等，從而設(shè)計出完全圖形化的界面，方便用戶操作和使用。1.2 vfp的基本功能1) 可以為每一種類型的信息創(chuàng)建一個表，利用表存

8、儲相應(yīng)的信息。2) 可以定義各個表之間的關(guān)系，從而很容易地將各個表中相關(guān)的數(shù)據(jù)有機(jī)地聯(lián)系在一起。3) 可以創(chuàng)建查詢搜索那些滿足指定條件的記錄，也可以根據(jù)需要對這些記錄排序和分組，并根據(jù)查詢結(jié)果創(chuàng)建報表、表及圖表。4) 使用視圖，可以從一個或多個相關(guān)聯(lián)的表中，按一定條件抽取一系列數(shù)據(jù)，并可以通過視圖更新這些表中的數(shù)據(jù)。5) 可以創(chuàng)建表單來直接查看和管理表中的數(shù)據(jù)。6) 可以創(chuàng)建一個報表來分析數(shù)據(jù)或?qū)?shù)據(jù)以特定的方式打印出來。1.3 vfp的特點與其他數(shù)據(jù)庫不同，vfp在實現(xiàn)上述功能時提供了各種向?qū)?，用戶在操作時，只需按照向?qū)峁┑牟襟E執(zhí)行，使用起來非常方便。1） 易于使用2） 可視化開發(fā)3）

9、事件驅(qū)動4） 面向?qū)ο缶幊?） 應(yīng)用向?qū)Ш蜕善?） 組件庫7） vfp基礎(chǔ)類8） 活動文檔9） 對動態(tài)圖形文件的支持10） 程序語言的增強(qiáng)11） 支持ole拖放12） 新增和改進(jìn)的生成器和編譯器2 、系統(tǒng)分析2.1 設(shè)計目標(biāo)和任務(wù)2.1.1 目標(biāo) 學(xué)校工資管理系統(tǒng)使用電腦安全保存、快速計算、全面統(tǒng)計，實現(xiàn)工資管理的系統(tǒng)化、規(guī)范化、自動化。本學(xué)校工資管理系統(tǒng)極大提高了工作效率，節(jié)省了人力和物力，最終滿足學(xué)校財務(wù)管理、員工工資發(fā)放的需要，同時也成為現(xiàn)代化學(xué)校管理的標(biāo)志通過此系統(tǒng)，實現(xiàn)工資管理的完全信息化和數(shù)字化。2.1.2 任務(wù)為了加快學(xué)校自動化的步伐，建立工資管理系統(tǒng)，盡可能地減少工資管理的復(fù)

10、雜性和低效性。運(yùn)用數(shù)據(jù)庫、vfp等相關(guān)知識來編寫系統(tǒng)，系統(tǒng)的開發(fā)包括系統(tǒng)分析、需求設(shè)計、各功能模塊的開發(fā)及代碼設(shè)計。系統(tǒng)應(yīng)具備基本的信息輸入、修改、查詢、統(tǒng)計及結(jié)果的輸出。2.2 可行性分析 以下從三個方面對學(xué)校工資管理系統(tǒng)進(jìn)行可行性分析：技術(shù)可行性、經(jīng)濟(jì)可行性、操作可行性。 技術(shù)可行性 為了確定現(xiàn)有技術(shù)能否實現(xiàn)目標(biāo)系統(tǒng)。vfp 6.0 自帶的工具和控件，完全可以實現(xiàn)本系統(tǒng)要求達(dá)到的各種功能。 經(jīng)濟(jì)可行性為了確定待開發(fā)的系統(tǒng)的經(jīng)濟(jì)效益能否超過開發(fā)成本。學(xué)校工資管理系統(tǒng)是一個不會直接產(chǎn)生經(jīng)濟(jì)效益的投資，但是能夠節(jié)省人員資源的消耗和浪費(fèi)，從而節(jié)約成本，提高效率。從成本效益角度來觀察，這個系統(tǒng)的開發(fā)

11、成本不是很高，在使用后，能夠起到的作用也是十分可觀的。 操作可行性學(xué)校工資管理系統(tǒng)是基于vfp 6.0平臺開發(fā)的，vfp系列是被廣泛應(yīng)用于數(shù)據(jù)庫開發(fā)和操作的一套成熟的軟件平臺，而且它對于一個小型的數(shù)據(jù)庫處理具有不可比擬的優(yōu)點和簡單方便。所以叢操作可行性方面是可行的。開發(fā)出來的界面也是十分容易使用，具有簡單，容易上手的特點。所以從上面三點出發(fā)，可以確定系統(tǒng)分析是可行的。2.3 需求分析2.3.1 總體需求1.建立對學(xué)校教職員工工資全面管理的信息系統(tǒng)；2.對所有的教職工提供全面管理;3.對系統(tǒng)的安全提供全面管理；4.對職工信息的添加、刪除提供全面管理；2.3.2 功能需求（1） 對工資記錄進(jìn)行錄入

12、。（2） 對工資信息進(jìn)行查找。（3） 對多個工資記錄進(jìn)行瀏覽。（4） 對記錄進(jìn)行滿足各種實際需要的修改。（5） 對各項工資的總和和總的人數(shù)進(jìn)行統(tǒng)計。（6） 對記錄進(jìn)行打印。3 、 學(xué)校工資管理系統(tǒng)功能模塊圖登錄窗口系統(tǒng)主窗口工資記錄瀏覽工資記錄統(tǒng)計工資記錄查詢工資記錄修改工資記錄錄入退出系統(tǒng)工資記錄管理理gj 理理編輯菜單記錄打印退出系統(tǒng)圖3-1學(xué)校工資管理系統(tǒng)功能模塊圖4 主要功能模塊設(shè)計4.1 項目的建立a在硬盤上建一個目錄b啟動vfp系統(tǒng)，在“項目管理器”窗口中建立一個項目，項目的名稱為“工資管理系統(tǒng)”，保存到新建的目錄中，如圖4-1所示。圖4-1項目的建立4.2 用戶登陸為了保證應(yīng)用程

13、序的安全，通常要設(shè)計系統(tǒng)登錄表單驗證用戶是否合法。只有合法的用戶才可進(jìn)入系統(tǒng)。本模塊是系統(tǒng)的封面表單，運(yùn)行時將通過此表單調(diào)用主控模塊，進(jìn)而管理整個工資管理系統(tǒng)。系統(tǒng)登錄模塊運(yùn)行結(jié)果。如圖4-2所示。圖4-2用戶登陸28 表單的設(shè)計表單form的屬性autocenter 改為：.t.-真（運(yùn)行時居中） borderstyle 改為：2-固定對話框（禁止更改表單大?。﹕howtips 改為：.t. 真（指定表單上的控件等是否顯示提示信息）showwindow 改為 ：2-作為頂層表單在表單的 form_load 事件下添加如下代碼：public username(2)username(1)=超級用

14、戶username(2)=普通用戶登陸系統(tǒng)command1_click事件代碼：store to myuser,p1,p2,p3myuser=thisform.combo1.valuep1=alltrim(thisform.text1.value)p2=left(alltrim(time(),2)+substr(alltrim(time(),4,2)p3=alltrim(str(year(date()if myuser=username(1) if p1=p3 thisform.release do form gzgl else =messagebox(超級用戶密碼錯誤,請再試一遍!,65,提

15、示信息) endifelse if p1=p2 thisform.release do form gzgl else =messagebox(普通用戶密碼錯誤,請再試一遍!,65,提示信息) endifendif4.3 系統(tǒng)主菜單設(shè)計a 在“項目管理器”窗口中，選擇“其他”選項卡b 在“其他”選項卡中，選擇“菜單”，“新建”，“菜單”，系統(tǒng)進(jìn)入“菜單設(shè)計器”窗口，如圖4-3所示。圖4-3系統(tǒng)菜單設(shè)計器退出過程相應(yīng)代碼：byebye=messagebox(真的要退出系統(tǒng)嗎?,64+1,提示信息)if byebye=1 close all clear events quit endif要注意的是，

16、要在設(shè)計菜單結(jié)束后，選擇主菜單上的“顯示”菜單下的“常規(guī)選項”命令，再選擇頂層表單復(fù)選框。然后保存文件，再選擇生成菜單選項。4.4 系統(tǒng)主控表單設(shè)計主控表單用來調(diào)用系統(tǒng)菜單，以形成對整個工資管理系統(tǒng)的控制與管理。運(yùn)行結(jié)果。如圖4-4所示。圖4-4系統(tǒng)主控表單本表單form的屬性需做相應(yīng)設(shè)置：show window=2windowstate=2showtips=.t.form 表單中的load事件代碼為do xtcd.mpr with this ,.t.4.5 工資錄入表單設(shè)計工資錄入模塊是用來錄入工資記錄的，在具體操作時有些數(shù)據(jù)需要自動生成。運(yùn)行結(jié)果，如圖4-5所示。圖4-5工資錄入表form

17、1表單的屬性如下：autocenter=.t.showwindow=1相應(yīng)事件代碼設(shè)置：txt應(yīng)發(fā)工資的 click 和gotfocus的代碼如下：with this.parentthis.value=.txt職務(wù)工資.value+.txt綜合補(bǔ)貼.value+.txt出勤補(bǔ).value+.txt交通補(bǔ).value+.txt外租房補(bǔ).value+.txt補(bǔ)發(fā)工資.valueendwithtxt合計扣款的 click 和gotfocus的代碼如下：with this.parentthis.value=.txt養(yǎng)老保險.value+.txt公積金.valueendwithtxt實發(fā)工資的 clic

18、k 和gotfocus的代碼如下：with this.parent this.value=.txt應(yīng)發(fā)工資.value-.txt合計扣款.value endwithtxt 所得稅、txt實發(fā)現(xiàn)金的代碼與其類似略去。各個按鈕的功能比較簡單，在此略去。4.6 工資瀏覽表單設(shè)計本表單用來對多個記錄進(jìn)行瀏覽，運(yùn)行結(jié)果，如圖4-6所示。圖4-6工資瀏覽此表單功能較簡單，其中所用控件代碼，在此省略。4.7 工資修改表單設(shè)計此表單由頁框控件組成，該頁框由四個頁面組成。第一個頁面：對查找滿足條件的記錄進(jìn)行修改圖4-7-1對滿足條件的記錄修改第二個頁面：將已查找的記錄顯示在屏幕上，進(jìn)行修改，即單個記錄的修改圖4

19、-7-2對已找到的記錄進(jìn)行修改第三個頁面：批量修改已滿足條件的記錄，也可以修改某一字段的內(nèi)容。圖4-7-3批量修改第四個頁面：瀏覽式修改記錄，在列表框中選擇一個記錄，在屏幕上顯示選定記錄的內(nèi)容，可以修改記錄。圖4-7-4瀏覽式修改text1_interactivechange事件代碼：set exact offgetzgh1=alltrim(thisform.pageframe1.page1.text1.value)getxm1=alltrim(thisform.pageframe1.page1.text2.value)getrq1=thisform.pageframe1.page1.text

20、3.values=if len(getzgh1)0 s=s+職工號=getzgh1endifif len(getxm1)0 s=s+.and.+姓名=getxm1endifif getrq1/ s=s+.and.+dtoc(日期)=dtoc(getrq1)endifif left(s,5)=.and.or.left(s,5)=.and. s=subst(s,6)endifif len(alltrim(s)=0 set filter to else set filter to &s endifgo topthisform.pageframe1.page2.caption=姓名+的詳細(xì)內(nèi)容this

21、form.pageframe1.page1.refreshthisform.pageframe1.page2.refreshtext2, text3,text4,的interactivechange事件代碼也類似，在此省略。查找記錄command1_click事件代碼：if not empty(thisform.pageframe1.page1.text4.value) n=val(alltrim(thisform.pageframe1.page1.text4.value) go n thisform.pageframe1.page2.setfocus thisform.pageframe1.

22、page2.caption=姓名+ 的記錄內(nèi)容 thisform.refreshelse set exact offgetzgh1=alltrim(thisform.pageframe1.page1.text1.value)getxm1=alltrim(thisform.pageframe1.page1.text2.value)getrq1=thisform.pageframe1.page1.text3.values=if len(getzgh1)0 s=s+職工號=getzgh1endifif len(getxm1)0 s=s+.and.+姓名=getxm1endifif getrq1/ s

23、=s+.and.+dtoc(日期)=dtoc(getrq1)endifif left(s,5)=.and.or.left(s,5)=.and. s=subst(s,6)endifif len(alltrim(s)=0 set filter to else set filter to &s endifgo topendifthisform.pageframe1.page2.caption=姓名+的詳細(xì)內(nèi)容thisform.pageframe1.page1.refreshthisform.pageframe1.page2.refresh刪除記錄command2_click事件代碼：inotice=

24、messagebox(確定刪除指定的記錄嗎?,65,重要提示)if inotice=1 delete record recno() anotice=messagebox(確定物理刪除指定的記錄嗎?+chr(13)+一經(jīng)刪除,不能恢復(fù)!,65,重要提示) if anotice=1 use use gzb pack use thisform.release endif thisform.refreshendif恢復(fù)記錄command3_click事件代碼：inotice=messagebox(恢復(fù)所有邏輯刪除的記錄嗎?,65,提示信息)if inotice=1 recall allendif自動計

25、算click事件代碼：with this.parent.txt應(yīng)發(fā)工資.value=.txt職務(wù)工資.value+.txt綜合補(bǔ)貼.value+.txt出勤補(bǔ).value+.txt交通補(bǔ).value+.txt外租房補(bǔ).value+.txt補(bǔ)發(fā)工資.value.txt合計扣款.value=.txt養(yǎng)老保險.value+.txt公積金.value.txt實發(fā)工資.value=.txt應(yīng)發(fā)工資.value-.txt合計扣款.value.txt實發(fā)現(xiàn)金.value=.txt實發(fā)工資.value-.txt所得稅.value if this.parent.txt實發(fā)工資.value800*如果工資高于80

26、0，則有所得稅，費(fèi)為5%.txt所得稅.value=(this.parent.txt實發(fā)工資.value-800)*0.05endifendwith確認(rèn)修改click事件代碼a=messagebox(確定更改指定的項目嗎?,65,提示信息)if a=1 &選擇確定按鈕時執(zhí)行 replace all 職務(wù)工資 with 職務(wù)工資+this.parent.text4.value replace all 應(yīng)發(fā)工資 with 應(yīng)發(fā)工資+this.parent.text4.value replace all 實發(fā)工資 with 實發(fā)工資+this.parent.text4.value replace a

27、ll 公積金 with 公積金+this.parent.text5.value replace all 應(yīng)發(fā)工資 with 應(yīng)發(fā)工資+this.parent.text5.value replace all 實發(fā)工資 with 實發(fā)工資+this.parent.text5.value replace all 養(yǎng)老保險 with 養(yǎng)老保險+this.parent.text6.value replace all 應(yīng)發(fā)工資 with 應(yīng)發(fā)工資+this.parent.text6.value replace all 實發(fā)工資 with 實發(fā)工資+this.parent.text6.value repla

28、ce all 所得稅 with iif(實發(fā)工資-8000,(實發(fā)工資-800)*0.05 ,0) replace all 實發(fā)現(xiàn)金 with 實發(fā)工資- 所得稅 this.parent.text4.value=0 this.parent.text5.value=0 this.parent.text6.value=0 thisform.refreshendif4.8 工資統(tǒng)計表單設(shè)計本表單用來統(tǒng)計各項工資的總和以及總的人數(shù)，運(yùn)行結(jié)果，如圖4-8所示。圖4-8數(shù)據(jù)統(tǒng)計模塊開始計算command1_click事件代碼：set talk offset filter tocount to xyzsum

29、 to a1,a2,a3,a4,a5,a6,a7,a8,a9,a10,a11,a12,a13thisform.txt職務(wù)工資.value=a1thisform.txt綜合補(bǔ)貼.value=a2thisform.txt出勤補(bǔ).value=a3thisform.txt交通補(bǔ).value=a4thisform.txt外租房補(bǔ).value=a5thisform.txt補(bǔ)發(fā)工資.value=a6thisform.txt應(yīng)發(fā)工資.value=a7thisform.txt養(yǎng)老保險.value=a8thisform.txt公積金.value=a9thisform.txt合計扣款.value=a10thisfo

30、rm.txt實發(fā)工資.value=a11thisform.txt所得稅.value=a12thisform.txt實發(fā)現(xiàn)金.value=a13thisform.text1.value=xyz*thisform.refresh4.9 工資查找表單設(shè)計該模塊主要功能是實現(xiàn)對工資信息的查找工作。圖4-9-1查找滿足條件的記錄第二頁面圖4-9-2詳細(xì)內(nèi)容查看詳細(xì)內(nèi)容command1_click事件代碼：thisform.pageframe1.page2.setfocusthisform.refresh返回上一頁command1_click事件代碼：thisform.pageframe1.page1.s

31、etfocusthisform.pageframe1.page1.refreshtext1, text2,text3,的interactivechange事件代碼與修改中也類似，在此省略。4.10 工資初始化表單設(shè)計本模塊是對下個月的工資記錄進(jìn)行初始化，該表單包括的內(nèi)容如下：圖4-10數(shù)據(jù)初始化初始化command1_click事件代碼：set path to a=下面要進(jìn)行初始化,將對原來的內(nèi)容進(jìn)行改變,所以一定要先進(jìn)行備份,否則原來的數(shù)據(jù)將丟失,+chr(13)+進(jìn)行備份嗎?inotice=messagebox(a,65,提示信息)if inotice=1if file(temptemp.

32、vfp)delete file temptemp.vfpendifcopy to temptemp.vfpreplace all 日期 with date ()thisform.refreshendif4.11 工資備份表單設(shè)計本模塊是對本月的工資記錄進(jìn)行備份，該表單包括的內(nèi)容如下：圖4-11數(shù)據(jù)庫備份備份command1_click事件代碼：ff=alltrim(thisform.text1.value)copy to &ff4.12 記錄打印表單設(shè)計本表單用來實現(xiàn)對記錄的打印，共有兩種打印模式：打印工資表和打印工資條。運(yùn)行結(jié)果如圖4-12所示。圖4-12記錄打印表單form1的init事件

33、代碼為：parameters tjpublic tiaojiantiaojian =tj打印command1_click事件代碼：xyz=recno()do case case thisform.optiongroup1.value=1 if thisform.optiongroup2.value=1 report form gzt.frx envi prev else report form gzb.frx envi prev endif case thisform.optiongroup1.value=2 if thisform.optiongroup2.value=1 report fo

34、rm gzt.frx envi prev else report form gzb.frx envi prev endif case thisform.optiongroup1.value=3 if thisform.optiongroup2.value=1 report form gzt.frx envi prev else report form gzb.frx envi prev endif4.13 系統(tǒng)幫助表單設(shè)計該表單包括的內(nèi)容如下圖4-13系統(tǒng)幫助4.14 相關(guān)報表工資表圖4-14-1工資條圖4-14-2工資條5 主程序的設(shè)計a在“項目管理器”窗口中，單擊“代碼”選項卡，選擇“程序”，并單擊“新建”按鈕，即可創(chuàng)建程序文件。 工資主程序的代碼內(nèi)容如下：close allclear allclear screen=setpath()do form fmread eventso