公司財務(wù)管理系統(tǒng)-畢業(yè)論文_第1頁
公司財務(wù)管理系統(tǒng)-畢業(yè)論文_第2頁
公司財務(wù)管理系統(tǒng)-畢業(yè)論文_第3頁
公司財務(wù)管理系統(tǒng)-畢業(yè)論文_第4頁
公司財務(wù)管理系統(tǒng)-畢業(yè)論文_第5頁
已閱讀5頁,還剩19頁未讀, 繼續(xù)免費閱讀

下載本文檔

版權(quán)說明:本文檔由用戶提供并上傳,收益歸屬內(nèi)容提供方,若內(nèi)容存在侵權(quán),請進(jìn)行舉報或認(rèn)領(lǐng)

文檔簡介

本科畢業(yè)論文(2017屆)題目:公司財務(wù)管理系統(tǒng)學(xué)位論文原創(chuàng)性聲明茲呈交的學(xué)位論文,是本人在指導(dǎo)老師指導(dǎo)下獨立完成的研究成果。本人在論文寫作中參考的其他個人或集體的研究成果,均在文中以明確方式標(biāo)明。本人依法享有和承擔(dān)由此論文而產(chǎn)生的權(quán)利和責(zé)任。聲明人(簽名):年月日公司財務(wù)管理系統(tǒng)……摘要.…………《財務(wù)管理系統(tǒng)》顧名思義,是一個公司財務(wù)管理的軟件,在很久以前,一般對財務(wù)的管理都是通過賬本的記錄,這是古代人使用的方法,而對于現(xiàn)在二十一世紀(jì)來說這肯定滿足不了現(xiàn)代人的需求了,在我們?nèi)祟惏l(fā)明了計算機(jī)之后,我們發(fā)現(xiàn)可以通過用計算機(jī)來記錄數(shù)據(jù),這在當(dāng)時是比較麻煩的,后來我們發(fā)現(xiàn)我們可以通過計算機(jī)語言編輯一個軟件,讓這個軟件來完成我們想要的數(shù)據(jù)記錄。通過這個軟件我們可以很容易的對公司的財務(wù)進(jìn)行比較好的管理。因此我自己設(shè)計了一個比較簡單的軟件,用來作為公司的管理系統(tǒng),此系統(tǒng)主要是對該公司的每位員工每個月的工資情況進(jìn)行統(tǒng)計,此系統(tǒng)只有管理員可以登錄,管理員登錄賬號后,就可以對該公司員工的工資情況進(jìn)行增刪改查。此系統(tǒng)實現(xiàn)了公司財務(wù)管理的基本功能,可以很好的為公司的財務(wù)管理工作,加強(qiáng)了公司的管理,并節(jié)約大量的人力物力?!⑽恼?Financialmanagementsystem"asthenameimplies,isafinancialmanagementsoftware,inalongtimeago,thegeneralfinancialmanagementisthroughtherecordbooks,thisistheancientsusedmethod,butfornowthe21stcenturyitdefinitelycan'tsatisfytheneedsofmodernpeople,afterwehumanbeingsinventedthecomputer,wecanfoundthatbyusingthecomputertorecorddata,thisisthetroubleatthattime,thenwefoundwecanbyeditingasoftware,computerlanguagetodowewanttomakethesoftwareofdatarecords.Withthissoftware,wecaneasilymanagethecompany'sfinanceswell.SoIdevisedasimplesoftware,usedasthecompany'smanagementsystem,thissystemismainlyforthecompanyeachemployeeeachmonth'ssalarysituation,onlytheadministratorcanloginthesystem,theadministratorloginaccountafter,canthesalaryofemployeesofthecompanytoaddanddelete.Thissystemrealizedthebasicfunctionoffinancialmanagement,canverygoodworkforthecompany'sfinancialmanagement,tostrengthenthemanagementofthecompany,andsavealotofmanpowermaterialresources.……前言…………一、VisualBasic是什么?VisualBasic,簡稱VB,是Microsoft公司推出的一種Windows應(yīng)用程序開發(fā)工具。是當(dāng)今世界上使用最廣泛的編程語言之一,它也被公認(rèn)為是編程效率最高的一種編程方法。無論是開發(fā)功能強(qiáng)大、性能可靠的商務(wù)軟件,還是編寫能處理實際問題的實用小程序,VB都是最快速、最簡便的方法。何謂VisualBasic?“Visual”指的是采用可視化的開發(fā)圖形用戶界面(GUI)的方法,一般不需要編寫大量代碼去描述界面元素的外觀和位置,而只要把需要的控件拖放到屏幕上的相應(yīng)位置即可;“Basic”指的是BASIC語言,因為VB是在原有的BASIC語言的基礎(chǔ)上發(fā)展起來的,至今包含了數(shù)百條語句、函數(shù)及關(guān)鍵詞,其中很多和WindowsGUI有直接關(guān)系。專業(yè)人員可以用VisualBasic實現(xiàn)其它任何Windows編程語言的功能,而初學(xué)者只要掌握幾個關(guān)鍵詞就可以建立實用的應(yīng)用程序。VB提供了學(xué)習(xí)版、專業(yè)版和企業(yè)版,用以滿足不同的開發(fā)需要。學(xué)習(xí)版使編程人員很容易地開發(fā)Windows和WindowsNT的應(yīng)用程序;專業(yè)版為專業(yè)編程人員提供了功能完備的開發(fā)工具;企業(yè)版允許專業(yè)人員以小組的形式來創(chuàng)建強(qiáng)健的分布式應(yīng)用程序。二、能用VisualBasic干什么呢?也許應(yīng)該問不能用它干什么更恰當(dāng)一些。答案是:沒有什么不能干的!VisualBasic所做的很多事情一點也不簡單。它是一種強(qiáng)大的語言,即您所能想到的編程任務(wù),它基本都能完成。從設(shè)計新型的用戶界面到利用其它應(yīng)用程序的對象;從處理文字圖象到使用數(shù)據(jù)庫;從開發(fā)個人或小組使用的小工具,到大型企業(yè)應(yīng)用系統(tǒng),甚至通過Internet的遍及全球分布式應(yīng)用程序,都可在VisualBasic提供的工具中各取所需。VB是微軟公司的一種通用程序設(shè)計語言,包含在MicrosoftExcel、MicrosoftAccess等眾多Windows應(yīng)用軟件種的VBA都使用VB語言,以供用戶二次開發(fā);目前制作網(wǎng)頁使用較多的VBScript腳本語言也是VB的子集。利用VB的數(shù)據(jù)訪問特性,用戶可以對包括MicrosoftSQLServer和其他企業(yè)數(shù)據(jù)庫在內(nèi)的大部分?jǐn)?shù)據(jù)庫格式創(chuàng)建數(shù)據(jù)庫和前端應(yīng)用程序,以及可調(diào)整的服務(wù)器端部件。利用ActiveX(TM)技術(shù),VB可使用如MicrosoftWord、MicrosoftExcel及其他Windows應(yīng)用程序提供的功能,甚至可直接使用VB專業(yè)版和企業(yè)版創(chuàng)建的應(yīng)用程序?qū)ο?。VB語言的主要特點可視化的設(shè)計平臺傳統(tǒng)程序設(shè)計語言編程時,需要通過編程計算來設(shè)計程序界面,在設(shè)計過程中看不到程序的實際顯示效果,必須在運(yùn)行程序的時候才能觀察。如果對程序的界面不滿意,還要回到程序中去修改,這一過程常常需要反復(fù)多次,大大影響了編程的效率。VB提供的可視化的設(shè)計平臺,把Windows界面設(shè)計的復(fù)雜性“封裝”起來。程序員不必再為界面的設(shè)計而編寫大量的程序代碼,只需按設(shè)計的要求,用系統(tǒng)提供的工具在屏幕上“畫出”各種對象,VB自動產(chǎn)生界面設(shè)計代碼,程序員所需要編寫的只是實現(xiàn)程序功能的那部分代碼,從而大大提高了編程的效率面向?qū)ο蟮脑O(shè)計方法VB采用面向?qū)ο蟮木幊谭椒ǎ∣bjectOrientedProgramming),把程序和數(shù)據(jù)封裝起來作為一個對象,并為每個對象賦予相應(yīng)的屬性。在設(shè)計對象時,不必編寫建立和描述每個對象的程序代碼,而是用工具“畫”在界面上,由VB自動生成對象的程序代碼并封裝起來。事件驅(qū)動的編程機(jī)制VB通過事件來執(zhí)行對象的操作。在設(shè)計應(yīng)用程序的時候,不必建立具有明顯開始和結(jié)束的程序,而是編寫若干個微小的子程序,即過程。這些過程分別面向不同的對象,由用戶操作引發(fā)某個事件來驅(qū)動完成某種特定的功能,或由事件驅(qū)動程序調(diào)用通用過程來執(zhí)行指定的操作。結(jié)構(gòu)化的設(shè)計語言VB是在結(jié)構(gòu)化的BASIC語言基礎(chǔ)上發(fā)展起來的,加上了面向?qū)ο蟮脑O(shè)計方法,因此是更出色的結(jié)構(gòu)化程序設(shè)計語言充分利用Windows資源VB提供的動態(tài)數(shù)據(jù)交換(DynamicDataExchange)編程技術(shù),可以在應(yīng)用中實現(xiàn)與其它Windows應(yīng)用程序建立動態(tài)數(shù)據(jù)庫交換和在不同的應(yīng)用程序之間進(jìn)行通信的功能。開放的數(shù)據(jù)庫功能與網(wǎng)絡(luò)支持VB具有很強(qiáng)的數(shù)據(jù)庫管理功能,不僅可以管理MSAccess格式的數(shù)據(jù)庫,還能訪問其它外部數(shù)據(jù)庫,如FoxPro、Paradox等格式的數(shù)據(jù)庫。另外,VB還提供了開放式數(shù)據(jù)連接(OpenDataBaseConnectivity)功能,可以通過直接訪問或建立連接的方式使用并操作后臺大型網(wǎng)絡(luò)數(shù)據(jù)庫,如SQLSever、Oracle等。目錄一緒論...........................................................1.1課題簡介...................................................1.2開發(fā)的意義.................................................二開發(fā)環(huán)境與開發(fā)工具的介紹........................................2.1開發(fā)環(huán)境...................................................2.2開發(fā)工具的簡介.............................................三系統(tǒng)設(shè)計.......................................................3.1概要設(shè)計..................................................3.1.1概要設(shè)計階段的主要任務(wù)..................................3.1.2概要設(shè)計的過程..........................................3.1.3概要設(shè)計的原則..........................................3.1.4系統(tǒng)功能分析............................................四數(shù)據(jù)庫設(shè)計........................................................4.1數(shù)據(jù)庫Access簡介.............................................4.2數(shù)據(jù)庫需求分析...............................................4.3表的詳細(xì)結(jié)構(gòu)說明.............................................4.4測試用例.....................................................五詳細(xì)設(shè)計.........................................................5.1系統(tǒng)登錄模塊的設(shè)計與實現(xiàn)....................................5.2主界面的設(shè)計與實現(xiàn)..........................................5.3工資管理系統(tǒng)設(shè)計與實現(xiàn)......................................5.4用戶管理的設(shè)計與實現(xiàn)........................................六系統(tǒng)使用與說明..................................................6.1使用說明....................................................6.2運(yùn)行環(huán)境....................................................結(jié)束語...............................................................致謝................................................................參考文獻(xiàn)...........................................................第一章緒論1.1課題簡介財務(wù)管理系統(tǒng)是每一個單位管理財務(wù)收入和支出的不可缺少的一個管理信息系統(tǒng),它的內(nèi)容對企業(yè)財務(wù)計劃,財務(wù)控制,財務(wù)監(jiān)督,財務(wù)運(yùn)用等方面都起著巨大的作用。如何發(fā)揮財務(wù)管理的作用關(guān)系到一個企業(yè)的命脈。財務(wù)管理的工作對象是資金流動,只要有資金流動就離不開財務(wù)管理。一個企業(yè)的生產(chǎn)經(jīng)營活動無外乎供、產(chǎn)、銷三個環(huán)節(jié),這個過程始終貫穿著資金運(yùn)動,只是在各個環(huán)節(jié)上資金的表現(xiàn)形態(tài)不同罷了。在供應(yīng)階段資金由貨幣形態(tài)轉(zhuǎn)變?yōu)椴牧闲螒B(tài),生產(chǎn)階段由材料形態(tài)變?yōu)楫a(chǎn)品形態(tài),在銷售階段由產(chǎn)品形態(tài)又回到貨幣形態(tài)。從這里可以看出,財務(wù)管理貫穿于企業(yè)的各項工作之中,財務(wù)工作與其它管理工作是密不可分的?!糂P)〗從企業(yè)目前的實際工作來看,普遍存在兩個誤區(qū):一種認(rèn)為財務(wù)管理就是管錢,只要管住錢就可萬事大吉,重資金,輕核算。上面談到,資金在生產(chǎn)經(jīng)營過程中分別有著不同的表現(xiàn)形式,“錢”只是這個過程的起點和終點,大量的管理工作都蘊(yùn)含在過程之中。因此,只有加強(qiáng)內(nèi)部核算,才能真正做到節(jié)支降耗,否則,“錢”是管不住的。另一種認(rèn)為財務(wù)管理就是管財務(wù)部門,把財務(wù)部門與其他管理部門割裂開來,財務(wù)管理的觸角不能延伸到各項管理工作之中。財務(wù)管理就成為無本之木,其作用得不到發(fā)揮,形成經(jīng)營和生產(chǎn)“兩張皮”。因此,開發(fā)這樣一套管理軟件成為很有必要的事情,對于我們即將計算機(jī)專業(yè)畢業(yè)的學(xué)員來說,也是一次將計算機(jī)應(yīng)用于現(xiàn)實管理的一次很有意義的實踐活動。1.2開發(fā)的意義計算機(jī)是一種能夠按照指令對各種數(shù)據(jù)和信息進(jìn)行自動加工與處理的電子設(shè)備。計算機(jī)又稱電腦,是電子計算機(jī)的簡稱。電子計算機(jī)誕生于20世紀(jì)中葉,是人類最偉大的技術(shù)發(fā)明之一。它的出現(xiàn)和廣泛應(yīng)用把人類從繁重的腦力勞動中解放出來,在社會各個領(lǐng)域中提高了信息的收集、處理和傳播的速度與準(zhǔn)確性,直接加快了人類向信息化社會邁進(jìn)的步伐,是科學(xué)技術(shù)發(fā)展史上的里程碑。計算機(jī)作為信息時代的主要載體和工具,正擔(dān)負(fù)著越來越重要的作用,作為課程,計算機(jī)在各級各類學(xué)校設(shè)置成為必需,而且由于計算機(jī)教育貼近現(xiàn)實,有著其他課程無可比擬的可操作性、實用性、實效性,作為素質(zhì)教育的一環(huán),在素質(zhì)教育中占據(jù)了極其重要的地位。計算機(jī)已經(jīng)成為我們學(xué)習(xí)和工作的得力助手,更是我們生活中必不可少的一部分,使用其可方便的管理企事業(yè)財務(wù)。今天,計算機(jī)正在各行各業(yè)發(fā)揮著巨大的作用,它以其快速準(zhǔn)確性彌補(bǔ)人類的先天不足,能夠讓計算機(jī)參與人們?nèi)粘5呢攧?wù)管理事業(yè),是一種時代發(fā)展的必然要求,也是一個社會國家進(jìn)步的體現(xiàn)。況且現(xiàn)在建行已經(jīng)建起了個人網(wǎng)上銀行,本系統(tǒng)為個人理財系統(tǒng)的到來做了先期工作,比如計算機(jī)的財務(wù)管理模式的建立。開發(fā)環(huán)境與開發(fā)工具的介紹2.1開發(fā)環(huán)境軟件環(huán)境操作系統(tǒng)Microsoft

WindowsXP簡體中文專業(yè)版+SP1辦公軟件Microsoft

Office

2003軟件系統(tǒng):

Visual

basic

6.0企業(yè)中文版、Access數(shù)據(jù)庫(2010)。2.2開發(fā)工具簡介VisualBasic是一種由微軟公司開發(fā)的結(jié)構(gòu)化的、模塊化的、面向?qū)ο蟮?、包含協(xié)助開發(fā)環(huán)境的事件驅(qū)動為機(jī)制的可視化程序設(shè)計語言。這是一種可用于微軟自家產(chǎn)品開發(fā)的語言。它源自于BASIC編程語言。VB擁有圖形用戶界面(GUI)和快速應(yīng)用程序開發(fā)(RAD)系統(tǒng),可以輕易的使用DAO、RDO、ADO連接數(shù)據(jù)庫,或者輕松的創(chuàng)建ActiveX控件。程序員可以輕松的使用VB提供的組件快速建立一個應(yīng)用程序。微軟公司的Visualbasic6.0連接數(shù)據(jù)庫的主要方式以下幾種方式:一是:用data控件進(jìn)行數(shù)據(jù)庫鏈接,二是利用adodc(ADODataControl)進(jìn)行數(shù)據(jù)庫鏈接。三是:利用DataEnvironment進(jìn)行數(shù)據(jù)庫鏈接.四是利用ADO(ActiveXDataObjects)進(jìn)行編程三種數(shù)據(jù)庫訪問對象,是Microsoft數(shù)據(jù)庫訪問技術(shù)的一個主要發(fā)展方向,ADO將OLEDB封裝在一個數(shù)據(jù)對象中,使得VB程序中以方便地實現(xiàn)對數(shù)據(jù)庫的訪問。系統(tǒng)設(shè)計3.1概要設(shè)計3.1.1概要設(shè)計階段的主要任務(wù)概要設(shè)計的主要任務(wù)是把需求分析得到的系統(tǒng)擴(kuò)展用例圖轉(zhuǎn)換為軟件結(jié)構(gòu)和數(shù)據(jù)結(jié)構(gòu)。設(shè)計軟件結(jié)構(gòu)的具體任務(wù)是:將一個復(fù)雜系統(tǒng)按功能進(jìn)行模塊劃分、建立模塊的層次結(jié)構(gòu)及調(diào)用關(guān)系、確定模塊間的接口及人機(jī)界面等。數(shù)據(jù)結(jié)構(gòu)設(shè)計包括數(shù)據(jù)特征的描述、確定數(shù)據(jù)的結(jié)構(gòu)特性、以及數(shù)據(jù)庫的設(shè)計。顯然,概要設(shè)計建立的是目標(biāo)系統(tǒng)的邏輯模型,與計算機(jī)無關(guān)。3.1.2概要設(shè)計的過程在概要設(shè)計階段應(yīng)著重解決實現(xiàn)需求分析的程序模塊設(shè)計問題。這包括考慮如何把被開發(fā)的軟件系統(tǒng)劃分成若干個模塊,并決定各模塊的接口,即模塊間的相互關(guān)系,以及模塊之間的傳遞的信息。1、管理員模塊(管理員的登錄,管理員密碼的修改,退出系統(tǒng))2、工資管理模塊(增加工資記錄,刪除工資記錄,修改工資記錄,查找工資記錄,計算工資,打印工資單)根據(jù)以上分析,該系統(tǒng)考慮將整個系統(tǒng)分解成如下圖模塊結(jié)構(gòu)圖:修改密碼修改密碼編輯員工工資單退出系統(tǒng)打印工資單管理員登錄編輯員工工資單退出系統(tǒng)打印工資單管理員登錄 3.1.3概要設(shè)計的原則在系統(tǒng)的開發(fā)過程中,我們要盡量的注意模塊的高內(nèi)聚,低耦合,是系統(tǒng)的整體性能得以提高,讓我們在以后的維護(hù)與升級中更加方便。3.1.4系統(tǒng)功能分析本財務(wù)管理系統(tǒng)主要是用于企業(yè)單位的財務(wù)管理。管理員模塊功能:管理員登錄,修改密碼,對員工的工資進(jìn)行編輯(基本工資,獎金,交通補(bǔ)貼,生活補(bǔ)貼,出勤情況),查詢員工信息,打印工資單。3.2詳細(xì)設(shè)計3.2.1詳細(xì)設(shè)計的任務(wù)詳細(xì)設(shè)計包括業(yè)務(wù)對象設(shè)計、功能邏輯設(shè)計、數(shù)據(jù)庫設(shè)計和界面設(shè)計等工作。詳細(xì)設(shè)計是系統(tǒng)實現(xiàn)的依據(jù),需要考慮所有的設(shè)計細(xì)節(jié)。3.2.2詳細(xì)設(shè)計的方法設(shè)計好數(shù)據(jù)庫,按照自己的需求,先設(shè)計好自己所需要的數(shù)據(jù)庫,用來幫助程序的運(yùn)行。修改已建的數(shù)據(jù)庫

數(shù)據(jù)庫的修改分為:添加、編輯和刪除記錄。這三種操作均可由Visual

Basic

創(chuàng)建的程序來完成,下面的章節(jié)將詳細(xì)描述實現(xiàn)的具體方法。

實現(xiàn)數(shù)據(jù)庫之間的聯(lián)系

數(shù)據(jù)庫之間的關(guān)系指明兩個庫之間共享一個共同的關(guān)鍵字值。一個連接是指一種虛擬的表,這種表是在當(dāng)用戶要求從相互關(guān)聯(lián)的各個不同的表中獲取信息時建立的,關(guān)鍵字段用于在相互連接的不同表中查找匹配的記錄。一個更高級的連接形式稱為自連接。這種連接是指一個表被連接到它自己的一個字段,或在不同的紀(jì)錄中由重復(fù)數(shù)據(jù)的組合字段。數(shù)據(jù)庫中有三種不同類型的關(guān)鍵字:主關(guān)鍵字、組合關(guān)鍵字和外關(guān)鍵字。在表中使用的關(guān)鍵字類型用于描述庫表示什么以及在數(shù)據(jù)庫中如何與其它的庫建立關(guān)系。第四章數(shù)據(jù)庫的設(shè)計4.1數(shù)據(jù)庫Access的簡介MicrosoftOfficeAccess是由微軟發(fā)布的關(guān)系數(shù)據(jù)庫管理系統(tǒng)。它結(jié)合了MicrosoftJetDatabaseEngine和圖形用戶界面兩項特點,是MicrosoftOffice的系統(tǒng)程序之一。MicrosoftOfficeAccess是微軟把數(shù)據(jù)庫引擎的圖形用戶界面和軟件開發(fā)工具結(jié)合在一起的一個數(shù)據(jù)庫管理系統(tǒng)。它是微軟OFFICE的一個成員,在包括專業(yè)版和更高版本的office版本里面被單獨出售。2012年12月4日,最新的微軟OfficeAccess2016在微軟Office2016里發(fā)布,微軟OfficeAccess2013是前一個版本。MSACCESS以它自己的格式將數(shù)據(jù)存儲在基于AccessJet的數(shù)據(jù)庫引擎里。它還可以直接導(dǎo)入或者鏈接數(shù)據(jù)(這些數(shù)據(jù)存儲在其他應(yīng)用程序和數(shù)據(jù)庫)。軟件開發(fā)人員和數(shù)據(jù)架構(gòu)師可以使用MicrosoftAccess開發(fā)應(yīng)用軟件,“高級用戶”可以使用它來構(gòu)建軟件應(yīng)用程序。和其他辦公應(yīng)用程序一樣,ACCESS支持VisualBasic宏語言,它是一個面向?qū)ο蟮木幊陶Z言,可以引用各種對象,包括DAO(數(shù)據(jù)訪問對象),ActiveX數(shù)據(jù)對象,以及許多其他的ActiveX組件??梢晫ο笥糜陲@示表和報表,他們的方法和屬性是在VBA編程環(huán)境下,VBA代碼模塊可以聲明和調(diào)用Windows操作系統(tǒng)函數(shù)。4.2數(shù)據(jù)庫需求分析本系統(tǒng)使用的是ODBC數(shù)據(jù)源,使用程序前,在【控制面板】-【管理工具】-【數(shù)據(jù)源(ODBC)】中添加本程序目錄下的finance.mdb文件作為MicrosoftAccess數(shù)據(jù)源,用戶數(shù)據(jù)源名稱必須命名為:Finance4.3表的詳細(xì)結(jié)構(gòu)說明管理員職務(wù)表的詳細(xì)信息員工信息表的詳細(xì)信息員工工資表的詳細(xì)信息4.4測試用例注:可以登錄三次,三次都失敗將自動退出程序。第五章詳細(xì)設(shè)計5.1財務(wù)管理系統(tǒng)的登錄模塊設(shè)計與實現(xiàn)登錄界面:登錄源代碼分析:PrivateSubForm_Load()//窗體載入時就讀取數(shù)據(jù)庫中的數(shù)據(jù)Setcon=NewADODB.Connectioncon.ConnectionString="Provider=Microsoft.Jet.OLEDB.4.0;DataSource=gzgl.mdb;PersistSecurityInfo=False"con.CursorLocation=adUseClientcon.Openmysql="select*from管理"RandomizeText2.Text=""Label3.Caption="版權(quán)所有:WZC"Setrs=con.Execute(mysql)Forj=0Tors.RecordCount-1Combo1.AddItemrs.Fields(j).ValueNextCombo1.Text=rs.Fields(0)EndSubPrivateSubCommand1_Click()//輸入的密碼與數(shù)據(jù)庫中的密碼進(jìn)行比較IfText2.Text=rs("密碼")ThenUnloadMe'關(guān)閉登錄窗口Form4.Show'顯示主窗口ElseMsgBox"密碼不正確,請重新輸入!",48,"提示"Text2.SetFocusText2.Text=""i=i+1Ifi=3ThenMsgBox"您無權(quán)使用本系統(tǒng),謝謝!"EndEndIfEndIfEndSub主界面:主界面源代碼分析:PrivateSubForm_Load()myyear=Year(Now)mymonth=Month(Now)myday=Day(Now)mydate=myyear&"年"&mymonth&"月"&myday&"日"StatusBar1.Panels(1).Text="今天是"+mydateMe.Caption="工資管理系統(tǒng)使用者:"+userImage1.Picture=LoadPicture(App.Path+"\back.jpg")picw=Image1.Widthpich=Image1.HeightEndSub員工信息界面:包括相關(guān)控件屬性的設(shè)置源代碼分析:進(jìn)入這個界面時首先從數(shù)據(jù)庫中讀取之前的數(shù)據(jù),然后下面的代碼可以實現(xiàn)對員工信息的增刪改查DimconAsNewADODB.ConnectionDimrstAsNewADODB.RecordsetDimmysqlAsStringDima,i,msg,j,mAsIntegerPrivateSubCommand2_Click(IndexAsInteger)SelectCaseIndexCase0'第一條記錄rst.MoveFirstCommand2(0).Enabled=FalseCommand2(1).Enabled=FalseCommand2(2).Enabled=TrueCommand2(3).Enabled=TrueCase1'上一條記錄rst.MovePrevious'上一條Ifrst.BOFThenMsgBox"已經(jīng)沒有上一條記錄了",48,"警告"rst.MoveFirstCommand2(0).Enabled=FalseCommand2(1).Enabled=FalseCommand2(2).Enabled=TrueCommand2(3).Enabled=TrueEndIfCommand2(2).Enabled=TrueCommand2(3).Enabled=TrueCase2'下一條記錄rst.MoveNextIfrst.EOFThenMsgBox"已經(jīng)沒有最后一條記錄了",48,"警告"Command2_Click(3)rst.MoveLastCommand2(2).Enabled=FalseCommand2(3).Enabled=FalseCommand2(1).Enabled=TrueCommand2(0).Enabled=TrueEndIfCommand2(1).Enabled=TrueCommand2(0).Enabled=TrueCase3'末尾一條記錄rst.MoveLastCommand2(2).Enabled=FalseCommand2(3).Enabled=FalseCommand2(1).Enabled=TrueCommand2(0).Enabled=TrueCase4Fori=0Toa-1Text1(i).Enabled=TrueNextiCase5Form9.Show1Case6Me.Hide'關(guān)閉Case7msg=MsgBox("您確定刪除該員工信息嗎?",vbOKCancel,"警告")Ifmsg=1Thenrst.Deleterst.MoveNextEndIfEndSelectText1(0).Text=IIf(IsNull(rst.Fields("姓名").Value),"",rst.Fields("姓名").Value)'填充記錄Text1(1).Text=IIf(IsNull(rst.Fields("政治面貌").Value),"",rst.Fields("政治面貌").Value)'填充記錄Text1(2).Text=IIf(IsNull(rst.Fields("職務(wù)").Value),"",rst.Fields("職務(wù)").Value)'填充記錄Text1(3).Text=IIf(IsNull(rst.Fields("科室").Value),"",rst.Fields("科室").Value)'填充記錄Text1(4).Text=IIf(IsNull(rst.Fields("生日").Value),"",rst.Fields("生日").Value)'填充記錄Text1(5).Text=IIf(IsNull(rst.Fields("軍烈屬").Value),"",rst.Fields("軍烈屬").Value)'填充記錄Text1(6).Text=IIf(IsNull(rst.Fields("出勤天數(shù)").Value),"",rst.Fields("出勤天數(shù)").Value)'填充記錄Text1(7).Text=IIf(IsNull(rst.Fields("缺勤天數(shù)").Value),"",rst.Fields("缺勤天數(shù)").Value)'填充記錄Text1(8).Text=IIf(IsNull(rst.Fields("基本工資").Value),"",rst.Fields("基本工資").Value)'填充記錄Text1(9).Text=IIf(IsNull(rst.Fields("獎金").Value),"",rst.Fields("獎金").Value)'填充記錄Text1(10).Text=IIf(IsNull(rst.Fields("津貼").Value),"",rst.Fields("津貼").Value)'填充記錄Text1(11).Text=IIf(IsNull(rst.Fields("洗理").Value),"",rst.Fields("洗理").Value)'填充記錄Text1(12).Text=IIf(IsNull(rst.Fields("書報").Value),"",rst.Fields("書報").Value)'填充記錄Text1(13).Text=IIf(IsNull(rst.Fields("交通").Value),"",rst.Fields("交通").Value)'填充記錄Text1(14).Text=IIf(IsNull(rst.Fields("工資扣").Value),"",rst.Fields("工資扣").Value)'填充記錄Text1(15).Text=Val(Text1(8).Text)+Val(Text1(9).Text)+Val(Text1(10).Text)+Val(Text1(11).Text)+Val(Text1(12).Text)+Val(Text1(13).Text)Text1(16).Text=Text1(14).TextText1(17).Text=Val(Text1(15).Text)-Val(Text1(16).Text)EndSubPrivateSubForm_Load()Setcon=NewADODB.Connectiona=Text1.Countcon.ConnectionString="provider=microsoft.jet.oledb.4.0;datasource=gzgl.mdb;persistsecurityinfo=false"con.CursorLocation=adUseClientcon.Openrst.Open"select*from員工信息,工資總where員工信息.ID=工資總.ID",con,adOpenKeyset,adLockOptimisticIfrst.BOF=TrueOrrst.EOFThenMsgBox"數(shù)據(jù)庫是空的!"ElseText1(0).Text=rst.Fields("姓名").ValueText1(1).Text=rst.Fields("政治面貌").ValueText1(2).Text=rst.Fields("職務(wù)").ValueText1(3).Text=rst.Fields("科室").ValueText1(4).Text=rst.Fields("生日").ValueText1(5).Text=rst.Fields("軍烈屬").ValueText1(6).Text=rst.Fields("出勤天數(shù)").ValueText1(7).Text=rst.Fields("缺勤天數(shù)").ValueText1(8).Text=rst.Fields("基本工資").ValueText1(9).Text=rst.Fields("獎金").ValueText1(10).Text=rst.Fields("津貼").ValueText1(11).Text=rst.Fields("洗理").ValueText1(12).Text=rst.Fields("書報").ValueText1(13).Text=rst.Fields("交通").ValueText1(14).Text=rst.Fields("工資扣").ValueText1(15).Text=Val(Text1(8).Text)+Val(Text1(9).Text)+Val(Text1(10).Text)+Val(Text1(11).Text)+Val(Text1(12).Text)+Val(Text1(13).Text)Text1(16).Text=Text1(14).TextText1(17).Text=Val(Text1(15).Text)-Val(Text1(16).Text)EndIfFori=0Toa-1Text1(i).Enabled=FalseNextiEndSubPrivateSubText1_KeyPress(IndexAsInteger,KeyAsciiAsInteger)IfKeyAscii=13Thenmsg=MsgBox("您確定修改該員工的信息嗎?",vbOKCancel,"提示")Ifmsg=1ThenIfNot(rst.EOF)Thenrst.Fields("姓名").Value=CStr(Text1(0).Text)rst.Fields("政治面貌").Value=CStr(Text1(1).Text)rst.Fields("職務(wù)").Value=CStr(Text1(2).Text)rst.Fields("科室").Value=CStr(Text1(3).Text)rst.Fields("生日").Value=CStr(Text1(4).Text)rst.Fields("軍烈屬").Value=CStr(Text1(5).Text)rst.Fields("出勤天數(shù)").Value=CStr(Text1(6).Text)rst.Fields("缺勤天數(shù)").Value=CStr(Text1(7).Text)rst.Fields("基本工資").Value=CStr(Text1(8).Text)rst.Fields("獎金").Value=CStr(Text1(9).Text)rst.Fields("津貼").Value=CStr(Text1(10).Text)rst.Fields("洗理").Value=CStr(Text1(11).Text)rst.Fields("書報").Value=CStr(Text1(12).Text)rst.Fields("交通").Value=CStr(Text1(13).Text)rst.Fields("工資扣").Value=CStr(Text1(14).Text)Text1(15).Text=Val(Text1(8).Text)+Val(Text1(9).Text)+Val(Text1(10).Text)+Val(Text1(11).Text)+Val(Text1(12).Text)+Val(Text1(13).Text)Text1(16).Text=Text1(14).TextText1(17).Text=Val(Text1(15).Text)-Val(Text1(16).Text)EndIfEndIfEndIfEndSub查詢界面:有三種查詢方式(姓名,部門,添加員工的日期),下圖是按姓名查找。源代碼分析:PrivateSubCommand1_Click()Setcon=NewADODB.Connectioncon.ConnectionString="Provider=Microsoft.Jet.OLEDB.4.0;DataSource=gzgl.mdb;PersistSecurityInfo=False"con.CursorLocation=adUseClientcon.Openmysql="select員工信息.編號,姓名,科室,職務(wù),基本工資,津貼,工資扣,洗理,書報,交通,獎金from工資總,員工信息where員工信息!姓名='"&Text1.Text&"'and員工信息.編號=工資總.編號"Setrst=con.Execute(mysql)s=rst.Fields.CountIfrst.BOF=TrueThenSetDataGrid1.DataSource=NothingMsgBox"您輸入的員工姓名不存在!",48,"警告"Text1.SetFocusElseSetDataGrid1.DataSource=rstFori=0Tos-1DataGrid1.Columns(i).Alignment=dbgCenterDataGrid1.Columns(i).Width=1000NextiEndIfEndSub第六章系統(tǒng)使用說明6.1使用說明本系統(tǒng)服務(wù)于事業(yè)型企業(yè)財務(wù)管理,具有簡單方便管理企業(yè)的財務(wù)功能,體現(xiàn)了現(xiàn)代信息技術(shù)在市場的應(yīng)用6.2運(yùn)行環(huán)境軟件環(huán)境操作系統(tǒng)Microsoft

WindowsXP簡體中文專業(yè)版+SP1辦公軟件Microsoft

Office

2003軟件系統(tǒng):

Visual

basic

6.0企業(yè)中文版、Access數(shù)據(jù)庫(2010)。結(jié)束語隨著6月份畢業(yè)日子的到來,我的畢業(yè)設(shè)計也漸漸接近了尾聲。經(jīng)過好幾周的奮戰(zhàn),我的畢設(shè)終于完成了!在沒有做畢業(yè)設(shè)計之前,我認(rèn)為畢業(yè)設(shè)計只是對這幾年來所學(xué)知識的單純總結(jié),但是事實是,通過這次做畢業(yè)設(shè)計,發(fā)現(xiàn)我的看法太片面了。畢業(yè)設(shè)計不僅僅是對大學(xué)所學(xué)知識的一種檢驗,也是對自己能力的一種提高。在這次畢業(yè)設(shè)計中因為是單獨行動,我的編碼能力和獨立自主的能力得到大大提高。在設(shè)計過程中,我查閱了大量的相關(guān)資料,并且不停地與室友交流,外加自學(xué)等方式,使自己學(xué)到了不少知識,收獲巨大的同時也經(jīng)歷了不少艱辛。在整個設(shè)計過程中我懂得了許多東西,不僅培養(yǎng)了我獨立工作的能力,而且樹立了對自己工作能力的信心,相信會對今后的工作、生活、學(xué)習(xí)都有非常重要的影響。而且大大提高了我的動手能力,使我深刻體會到了在創(chuàng)造過程中,探索的艱難和成功的喜悅。雖然這個設(shè)計做的不完美,但是在設(shè)計過程中所學(xué)到的東西,是我在這次畢業(yè)設(shè)計中的最大的收獲和財富,它將使我受益終生。大學(xué)四年將在這最后的畢業(yè)設(shè)計總結(jié)上劃上一個圓滿的句號。時光飛逝,日月如梭,我即將結(jié)束我的大學(xué)生涯。大學(xué)最重要的一個環(huán)節(jié),就是把理論知識用到實踐當(dāng)中,這也是我們從學(xué)生走向社會人士的一個轉(zhuǎn)折。另一個生命歷程的開始。畢業(yè)設(shè)計的這段時間,我成熟了很多。做完了畢業(yè)設(shè)計才知道,之前學(xué)的知識其實很少,認(rèn)識也很片面,畢業(yè)設(shè)計也是對知識的融會貫通,以前眼高手低的我在畢業(yè)設(shè)計中得到了很大的鍛煉,這個小項目給我畢業(yè)后的就業(yè)也增加了一份項目經(jīng)驗。以上就是我的總結(jié),快要畢業(yè)的我即將踏上社會,相對有工作經(jīng)驗的人我是沒有優(yōu)勢的,但是我希望自己能夠秉著一份赤子之心,虛心學(xué)習(xí)所有需要學(xué)習(xí)的東西,“萬事開頭難”說的非常有道理,想想一開始搭環(huán)境都那么困難,回首,竟然不知不覺中完成了整個項目,可見“只要有恒心,鐵杵磨成針“,也是“世上無難事,只怕有心人”。凡事都要對自己有信心,要為自己設(shè)定更高的目標(biāo)才能使自己的能力得到更大的鍛煉。為自己的未來而努力致謝美好的大學(xué)時光已經(jīng)接近尾聲了,在此,我要感謝所有幫助過我的人和栽培我的母校。感謝我的家人對我大學(xué)四年生活上的支持,特別是我的父母,雖然他們每天都很累的在工作,但還是很好的讓我完成大學(xué)的生活。感謝我的母校黃山學(xué)院給我四年時間在大學(xué)深造,讓我能繼續(xù)學(xué)習(xí)和提高自己;感謝黃山學(xué)院的老師和同學(xué)們四年來的關(guān)心和鼓勵,回憶以往的點點滴滴,所有的一切都讓我的內(nèi)心充滿了感動。我在這次畢業(yè)論文設(shè)計中得到了老師和同學(xué)的很多幫助。我做畢業(yè)設(shè)計的每個階段,從選題到查閱資料,到論文提綱的確定,以及中期論文的修改、后期論文格式調(diào)整等等各個環(huán)節(jié)中,李老師都給予了我悉心的指導(dǎo)。這幾個月以來,李老師不僅在論文上給我以精心指導(dǎo),同時還在思想上給了我很大的引導(dǎo),在此我要向李老師致以最誠摯的感謝和崇高的敬意。本片畢業(yè)論文的寫作也得到了其他同學(xué)的熱情幫助。感謝在整個畢業(yè)設(shè)計期間和我密切合作的同學(xué),同時也感謝大學(xué)四年期間,在各個方面給予過我?guī)椭挠嬎銠C(jī)小伙伴們。最后,我再一次真誠地向幫助過我的老師和同學(xué)致以最真誠的感謝!參考文獻(xiàn)本系統(tǒng)完成參考的文獻(xiàn)有:《數(shù)據(jù)庫系統(tǒng)原理與應(yīng)用》

閃四清

清華大學(xué)出版社

1999年

《Visual

Basic

6.0程序設(shè)計》

劉世峰

中央廣播電大出版社

2003年

《Visual

Basic程序設(shè)計》

中央廣播電大出版社

2001年

《軟件工程》

楊文龍

電子工業(yè)出版社

2001年

《管理信息系統(tǒng)》

薛華成

清華大學(xué)出版社

1996年

基于C8051F單片機(jī)直流電動機(jī)反饋控制系統(tǒng)的設(shè)計與研究基于單片機(jī)的嵌入式Web服務(wù)器的研究MOTOROLA單片機(jī)MC68HC(8)05PV8/A內(nèi)嵌EEPROM的工藝和制程方法及對良率的影響研究基于模糊控制的電阻釬焊單片機(jī)溫度控制系統(tǒng)的研制基于MCS-51系列單片機(jī)的通用控制模塊的研究基于單片機(jī)實現(xiàn)的供暖系統(tǒng)最佳啟停自校正(STR)調(diào)節(jié)器單片機(jī)控制的二級倒立擺系統(tǒng)的研究基于增強(qiáng)型51系列單片機(jī)的TCP/IP協(xié)議棧的實現(xiàn)基于單片機(jī)的蓄電池自動監(jiān)測系統(tǒng)基于32位嵌入式單片機(jī)系統(tǒng)的圖像采集與處理技術(shù)的研究基于單片機(jī)的作物營養(yǎng)診斷專家系統(tǒng)的研究基于單片機(jī)的交流伺服電機(jī)運(yùn)動控制系統(tǒng)研究與開發(fā)基于單片機(jī)的泵管內(nèi)壁硬度測試儀的研制基于單片機(jī)的自動找平控制系統(tǒng)研究基于C8051F040單片機(jī)的嵌入式系統(tǒng)開發(fā)基于單片機(jī)的液壓動力系統(tǒng)狀態(tài)監(jiān)測儀開發(fā)模糊Smith智能控制方法的研究及其單片機(jī)實現(xiàn)一種基于單片機(jī)的軸快流CO〈,2〉激光器的手持控制面板的研制基于雙單片機(jī)沖床數(shù)控系統(tǒng)的研究基于CYGNAL單片機(jī)的在線間歇式濁度儀的研制基于單片機(jī)的噴油泵試驗臺控制器的研制基于單片機(jī)的軟起動器的研究和設(shè)計基于單片機(jī)控制的高速快走絲電火花線切割機(jī)床短循環(huán)走絲方式研究基于單片機(jī)的機(jī)電產(chǎn)品控制系統(tǒng)開發(fā)基于PIC單片機(jī)的智能手機(jī)充電器基于單片機(jī)的實時內(nèi)核設(shè)計及其應(yīng)用研究基于單片機(jī)的遠(yuǎn)程抄表系統(tǒng)的設(shè)計與研究基于單片機(jī)的煙氣二氧化硫濃度檢測儀的研制基于微型光譜儀的單片機(jī)系統(tǒng)單片機(jī)系統(tǒng)軟件構(gòu)件開發(fā)的技術(shù)研究基于單片機(jī)的液體點滴速度自動檢測儀的研制基于單片機(jī)系統(tǒng)的多功能溫度測量儀的研制基于PIC單片機(jī)的電能采集終端的設(shè)計和應(yīng)用基于單

溫馨提示

  • 1. 本站所有資源如無特殊說明,都需要本地電腦安裝OFFICE2007和PDF閱讀器。圖紙軟件為CAD,CAXA,PROE,UG,SolidWorks等.壓縮文件請下載最新的WinRAR軟件解壓。
  • 2. 本站的文檔不包含任何第三方提供的附件圖紙等,如果需要附件,請聯(lián)系上傳者。文件的所有權(quán)益歸上傳用戶所有。
  • 3. 本站RAR壓縮包中若帶圖紙,網(wǎng)頁內(nèi)容里面會有圖紙預(yù)覽,若沒有圖紙預(yù)覽就沒有圖紙。
  • 4. 未經(jīng)權(quán)益所有人同意不得將文件中的內(nèi)容挪作商業(yè)或盈利用途。
  • 5. 人人文庫網(wǎng)僅提供信息存儲空間,僅對用戶上傳內(nèi)容的表現(xiàn)方式做保護(hù)處理,對用戶上傳分享的文檔內(nèi)容本身不做任何修改或編輯,并不能對任何下載內(nèi)容負(fù)責(zé)。
  • 6. 下載文件中如有侵權(quán)或不適當(dāng)內(nèi)容,請與我們聯(lián)系,我們立即糾正。
  • 7. 本站不保證下載資源的準(zhǔn)確性、安全性和完整性, 同時也不承擔(dān)用戶因使用這些下載資源對自己和他人造成任何形式的傷害或損失。

評論

0/150

提交評論