A Project Report On "College Pay Roll Management System": Department of Computer Science G.C.W Parade, Jammu (2012-2013)

A PROJECT REPORT ON "COLLEGE PAY ROLL MANAGEMENT SYSTEM"
A Project Report submitted to partial fulfillment of the requirement for the degree of Bachelors of Computer Sciences.
SUBMITTED TO:-
DEPARTMENT OF COMPUTER SCIENCE G.C.W PARADE, JAMMU (2012-2013

SUBMI ()$ !" B#$ U%"!R &! 'UI"A%C!
COLLEGE PAY ROLL MANAGEMENT SYSTEM

PRI I BA'A* S&ARMA &A%"A B&ARA SIR M(%I+A RA"&I+A %!&A 'UP A
CERTIFICATE
This is to certify that PRITI BAGAL, MONI!A S"ARMA, RAD"I!A "ANDA, NE"A GUPTA have prepared the report on the project entitled "COLLEGE PAY ROLL MANAGEMENT SYSTEM" under my supervision and guidance .Further they have fulfilled all the statutory requirements for the submission of the project. the project report is found worthy of acceptance for the award of Bachelor of Computer Application.
UNDER THE GUIDANCE OF BHARAT MAHAJAN
BY: - HOD !. B"#$%&'"
C"A% (DEPARTMENT OF COMPUTER SCIENCES)

G.C.W PARADE 2
AC!NOWLEDGEMENT
,e are con-inced that it is -irtuall. impossible for us to underta/e and complete a project of this /ind 0ithout the encouragement1 guidance and assistance from teachers and friends. At the -er. outset 0e e2press our heartfelt gratitude to persons1 our guide Mr. Bharat Mahajan for his sincere ad-ice1 inspiring guidance1 constructi-e criticism 1 fruitful suggestions 1 useful super-ision and importantl.1 for allo0ing us to ta/e up this project. %o 0ords of gratitude are sufficient to appreciate the encouragement 0e ha-e been recei-ing from time to time from our teachers1 in all our .ears of learning. *ast but not the least 0e remain grateful to our parents and our classmates for their moral support and inspiration in the completion of this stud.. PR!! I BA'A* M(%I+A S&ARMA RA"&I+A &A%"A
G.C.W PARADE 3
%!&A 'UP A
INDEX
S%(.
3. 5. 35 9. 3: ;. 5= >. 55 7. 5; 8. 95
C(% !% S
I% R("UC I(%
PA'! %(.
3 567 86 396 3<6 536 596 5>6
S#S !M "!4!*(PM!% S RA !R'# S#S !M A%A*#SIS S#S !M "!SI'% "A A )*(, "IA'RAM !R6"IA'RAM ,(R+I%' !%4IR(%M!% !C&%(*('# ?4B.%! @
G.C.W PARADE
:. 9< <. 3== 3=. 3=9 33.
SCR!!% S&( S C("I%' !S I%' BIB*('RAP&#
996 ;=6 3=36 3=;
G.C.W PARADE
INTRODUCTION
Every employee ee!" #o $e p%&! 'or #(e "erv&)e" (e*"(e prov&!e"+ For #(&" #(e employer m,"# (%ve % p%yroll "y"#em+ T(e p%yroll "y"#em &" % ',ll 'e%#,re! "y"#em #(%# m% %-e" '& % )&%l & 'orm%#&o o' every employee & % or-% &.%#&o + I %))o, #& - p%yroll re'er" #o #(e %mo, # p%&! #o #(e employee #(%# &" #(e /%-e"0 $o ,"e" % ! #(e !e!,)#&o "+ T(e pr&m%ry m&""&o o' #(e p%yroll !ep%r#me # &" #o e ",re #(%# %ll employee" %re p%&! %)),r%#ely % ! #&mely /&#( #(e )orre)# /&#((ol!& -" % ! !e!,)#&o " % ! #o e ",re #(e /&#((ol!& -" % ! !e!,)#&o " %re reem&##e! & % #&mely m% er+ T(&" & )l,!e" "%l%ry p%yme #"0 #%1 /&#((ol!& -" % ! !e!,)#&o " ",)( %" 2PF0 I ",r% )e"0 % ! 3o% #%4e % ! "o o 'rom % p%y )(e)4
SI2NIFICANCE:T(e p,rpo"e o' #(&" pro5e)# &" #o prov&!e #(e p%y pro)e""& - "y"#em #(%# /&ll m%& #%& employee !%#% % ! )%l),l%#e #(e "%l%ry o' %ll employee" o' o,r )olle-e % ! #o "e%r)( #(e employee $y employee )o!e+
G.C.W PARADE
C"ARTER 1
S#S !M "!4*(PM!% 'T!AT&!()
G.C.W PARADE
INTRODUCTION
Before developing any software product* there must be a deep consideration related to its cycle and optimum choice of the software development model. 'election of appropriate model for the project or software product* guarantee the completion of the project a wor+ proceeds in systematic fashion. There are different software process models are available in the software engineering. These are ,inear 'equential -odel or .aterfall -odel* The /rototype -odel* The !A -odel* The 0ncremental -odel* The 'piral -odel etc. Among these the .aterfall -odel is the oldest and the most widely used paradigm for software engineering. 0t is also best suits to the project. That1s why we had started project +eeping view of this model in the mind. The waterfall model suggests a systematic sequential approach to software development that begins at the system level and progress through analysis* design* coding* testing and maintenance. This is shown in the figure as follows2
G.C.W PARADE
System/Informatio n Engineering
Analysis
Design
Code
Test
Fig. The .aterfall -odel
SYSTEM DEVELOPMENT LIFE CYCLE (SDLC)

evelopment of software product goes through various stages of life cycle* called 'ystem evelopment ,ife Cycle 3' ,C4.These stages are depicted in the following figure2
PRO !E" DE#I$ATIO$
#EASI I!IT% ST&D%
A$A!%SIS
DESI'$ G.C.W PARADE CODI$' TESTI$' I"P!E"E$TATIO$ "AI$TAI$E$CE 4
PROBLEM DEFINITION & DESCRIPTION

0t is the beginning of the project. /reliminary survey and initial investigation are done. A concise statement of the problem to be solved and the constraints that e5ist for its solution is prepared. Also* a detailed description of the present situation reasons for the migration to proposed system and a overview of the proposed system are state.
FEASIBILTY STUDY
.e evaluate the e5isting system and procedures analysis of alternative candidate system. Feasibility of the proposed system is studied ta+ing consideration of different factors* such as cost estimation of the project* technical specification etc.
ANALYSIS
etailed evaluation and data collection are the main issue at this stage . iagnosis of the situations is done with a fine aim* with the boundaries of the system in the mind to produce a report based on the findings. The requirements of both system 6 software are documented 6 revived with the user.
DESIGN
G.C.W PARADE

esign is the most creative and challenging part of the ' ,C. 0t concerned with identifying the software component specifying relationship among components* specifying software structure* maintaining a record of design decisions 6 providing a blueprint for the implementation phase. "ere* output to be produced and its format are determined.
CODING
The coding step performs the translations of the design representations into an artificial language e.g. C* C77* $0'#A, BA'0C* 8A$A etc. !esulting in instructions that can be e5ecuted by the computer. 0t* thus involves developing computer programs that meet the system specification of the design stage.
TESTING
The Testing process focuses on the logical internals of the software* ensuring that all statements have been tested on functional e5ternals* that is* conducting tests using various test data to uncover errors 6 ensure that defined input will produce actual results that agree with required results. The various types of testing done on the system are 9 #nit Testing* 0ntegration Testing* $alidation Testing* :utput Testing 6 #ser Acceptance Testing* /erformance Testing* Alpha and beta Testing etc.
IMPLEMENTATION
0mplementation is primarily concerned with user training* site preparations and file conversion. The new system may be totally new system replacing an e5isting manual system or automated system* or it may be major modification to the e5isting system. 0t involves the of the design specifications into source code 6 debugging* documentation 6 unit testing of the source code.
MAINTENANCE
Again factor of software 6 hardware causes maintenance. The software product will undoubtedly undergo changes after is has been delivered to the customers. 'oftware maintenance reapplies each of the preceding steps to an e5isting program rather than
G.C.W PARADE

new ones. 0t includes enhancement of capabilities* adaption of the software to the new processing environment 6 correction of software bugs. The basic idea of 'oftware evelopment ,ife Cycle 3' ,C4 is that there is a well defined process by which an application is conceived* developed 6 implemented .0t gives structure to a creative process .The phase is ' ,C provide a basis for the management 6 control because that define segments of the flow of wor+ which can be identified for managerial purpose 6 specify the documents or other deliverables to be produced in each phase.
C"APTER 2
S#S !M A%A*#SIS
G.C.W PARADE )
SYSTEM ANALYSIS
OBJECTI6ES OF STUDYIN2 MAN2EMENT SYSTEM PAYRO33
T*is st+dy aims to de,elo- a relia.le and managea.le /om-+teri0ed -ayroll management system for t*e .etter management of t*e organi0ation1 T*e o.2e/ti,e of t*e st+dy is to a//ess t*e -resent -ayroll system i1e1 11 To find o+t t*e +nderlying -ro.lems in t*e -resent system1 21 To find o+t t*e -ro/ed+re of t*e -resent system1
G.C.W PARADE 3

31 To find o+t t*e a//+ra/y and effe/ti,eness of t*e -resent system1 41 To determine t*e -ossi.le .enefits of t*e -ro-osed /om-+teri0ed -ayroll system.
PRESENT SYSTEM45
In a go,ernment /ollege of 678 go,ernment e,ery tea/*ing and non5 tea/*ing em-loyee is -aid as -er t*e &'C APPRO9ED ( T: PA% CO""ISSIO$ in a /ollege ; <*en an em-loyee is sele/ted ; a ser,i/e .oo= is maintained in <*i/* *is initial -ay is <ritten <it* all allo<an/es and grade -ay and finally *is salary is /al/+lated1 T*e /on/erned /ollege <*ere *e or s*e is -osted -la/es t*e detail of t*e em-loyee in t*e -ayroll register and -ays a//ordingly e,ery mont*1 :e or s*e *as to sign in t*e register after salary is -aid1
PROB3EMS IN PRESENT SYSTEM45

11 $ot eno+g* details are refle/ted in t*e -ay sli-; so em-loyee =eeas=ing >+estions1 21 E?/essi,e o,ertime and e?/essi,e -ayroll staff1 31 Endless /om-laints and ad2+stments1 41 Endless en>+iries on loan .alan/es and SSS /ertifi/ations1 51 Time /ons+ming and <astage of -a-er1
RE7UIREMENT ANA3YSIS
G.C.W PARADE @

Soft<are re>+irement analysis is soft<are engineering tas= t*at .ridges t*e ga- .et<een system le,el soft<are allo/ation and soft<are design1 T*e analysis is di,ided into t*ree -arts45 11 Pro.lem re/ognition1
21 E,al+ation and synt*esis1
31 S-e/ifi/ation and re,ie<
PROPOSED SYSTEM
T*e system <*i/* <e are designing to maintain t*e salary is soft<are <it* t*e name College Payroll management system <*i/* at initial stage <ill =ee- t*e re/ord of all t*e em-loyees1 It <ill add t*e -ersonal details and -ay details in t*e data files and on t*at .asis at t*e end of e,ery mont*; it <ill /al/+late t*e salary and generate t*e -ay sli-1 Any alteration or modifi/ation <ill also .e allo<ed in t*is system1 It <ill also =ee- t*e re/ord of 'P# ded+/ted and any loan ad,an/es1
G.C.W PARADE
1A
AD6ANTA2ES AND PROPOSED SYSTEM
BENEFITS
OF
11 T*e -ro-osed system <ill re/ord all data in all re-orts at t*e same time; 21 Em-loyers <ill ne,er *a,e to s-end m+/* time in =ee-ing +- to date <it* ta?es and ded+/tions .e/a+se t*e system <ill .e designed +-dated to s+/* ded+/tions1 31 Storage of files <ill .e safe and se/+red <it* B&ser name and Pass<ordsC and easily /an .e a//essed1 41 D+i/= retrie,al of any re-ort1 51 Self des/ri.ing Pay sli-1 (1 !ess man -o<er1
FEASIBI3ITY STUDY
G.C.W PARADE
11

T*e feasi.ility st+dy is /arried o+t to test if t*e -ro-osed system is <ort* .eing im-lemented1 'i,en +nlimited and infinite time; all -ro2e/ts are feasi.le1 &nfort+nately s+/* reso+r/es and time are not -ossi.le in real life sit+ations1 :en/e it .e/omes .ot* ne/essary and -r+dent to e,al+ate t*e feasi.ility of t*e -ro2e/t at t*e earliest -ossi.le time in order to a,oid +nne/essarily <astage of time; effort and -rofessional em.arrassment o,er an ill /on/ei,ed system1 #easi.ility st+dy is a test of system -ro-osed regarding its <or= a.ility; im-a/t on t*e organi0ation a.ility to meet t*e +ser needs and effe/ti,e +se of reso+r/es1
T*e main o.2e/ti,e of t*e feasi.ility st+dy is to test t*e te/*ni/al; o-erational and e/onomi/al feasi.ility of de,elo-ing a /om-+ter system a--li/ation1
T*e follo<ing feasi.ility st+dies <ere /arried o+t for t*e -ro-osed system45
ECONOMIC FEASIBI3ITY: 5 An e,al+ation of de,elo-ment /ost <eig*ed against t*e in/ome of .enefit deri,ed from t*e de,elo-ed system1 :ere t*e de,elo-ment /ost is e,al+ated .y <eig*ing it against t*e +ltimate .enefits from t*e ne< system1 T*e -ro-osed system is e/onomi/ally feasi.le if t*e .enefits o.tained in t*e long r+n /om-ensate rat*er t*an o,erdo t*e /ost in/+rred in designing and im-lementing1 In t*is /ase t*e .enefits o+t<eig* t*e /ost t*at ma=es t*e system e/onomi/ally feasi.le1
G.C.W PARADE
12
TECHNICA3 FEASIBI3ITY: 5 A st+dy of f+n/tion -erforman/e and /onstraints t*at may affe/t t*e a.ility to a/*ie,e t*e a//e-ta.le system1 A system is te/*ni/ally feasi.le; if it /an .e designed and im-lemented <it*in t*e limitations of t*e a,aila.le reso+r/es li=e f+nds; *ard<are; soft<are et/1 T*e /onsiderations t*at are normally asso/iated <it* te/*ni/al feasi.ility in/l+de de,elo-ment ris= reso+r/es a,aila.ility and te/*nology1 "anagement -ro,ides latest *ard<are and soft<are fa/ilities for s+//essf+l /om-letion of t*e -ro2e/t1
T*e -ro-osed system is te/*ni/ally feasi.le as t*e te/*nology <e are +sing E,.1netF is f+lly /a-a.le to im-lement o+r -ro2e/ts re>+irement analysis t*at <as -erformed in t*e analysis se/tion1
OPERATIONA3 FEASIBI3ITY: 5 T*e -ro2e/t is o-erational feasi.le as it /an .e im-lemented easily also <e /an see t*at it is somet*ing for general -+.li/ t*at <ill ma=e it more -o-+lar1
BEHA6IORA3 FEASIBI3ITY: - BAn e,al+ation of t*e .e*a,ior of t*e end +sers; <*i/* may affe/t t*e de,elo-ment of t*e system1C T*e +ser s*o< minimal resistan/e to /*ange; .+t t*ey are satisfied <it* f+n/tionality -ro,ided in t*e -ro-osed system1
G.C.W PARADE
13

MOTI6ATIONA3 FEASIBI3ITY: 5 BE,al+ation of organi0ation moti,ation to s+--ort t*e de,elo-ment and im-lementation of t*e -ro2e/tC1 Organi0ational moti,ation <as al<ays t*ere t*ro+g*o+t t*e -ro2e/t1
SCHEDU3E FEASIBI3ITY: - BE,al+ates t*e time ta=en in t*e de,elo-ment of t*e -ro2e/tC1 T*e system *as s/*ed+le feasi.ility1
C"APTER 3
S#S !M "!SI'%
G.C.W PARADE 14
INTRODUCTION
'oftware design* the most creative and challenging phase of 'ystem ,ife Cycle* follows system analysis. Blueprint of the project and its implementation is prepared at this stage. $arious steps proceed in these steps are2 etermine of output to be produced and its format specification. 0nput* data and master files are designed. etails related to justification of the system and an estimation of impact of the proposed system on the user and the organi;ation are documented and evaluated by the management.
G.C.W PARADE
15

'oftware design methodology changes continually nature that is normally associated with more classical engineering design disciplines. "owever* techniques for software design do e5ist* criteria for design qualities are available 6 design notation can be applied. :nce software requirements have been analy;ed* software design leads to the three technical activities<designs* code 6 testing that required to build 6 verify structure. esign is the only way that we can accurately translate a customer1s requirement into a finished product or system. .ithout design* ris+ of building an unsuitable system e5ists = one that will fail when small changes are made of one that may be difficult to test. 0n the software design there distinct types of activities2 &5ternal esign* Architectural design 6 detailed design. ifferent steps of software design are shown in figure on ne5t page.
SYSTEM DESIGN
'ystem design is a solution* >":. T: A//!:AC"? to the creation of a new system. This important phase is composed of several steps. 0t provides the understanding and procedural details necessary to implement the system. This may be referred as a system development methodology* which is a vital part of software engineering. There are several methodologies* which can be used for the development of the system. These are !A * .aterfall model* 0ncremental model etc.
G.C.W PARADE
1(
Test programs
2o #o &mpleme #%#&o
DETAILED DESIGN uring this phase the database and the program modules are designed and detailed user procedure is documented. The interface between the system user and the computer are also defined. etailed design involves adaption of e5isting code* modification of standard algorithms* and invention of new algorithms and design of data representation. etailed design is strongly influenced by the programming languages used to implement the system* but it is not concerned with the synthetic aspect of implementation language.
G.C.W PARADE
1)

etailed design separates the activity of low level design from implementation* just as analysis and design activities isolate consideration of what is desired from the structure that will achieve the desired result. DATABASE DESIGN A database is a repository for stored operational data. 0n database environment* the common data is available and all communication is done through this by different users. 0nstead of each program managing its own data* data across every application is shared by authori;ed personal. All the general activities of the application are identified in the system analysis phase. For the list of activities identified the subject area of application need to be maintained. .hen the designing starts the required table is identified. A detailed description of the table is given in the data dictionary. After identification of tables and the required data relationship between tables is build* primary +eys are identified. EXTERNAL DESIGN &5ternal design of the software involves conceiving* planning 6 specifying the e5ternally observable characteristics of a software product. These characteristics include user displays 6 report formats* e5ternal data sources 6 data sin+s 6 the functional characteristics include user displays 6 report formats* e5ternal data sources 6 data sin+s 6 the functional characteristics* performance requirements 6 high level process structure for the product. &5ternal design begins during the analysis phase. The distinction between requirement definition 6 e5ternal design is not sharp* but is a gradual shift in emphasis from detailed >what? to high level >how?. INTERNAL DESIGN 0nternal design involves conceiving* planning out and specifying the internal structure and processing details of the software product. the goals of internal design are to specify internal structure and processing details to record designing decisions and indicate why certain alternative and trade<offs were choose* to elaborate the test plan and to provide a blueprint for implementation* testing and maintenance activities. The wor+ produce of internal designing include a specification of architectural structure9 the detail of algorithms and data structure and the test plan.
ARCHITECTURAL DESIGN
Architectural design involves identification the software components* decoupling them and decomposing them in to processing modules and conceptual data structures and specifying the interconnection among components. (ood notation can clarify the
G.C.W PARADE 13

inter<relationship and interaction of interest* while poor notation can complicate and interfere within good designing practice. The notations that shall be to describe >overall testing? include entity<relationship diagram 3&! 4* conte5t analysis diagram followed by data flow diagram 3 F '4 ENTITY RELATIONSHIP DIAGRAM
:ne of the best<+nown design approaches is widely followed in designing projects normally +nown as >&%T0T) = !&,AT0:%'"0/ 0A(!A- 3&! 4?. &! helps in capturing the business rules governing the data relationship of the system and is a convention aid for communicating with ends users in the conceptual design stages. &! consist of2 &ntity2 it is the ten used to describe any object* place* person and concept* activity that the enterprise recogni;es in the area under investigation and store data about it. 0t is diagrammatically represented as bo5es Attribute2 they are the data elements used to describe the properties @qualities that distinguish the entities. !elationship2 it is an association or connection between two or more entities. They are diagrammatically represented as arrowhead. A unary relationship is a relationship between instances of same entity. A binary relationship is a relationship between two entities. An %< array relationship is a relationship among An entities. 0t is defined only when the relationship doesnBt have a meaning without the participation of all the An1 entities.
INPUT DESIGN >0nput design is a process of converting user oriented inputs to a computeri;ed format?. 0nput design is the basic thing to be considered in the system design. 0n this process the input screens for the data entry. 0n such an interfaced design* the user inputs the data by filling the ban+s basis on the screens. &ach entry from has its own command button* which provides users the facility to insert a new world record* delete
G.C.W PARADE 1@

and modify an e5isting record. The major approaches to input design are menu* formatted from* prompts and alerts.
OUTPUT DESIGN This is based on user requirements and the format is designed +eeping views of hose necessities. thus2?the output design emphasi;es on providing a hard copy of information required or displaying the output on a C!T screen in a predefined format?. FORMS DESIGN Computer out Cput is the most important and direct source of information to the user. "ence* an intelligent and efficient output design improves the system relationship with the user and helps in decision = ma+ing. A major forms of output is the hard copy from the printer >.forms design elaborates on the way output is presented and the layouts available for capturing information >. The data available in any system is vital to that system. 'o1 the data must be provided in the right forms for input and the information produced must be in a format acceptable to the user. >A form is a tool with a message2 it is a physical carrier of data of information >. A poorly designed form is a poor administration tool. The suffecient space has been provided in all forms to avoid comple5ity and over crowing of data. "ence F:!-' must be attractive and graphical user interface. USER INTERFACE DESIGN Any software product in addition to being effective and fast in functionality should also be user friendly. For designing a good (#0 developer should consider the following principles2 Clarity $isual feedbac+ (ood response Audible feedbac+ Traceable paths
G.C.W PARADE
2A

Control design
PROCESS DESIGN The process design gives insight into the way in which the processing is done in the system. "ere* the processing is done through menus and application is complete event driven.
C&AP !R ;
"A A )*(, "IA'RAM

G.C.W PARADE 21
DATA F3O8 DIA2RAM OF CO33E2E PAY RO33 MANA2EMENT SYSTEM
G.C.W PARADE
22
C"APTER #
!R6"IA'RAM
G.C.W PARADE
23
ER-DIAGRAM OF PAYROLL MANAGEMENT SYSTEM
G.C.W PARADE
24
G.C.W PARADE
25
C"APTER $
WOR!ING EN%IRONMENT
8OR9IN2 EN6IRONMENT
TECHNICA3 SPECIFICATIONS:-
HARD8ARE EN6IRONMENT
G.C.W PARADE 2(

P) /&#( 'ollo/& - )o '&-,r%#&o Pro)e""or: - P: /&#( m& &m,m ;+: 2H. RAM: - < 2B H%r! !&"4: - ;<= 2B Pr& #er: - A y l%"er0 & 45e# or De"4Je# pr& #er+ Op#&)%l !r&ve: - CD Dr&ve or D6D Dr&ve+
SOFT8ARE EN6IRONMENT
OPERATIN2 SYSTEM: - M&)ro"o'# 8& !o/" >P*6&"#%+ BAC9 END: - M&)ro"o'# S73 Server (<==?) FRONT END: - 6B+NET CASE TOO3: - M&)ro"o'# /or! <==@
G.C.W PARADE
2)
C"APTER &
TEC"NOLOGY (%B.NET
0ntroduction To $isual 'tudio.%et

G.C.W PARADE 23

:ne of the major areas of change is in .eb development. /rior to .%&T* .eb application programming was all about A'/. The script based technology had its own shortcomings and inefficiencies and the lessons derived from the e5perience resulted in the creation of the web development technology named A'/.%&T. $isual 'tudio.%et which includes A'/.%&T furthered the concept by ma+ing the code and the interfaces similar across various programming disciplines<such as web development and application development. This has eased the process of transition from application development to web development for the developer. "owever* unli+e application development* web development must ta+e into consideration the fact that applications are to be designed to tal+ to one another over a networ+. The issues involved performance and scalability across remotely connected systems. Considerations such as messaging* manipulation of user interface* security and handling of multiple users* identification and state assume importance in the conte5t of the networ+. The evolution of $isual 'tudio.%et reflects the commitment of -icrosoft to cater to the emerging needs of the developers using their products. $isual 'tudio.%&T is an 0ntegrated evelopment &nvironment 30 &4.0 &s optimi;es programmer functions by offering interconnected software components with similar interfaces or connection points* enabling users to communicate with and command a program.
-icrosoft $isual 'tudio is a suite or collection of software development tools. 0n DEED* -icrosoft released $isual 'tudio.%&T* an edition of visual studio designed with unique coding applications. $isual Basic.%&T is an object oriented computer language that can be viewed as an evolution of -icrosoft1s.
$isual Basic 3$B4 implemented on the -icrosoft .%&T framewor+ .The framewor+ contains a virtual machine called Common 0ntermediate ,anguage3C0,4.$isual 'tudio .%&T includes a source code editor with which you can edit program language codes .$isual 'tudio.%&T includes a source code editor *with which you can edit program language codes .$isual studio.%&T code is also compiled via the -icrosoft 0ntermediate ,anguage 3-'0,4 format .-'0, complies coding language native to the platform on which it is e5ecuted * enabling cross<platform code portability.
.NET FRAMEWOR!
G.C.W PARADE 2@

The .%&T framewor+ is a revolutionary program by -icrosoft for developing applications2< 0t is a platform for application developers. 0t is a framewor+ that supports multiple languages. 0t has 0 & 30ntegrated evelopment &nvironment4.
Framewor+ is a set of utilities or can say building bloc+s of our application system. .%&T framewor+ provides (#0 in a (#0 manner. .%&T is a platform independent but with a help of -:%:<C:-/0,AT0:% ')'T&- 3-C<'4.-C<' is a middle level interface. .%&T framewor+ provides interperoribility between languages i.e.* Common Type 'ystem 3CT'4. .%&T Framewor+ also includes the .%&T Common ,anguage !untime 3C,!4 which is responsible for maintaining the e5ecution of all application developed using the .%&T ,ibrary. The .%&T framewor+ consists primarily library of code. 0n short .%&T framewor+ includes no restrictions on the type of applications that are possible .The .%&T framewor+ allows the creation of windows applications *web applications and web services and a lot more .The .%&T framewor+ has been designed so that it can be used from any language including CF*C77*$isual basic *8<'cript and even older.
G.C.W PARADE
3A
ARC"ITECTURE
G.C.W PARADE 31

The .%&T framewor+ is an inbuilt windows component that supports building and running the ne5t generation of running the ne5t generation of application G-, web services .The .%&T framewor+ has been developed to cater to the following objectives and requirements2< To provide a consistent object oriented environment to develop applications. To provide a code e5ecution that eliminates the issues face by subscripted environments with respect to performance. To provide a common programming model where the choice of programming language becomes a matter of choice. The .%&T framewor+ is made up of two language C:--:% ,A%(#A(& !#%T0-&3C,!4 and the .%&T Framewor+ Class ,ibrary 3FC,4.The C,! is the basic for the .%&T framewor+ and provides various services that application can use .0t also forms the environment that other application run on. The runtime is supposed to be an agent that manages code and e5ecution time* providing code services such as memory management* thread management and remodeling .0t also encourage security and robustness by implementing safety and other type of code accuracy .'ince code management is a basic principle for a runtime is +nown as unmanaged code .The .%&T framewor+ consist of web forms* windows forms* and console applications that pertain to the presentation layer of an application. .eb forms are used in web based application whereas windows forms are used in window based application. .e can create a character based console application that can be e5ecuted from the command line. .%&T frame consist of two other component i.e* the .%&T framewor+ base classes and the C,!.
G.C.W PARADE
32
8INDO8S PRINTIN2
FORMS0
DRA8IN2
AND
&$&!)T"0%( ):# "&A! AB:#T $B.%&T development in the maga;ines or online seems to focus on features such as web services* using the browser as the delivery platform* A'/.%&T and other web based topics. The many improvements made to client side windows (#0 development under .%&T using the visual studio 0 & are barely mentioned. This may sound strange to say of a -icrosoft product* but (#0 development in visual studio is under<hyped9 there are in fact many improvements that $B programmers have long awaitedH Although we agree that using the browser as delivery platform is clearly becoming more and more important* we also feel pretty strongly that the traditional windows based client is not going away. 0n this chapter* we hope to counterbalance this general trend by showing you the fundamentals of the programming needed to build (#0s in $B.%&T. .e will not spend much time on how to use the !A 3!apid Application evelopment4 features of the 0 & * or the properties* methods and events for various controls in the te5tbo5< doing this justice would ta+e a boo+ at least as long as this one. 0nstead by concentrating on the programming issues involved* we hope to show you how (#0 development in .%&T wor+s. At that point* you can loo+ at the documentation as needed or wait for a complete boo+ on (#0 development to learn more. After discussing how to program with forms and controls* we ta+e up the basics of graphics programming in $B.%&T* which is quite a bit different than it was.
FORM DESI2NER BASICS

For $BIE programmers* adjusting to how the $'.%&T 0 & handles forms and controls is pretty simple. )ou have a couple of new tools that we briefly describe later* but the basic idea of how to wor+ with the toolbo5 has not changed very much. For those who have never used an older version of the $B 0 &* here is what you need to do to add a control to the form window2 I. ouble clic+ on a control or drag it from the toolbo5 to the form in the default si;e.
D. /osition it by clic+ing inside it and then dragging it to the correct location. J. !esi;e it by dragging one of the small square si;ing bo5es that the cursor points to.
33
G.C.W PARADE

)ou can also add controls to a form by the following steps2 I. 0n the toolbo5* clic+ on the control you want to add to a toolbo5. D. -ove the cursor to the form. J. Clic+ where you want to position the top left corner of the control and then drag to the lower right corner position. For controls without a user interface* such as Timers* simply double clic+ on them. They end up in a tray beneath the form* thus reducing clutter. )ou can see the Format menu to reposition and resi;e controls once they are on to form. :f course* many of the items on the Format menu* such as ones on the Align submenu* ma+e sense for a group of controls. :ne way to select a group of controls is to clic+ the first control in the group and then hold down the control +ey while clic+ing the other members you want in the group. At this point they will all show si;ing handles but only control will have dar+ si;ing handles+
MDI FORMS
0n earlier versions of $B* -ultiple ocument 0nterface 3- 04 applications required you to decide which form was the - 0 parent form at the design time. 0n .%&T you need only set is the - 0 container property of the form to true. )ou create the child forms at the design time or at run time via code* and then set their - 0 parent properties to reference a form whose is - 0 container property is true. This lets you do something that was essentially impossible in earlier versions of $B2 change a - 0 parent@child relationship at run time. 0t also allows an application to contain multiple - 0 parent forms.
DATABASE ACCESS WIT" %B.NET

ADO+NET
G.C.W PARADE
34

.ith each version of $B came a different model for accessing a database. $B.%&T follows in this tradition with a whole new way of accessing the data2 A :.%&T. This means A :.%&T is horribly misnamed. .hyK Because it is hardly the ne5t generation of A :H 0n fact* it is a completely different model for accessing the data than classic A :. 0n particular you must learn a new object model based on dataset object for your results. 0n addition* A :.%&T2 I. 0s designed as a completely disconnected architecture. D. oes not support server<side cursors. A :1s dynamic cursors are no longer available.
J. 0s G-, based I. L. 0s part of the .%&T 'ystem. ata. ll assembly* rather than being language basedK M. 0s unli+ely to support legacy .indows NM clients. The other interesting point is that in order to have essential features such as two<phase commit* you need to use &nterprise 'ervices. 0n $BIE* a typical database application opened a connection to the database and then used that connection for all queries for the life of the program. 0n $B.%&T database access through A :.%&T usually depends upon disconnected data access 3detached data access4. This is a fancy way of saying that you most often as+ for the data from a database and then* after your program retrieves the data* the connection is dropped. .ith A :.%&T you are very* li+ely to have persistent connections to a data source. Because data is usually disconnected* a typical .%&T database application has to reconnect to the database for each query it e5ecutes. At first* this seems li+e a big step bac+ward but it really is not. The old way of maintaining the connection is not really practical for a distributed world2 if your application opens a connection to a database and leaves it open* the server has to maintain that connection until the client closes it. .ith heavily loaded servers pushing (oogle of bits of data* maintaining all those per<client connections is very costly in terms of band<width.
G.C.W PARADE
35
C"APTER '
G.C.W PARADE
3(
SCREEN S"OTS
L()*+ ,(-.:-
G.C.W PARADE
3)
MDI PARENT FORM:-
G.C.W PARADE
33
EMPLOYEE PERSONAL INFORMATION:-
G.C.W PARADE
3@
DEPARTMENT INFORMATION:-
G.C.W PARADE
4A
SALARY GENERATION:-
G.C.W PARADE
41
PAYBAND INFORMATION:-
G.C.W PARADE
42
C"APTER /
G.C.W PARADE 43
CODING
G.C.W PARADE
44
FORM 1(PAYBAND
Imports System Imports System.Data.SqlClient Public Class Form1 Dim cmdadd As New SqlCommand Dim cmddelete As New SqlCommand Dim cmdsearch As New SqlCommand Dim cmdedit As New SqlCommand Dim cnn As New SqlConnection ( Data Source!."S#$%&P'%SS(AttachDbFilename!C)"pro*ects"+,1+ pro*ects"payroll"payroll"payroll.md-(Inte.rated Security!/rue(Connect /imeout!0,(1ser Instance!/rue 2 Pri3ate Sub btnadd4Clic5 (6y7al sender As System.8b*ect9 6y7al e As System.%3entAr.s2 :andles btnadd.Clic5 ;Call -illte<tbo< (2 cmbpayband.Focus (2 /ry I- cnn.State ! 1 /hen cnn.Close (2 cnn.8pen (2 =s.6o< ( Connection 8pen> 2 %nd I;cnn.Close (2 Catch e< As %<ception =s.6o<( Can not open connection > %nd /ry ;cnn.8pen(2 /hen I- cmbpayband./e<t ?@ %lse
And label0./e<t ?@
And labelA./e<t ?@ B
cmdadd.Command/e<t ! INS%'/ IN/8 payband(pbcode9scale9.pay2 7A$1%S (; B cmbpayband./e<t B ;9; B label0./e<t B ;9 B labelA./e<t B 2( cmdadd.Command/ype ! Command/ype./e<t cmdadd.Connection ! cnn cmdadd.%<ecuteNon#uery(2 =s.6o<( 'ecord inserted success-ully. 2
%lse =s.6o<( %nter the required 3alues) 2 %nd I-
G.C.W PARADE
45

cmdadd.Dispose(2 cnn.Close(2 %nd Sub Pri3ate Sub btndelete4Clic5(6y7al sender As System.8b*ect9 6y7al e As System.%3entAr.s2 :andles btndelete.Clic5 I- cmbpayband./e<t ?@ And label0./e<t ?@ And labelA./e<t ?@ /hen ;cnn.8pen(2 /ry I- cnn.State ! 1 /hen cnn.Close(2 cnn.8pen(2 =s.6o<( Connection 8pen > 2 %nd I;cnn.Close(2 Catch e< As %<ception =s.6o<( Can not open connection > %nd /ry cmddelete.Command/e<t ! B cmbpayband./e<t B %lse
2 paybandcode !
delete -rom payband where
;=s.6o<(cmd1pdate.Command/e<t2 cmddelete.Command/ype ! Command/ype./e<t cmddelete.Connection ! cnn cmddelete.%<ecuteNon#uery(2 =s.6o<( 'ecord deleted. 2 %lse =s.6o<( %nter the required 3alues) B 3bNew$ine B +. scale etc.. 2 %nd Icnn.Close(2 cmddelete.Dispose(2 %nd Sub Pri3ate Sub btnedit4Clic5(6y7al sender As System.8b*ect9 6y7al e As System.%3entAr.s2 :andles btnedit.Clic5 ;Call -illte<tbo<(2 /hen I- cmbpayband./e<t ?@ And label0./e<t ?@ And labelA./e<t ?@ B 3bNew$ine B 1. payband Code
;cnn.8pen(2 /ry I- cnn.State ! 1 /hen
G.C.W PARADE
4(

cnn.Close(2 cnn.8pen(2 =s.6o<( Connection 8pen > 2 %nd I;cnn.Close(2 Catch e< As %<ception =s.6o<( Can not open connection > %nd /ry %lse
cmdedit.Command/e<t ! 1PDA/% payband S%/ payband code ! ; B cmbpayband./e<t B ;9 scale!; B label0./e<t B ;9.rade pay!; B labelA./e<t B ;9 C:%'% paybandcode ! B cmbpayband./e<t B ( ;=s.6o<(cmd1pdate.Command/e<t2 cmdedit.Command/ype ! Command/ype./e<t cmdedit.Connection ! cnn cmdedit.%<ecuteNon#uery(2 =s.6o<( 'ecord updated. 2 %lse =s.6o<( %nter the required 3alues) B 3bNew$ine B +. scale etc.. 2 %nd Icnn.Close(2 cmdedit.Dispose(2 %nd Sub Pri3ate Sub btnsearch4Clic5(6y7al sender As System.8b*ect9 6y7al e As System.%3entAr.s2 :andles btnsearch.Clic5 Call -illte<tbo<(2 Dim 3Search As Strin. ! Input6o<( %nter payband Code to search ) 2 cnn.8pen(2 I- 3Search ?@ /hen cmdsearch.Command/e<t ! 3Search cmdsearch.Connection ! cnn Dim rdrS#$ As SqlData'eader ! cmdsearch.%<ecute'eader I- rdrS#$.'ead ! /rue /hen cmbpayband./e<t B! rdrS#$.Item(,2./oStrin. label0./e<t B! rdrS#$.Item(12./oStrin. labelA./e<t B! rdrS#$.Item(+2./oStrin. S%$%C/ D F'8= payband C:%'% pbcode! B B 3bNew$ine B 1. payband Code
G.C.W PARADE
4)

rdrS#$.Close(2 cnn.Close(2 %<it Sub %lse =s.6o<( 'ecord not -ound 2 rdrS#$.Close(2 cnn.Close(2 %<it Sub %nd I%lse =s.6o<( %nter search 3alue. 2 %<it Sub %nd I%nd Sub Pri3ate Sub btnclear4Clic5(6y7al sender As System.8b*ect9 6y7al e As System.%3entAr.s2 :andles btnclear.Clic5 Call -illte<tbo<(2 %nd Sub Pri3ate Sub btne<it4Clic5(6y7al sender As System.8b*ect9 6y7al e As System.%3entAr.s2 :andles btne<it.Clic5 =e.Close(2 %nd Sub Pri3ate Sub Form14$oad(6y7al sender As System.8b*ect9 6y7al e As System.%3entAr.s2 :andles =y6ase.$oad ;/8D8) /his line o- code loads data into the ;PayrollDataSet+.payband; table. Eou can mo3e9 or remo3e it9 as needed. =e.Payband/ableAdapter1.Fill(=e.PayrollDataSet+.payband2 %nd Sub Pri3ate Sub btno54Clic5(6y7al sender As System.8b*ect9 6y7al e As System.%3entAr.s2 :andles btno5.Clic5 I- t<tecode.te<t ?@ /hen cmdsearch.Command/e<t ! S%$%C/ D F'8= emppersonal C:%'% empcode! B CInt(t<tecode./e<t2 cmdsearch.Connection ! cnn cnn.8pen(2 Dim rdrS#$ As SqlData'eader ! cmdsearch.%<ecute'eader I- rdrS#$.'ead ! /rue /hen
G.C.W PARADE
43

cmbpbcode./e<t B! rdrS#$.Item(A2./oStrin. rdrS#$.Close(2 cnn.Close(2 %<it Sub %lse =s.6o<( 'ecord not -ound 2 %<it Sub %nd I%lse =s.6o<( %nter %mployee Code 3alue. 2 %<it Sub %nd I%nd Sub Pri3ate Sub Fill6y/oolStrip6utton4Clic5(6y7al sender As System.8b*ect9 6y7al e As System.%3entAr.s2 :andles Fill6y/oolStrip6utton.Clic5 /ry =e.Payband/ableAdapter.Fill6y(=e.PayrollDataSet1.payband2 Catch e< As System.%<ception System.Cindows.Forms.=essa.e6o<.Show(e<.=essa.e2 %nd /ry %nd Sub Pri3ate Sub Fill6y1/oolStrip6utton4Clic5(6y7al sender As System.8b*ect9 6y7al e As System.%3entAr.s2 /ry =e.Payband/ableAdapter.Fill6y1(=e.PayrollDataSet1.payband2 Catch e< As System.%<ception System.Cindows.Forms.=essa.e6o<.Show(e<.=essa.e2 %nd /ry %nd Sub Pri3ate Sub Fill6y/oolStrip6utton14Clic5(6y7al sender As System.8b*ect9 6y7al e As System.%3entAr.s2 /ry =e.Payband/ableAdapter1.Fill6y(=e.PayrollDataSet+.payband2 Catch e< As System.%<ception System.Cindows.Forms.=essa.e6o<.Show(e<.=essa.e2 %nd /ry %nd Sub %nd Class
G.C.W PARADE
4@
F:!- I &'0(%&! C: & 3/A)BA% 4

?Flobal.=icroso-t.7isual6asic.CompilerSer3ices.Desi.nerFenerated(2@ 4 Partial Class Form1 Inherits System.Cindows.Forms.Form ;Form o3errides dispose to clean up the component list. ?System.Dia.nostics.Debu..erNon1serCode(2@ 4 Protected 83errides Sub Dispose(6y7al disposin. As 6oolean2 /ry I- disposin. AndAlso components IsNot Nothin. /hen components.Dispose(2 %nd IFinally =y6ase.Dispose(disposin.2 %nd /ry %nd Sub ;'equired by the Cindows Form Desi.ner Pri3ate components As System.Component=odel.IContainer ;N8/%) /he -ollowin. procedure is required by the Cindows Form Desi.ner ;It can be modi-ied usin. the Cindows Form Desi.ner. ;Do not modi-y it usin. the code editor. ?System.Dia.nostics.Debu..erStep/hrou.h(2@ 4 Pri3ate Sub InitialiGeComponent(2 =e.components ! New System.Component=odel.Container(2 Dim resources As System.Component=odel.Component'esource=ana.er ! New System.Component=odel.Component'esource=ana.er(Fet/ype(Form122 =e.Froup6o<1 ! New System.Cindows.Forms.Froup6o<(2 =e.btno5 ! New System.Cindows.Forms.6utton(2 =e.cmb.pay ! New System.Cindows.Forms.Combo6o<(2 =e.cmbscale ! New System.Cindows.Forms.Combo6o<(2 =e.cmbpbcode ! New System.Cindows.Forms.Combo6o<(2 =e.t<tecode ! New System.Cindows.Forms./e<t6o<(2 =e.labelA ! New System.Cindows.Forms.$abel(2 =e.label0 ! New System.Cindows.Forms.$abel(2 =e.cmbpayband ! New System.Cindows.Forms.$abel(2 =e.$abel+ ! New System.Cindows.Forms.$abel(2 =e.Froup6o<+ ! New System.Cindows.Forms.Froup6o<(2 =e.btnadd ! New System.Cindows.Forms.6utton(2 =e.btndelete ! New System.Cindows.Forms.6utton(2 =e.btnedit ! New System.Cindows.Forms.6utton(2 =e.btnsearch ! New System.Cindows.Forms.6utton(2 =e.btnclear ! New System.Cindows.Forms.6utton(2 =e.btne<it ! New System.Cindows.Forms.6utton(2 =e.$abel1 ! New System.Cindows.Forms.$abel(2 =e.DataFrid7iew1 ! New System.Cindows.Forms.DataFrid7iew(2 =e.PbcodeDataFrid7iew/e<t6o<Column ! New System.Cindows.Forms.DataFrid7iew/e<t6o<Column(2 =e.ScaleDataFrid7iew/e<t6o<Column ! New System.Cindows.Forms.DataFrid7iew/e<t6o<Column(2 =e.FpayDataFrid7iew/e<t6o<Column ! New System.Cindows.Forms.DataFrid7iew/e<t6o<Column(2
G.C.W PARADE
5A

=e.Payband6indin.Source ! New System.Cindows.Forms.6indin.Source(=e.components2 =e.PayrollDataSet+6indin.Source1 ! New System.Cindows.Forms.6indin.Source(=e.components2 =e.PayrollDataSet+ ! New payroll.payrollDataSet+(2 =e.PayrollDataSet+6indin.Source ! New System.Cindows.Forms.6indin.Source(=e.components2 =e.PayrollDataSet1 ! New payroll.payrollDataSet1(2 =e.Payband/ableAdapter ! New payroll.payrollDataSet1/ableAdapters.payband/ableAdapter(2 =e./ableAdapter=ana.er ! New payroll.payrollDataSet1/ableAdapters./ableAdapter=ana.er(2 =e.Fill6y/oolStrip ! New System.Cindows.Forms./oolStrip(2 =e.Fill6y/oolStrip6utton ! New System.Cindows.Forms./oolStrip6utton(2 =e.PayrollDataSet ! New payroll.payrollDataSet(2 =e.PayrollDataSet6indin.Source ! New System.Cindows.Forms.6indin.Source(=e.components2 =e.PayrollDataSet16indin.Source ! New System.Cindows.Forms.6indin.Source(=e.components2 =e.Payband/ableAdapter1 ! New payroll.payrollDataSet+/ableAdapters.payband/ableAdapter(2 =e.Froup6o<1.Suspend$ayout(2 =e.Froup6o<+.Suspend$ayout(2 C/ype(=e.DataFrid7iew19 System.Component=odel.ISupportInitialiGe2.6e.inInit(2 C/ype(=e.Payband6indin.Source9 System.Component=odel.ISupportInitialiGe2.6e.inInit(2 C/ype(=e.PayrollDataSet+6indin.Source19 System.Component=odel.ISupportInitialiGe2.6e.inInit(2 C/ype(=e.PayrollDataSet+9 System.Component=odel.ISupportInitialiGe2.6e.inInit(2 C/ype(=e.PayrollDataSet+6indin.Source9 System.Component=odel.ISupportInitialiGe2.6e.inInit(2 C/ype(=e.PayrollDataSet19 System.Component=odel.ISupportInitialiGe2.6e.inInit(2 =e.Fill6y/oolStrip.Suspend$ayout(2 C/ype(=e.PayrollDataSet9 System.Component=odel.ISupportInitialiGe2.6e.inInit(2 C/ype(=e.PayrollDataSet6indin.Source9 System.Component=odel.ISupportInitialiGe2.6e.inInit(2 C/ype(=e.PayrollDataSet16indin.Source9 System.Component=odel.ISupportInitialiGe2.6e.inInit(2 =e.Suspend$ayout(2 ; ;Froup6o<1 ; =e.Froup6o<1.6ac5Color ! System.Drawin..SystemColors.Acti3eCaption =e.Froup6o<1.Controls.Add(=e.btno52 =e.Froup6o<1.Controls.Add(=e.cmb.pay2 =e.Froup6o<1.Controls.Add(=e.cmbscale2 =e.Froup6o<1.Controls.Add(=e.cmbpbcode2 =e.Froup6o<1.Controls.Add(=e.t<tecode2 =e.Froup6o<1.Controls.Add(=e.labelA2 =e.Froup6o<1.Controls.Add(=e.label02 =e.Froup6o<1.Controls.Add(=e.cmbpayband2 =e.Froup6o<1.Controls.Add(=e.$abel+2
G.C.W PARADE
51

=e.Froup6o<1.Font ! New System.Drawin..Font( =icroso-t Sans Seri- 9 H.IJ>9 System.Drawin..FontStyle.6old9 System.Drawin..Fraphics1nit.Point9 C/ype(,9 6yte22 =e.Froup6o<1.ForeColor ! System.Drawin..Color.FromAr.b(C/ype(C/ype(,9 6yte29 Inte.er29 C/ype(C/ype(,9 6yte29 Inte.er29 C/ype(C/ype(KA9 6yte29 Inte.er22 =e.Froup6o<1.$ocation ! New System.Drawin..Point(1H+9 AA2 =e.Froup6o<1.Name ! Froup6o<1 =e.Froup6o<1.SiGe ! New System.Drawin..SiGe(+LK9 +AL2 =e.Froup6o<1./abInde< ! , =e.Froup6o<1./abStop ! False =e.Froup6o<1./e<t ! PAE6AND INF8'=A/I8N ; ;btno5 ; =e.btno5.$ocation ! New System.Drawin..Point(1J,9 KK2 =e.btno5.Name ! btno5 =e.btno5.SiGe ! New System.Drawin..SiGe(AH9 +02 =e.btno5./abInde< ! H =e.btno5./e<t ! 85 =e.btno5.1se7isualStyle6ac5Color ! /rue ; ;cmb.pay ; =e.cmb.pay.Formattin.%nabled ! /rue =e.cmb.pay.$ocation ! New System.Drawin..Point(1J,9 +,H2 =e.cmb.pay.Name ! cmb.pay =e.cmb.pay.SiGe ! New System.Drawin..SiGe(1+19 +A2 =e.cmb.pay./abInde< ! L ; ;cmbscale ; =e.cmbscale.Formattin.%nabled ! /rue =e.cmbscale.$ocation ! New System.Drawin..Point(1J,9 1J,2 =e.cmbscale.Name ! cmbscale =e.cmbscale.SiGe ! New System.Drawin..SiGe(1+19 +A2 =e.cmbscale./abInde< ! I ; ;cmbpbcode ; =e.cmbpbcode.Formattin.%nabled ! /rue =e.cmbpbcode.$ocation ! New System.Drawin..Point(1J,9 H,2 =e.cmbpbcode.Name ! cmbpbcode =e.cmbpbcode.SiGe ! New System.Drawin..SiGe(1+19 +A2 =e.cmbpbcode./abInde< ! K ; ;t<tecode ; =e.t<tecode.$ocation ! New System.Drawin..Point(1J,9 0L2 =e.t<tecode.Name ! t<tecode =e.t<tecode.SiGe ! New System.Drawin..SiGe(1+19 ++2 =e.t<tecode./abInde< ! J ; ;labelA ; =e.labelA.AutoSiGe ! /rue =e.labelA.ForeColor ! System.Drawin..SystemColors.6utton:i.hli.ht
G.C.W PARADE
52

=e.labelA.$ocation ! New System.Drawin..Point(+I9 +1I2 =e.labelA.Name ! labelA =e.labelA.SiGe ! New System.Drawin..SiGe(L19 1K2 =e.labelA./abInde< ! A =e.labelA./e<t ! Frade pay ; ;label0 ; =e.label0.AutoSiGe ! /rue =e.label0.ForeColor ! System.Drawin..SystemColors.6utton:i.hli.ht =e.label0.$ocation ! New System.Drawin..Point(+I9 1J02 =e.label0.Name ! label0 =e.label0.SiGe ! New System.Drawin..SiGe(AL9 1K2 =e.label0./abInde< ! 0 =e.label0./e<t ! Scale ; ;cmbpayband ; =e.cmbpayband.AutoSiGe ! /rue =e.cmbpayband.ForeColor ! System.Drawin..SystemColors.6utton:i.hli.ht =e.cmbpayband.$ocation ! New System.Drawin..Point(+I9 HL2 =e.cmbpayband.Name ! cmbpayband =e.cmbpayband.SiGe ! New System.Drawin..SiGe(1,H9 1K2 =e.cmbpayband./abInde< ! + =e.cmbpayband./e<t ! Payband code ; ;$abel+ ; =e.$abel+.AutoSiGe ! /rue =e.$abel+.ForeColor ! System.Drawin..SystemColors.6utton:i.hli.ht =e.$abel+.$ocation ! New System.Drawin..Point(+I9 0L2 =e.$abel+.Name ! $abel+ =e.$abel+.SiGe ! New System.Drawin..SiGe(11I9 1K2 =e.$abel+./abInde< ! 1 =e.$abel+./e<t ! %mployee code ; ;Froup6o<+ ; =e.Froup6o<+.6ac5Color ! System.Drawin..SystemColors.Acti3eCaption =e.Froup6o<+.Controls.Add(=e.btnadd2 =e.Froup6o<+.Controls.Add(=e.btndelete2 =e.Froup6o<+.Controls.Add(=e.btnedit2 =e.Froup6o<+.Controls.Add(=e.btnsearch2 =e.Froup6o<+.Controls.Add(=e.btnclear2 =e.Froup6o<+.Controls.Add(=e.btne<it2 =e.Froup6o<+.Font ! New System.Drawin..Font( =icroso-t Sans Seri- 9 H.IJ>9 System.Drawin..FontStyle.6old9 System.Drawin..Fraphics1nit.Point9 C/ype(,9 6yte22 =e.Froup6o<+.ForeColor ! System.Drawin..Color.FromAr.b(C/ype(C/ype(,9 6yte29 Inte.er29 C/ype(C/ype(,9 6yte29 Inte.er29 C/ype(C/ype(KA9 6yte29 Inte.er22 =e.Froup6o<+.$ocation ! New System.Drawin..Point(JK,9 AA2 =e.Froup6o<+.Name ! Froup6o<+ =e.Froup6o<+.SiGe ! New System.Drawin..SiGe(+,,9 +K,2 =e.Froup6o<+./abInde< ! , =e.Froup6o<+./abStop ! False =e.Froup6o<+./e<t ! 8P%'A/I8NS
G.C.W PARADE
53

; ;btnadd ; =e.btnadd.6ac5Color ! System.Drawin..Color.Na3y =e.btnadd.ForeColor ! System.Drawin..SystemColors.6utton:i.hli.ht =e.btnadd.Ima.e ! C/ype(resources.Fet8b*ect( btnadd.Ima.e 29 System.Drawin..Ima.e2 =e.btnadd.Ima.eAli.n ! System.Drawin..ContentAli.nment.=iddle'i.ht =e.btnadd.$ocation ! New System.Drawin..Point(AJ9 1H2 =e.btnadd.Name ! btnadd =e.btnadd.SiGe ! New System.Drawin..SiGe(10,9 0A2 =e.btnadd./abInde< ! 1 =e.btnadd./e<t ! AddBNew =e.btnadd.1se7isualStyle6ac5Color ! False ; ;btndelete ; =e.btndelete.6ac5Color ! System.Drawin..Color.Na3y =e.btndelete.ForeColor ! System.Drawin..SystemColors.6utton:i.hli.ht =e.btndelete.Ima.e ! C/ype(resources.Fet8b*ect( btndelete.Ima.e 29 System.Drawin..Ima.e2 =e.btndelete.Ima.eAli.n ! System.Drawin..ContentAli.nment.=iddle'i.ht =e.btndelete.$ocation ! New System.Drawin..Point(AJ9 JH2 =e.btndelete.Name ! btndelete =e.btndelete.SiGe ! New System.Drawin..SiGe(10,9 0,2 =e.btndelete./abInde< ! + =e.btndelete./e<t ! BDelete =e.btndelete.1se7isualStyle6ac5Color ! False ; ;btnedit ; =e.btnedit.6ac5Color ! System.Drawin..Color.Na3y =e.btnedit.ForeColor ! System.Drawin..SystemColors.6utton:i.hli.ht =e.btnedit.Ima.e ! C/ype(resources.Fet8b*ect( btnedit.Ima.e 29 System.Drawin..Ima.e2 =e.btnedit.Ima.eAli.n ! System.Drawin..ContentAli.nment.=iddle'i.ht =e.btnedit.$ocation ! New System.Drawin..Point(AJ9 HJ2 =e.btnedit.Name ! btnedit =e.btnedit.SiGe ! New System.Drawin..SiGe(10,9 002 =e.btnedit./abInde< ! 0 =e.btnedit./e<t ! B%dit =e.btnedit.1se7isualStyle6ac5Color ! False ; ;btnsearch ; =e.btnsearch.6ac5Color ! System.Drawin..Color.Na3y =e.btnsearch.ForeColor ! System.Drawin..SystemColors.6utton:i.hli.ht =e.btnsearch.Ima.e ! C/ype(resources.Fet8b*ect( btnsearch.Ima.e 29 System.Drawin..Ima.e2 =e.btnsearch.Ima.eAli.n ! System.Drawin..ContentAli.nment.=iddle'i.ht =e.btnsearch.$ocation ! New System.Drawin..Point(AJ9 10A2 =e.btnsearch.Name ! btnsearch =e.btnsearch.SiGe ! New System.Drawin..SiGe(10,9 0A2 =e.btnsearch./abInde< ! A =e.btnsearch./e<t ! BSearch =e.btnsearch.1se7isualStyle6ac5Color ! False ;
G.C.W PARADE
54

;btnclear ; =e.btnclear.6ac5Color ! System.Drawin..Color.Na3y =e.btnclear.ForeColor ! System.Drawin..SystemColors.6utton:i.hli.ht =e.btnclear.Ima.e ! C/ype(resources.Fet8b*ect( btnclear.Ima.e 29 System.Drawin..Ima.e2 =e.btnclear.Ima.eAli.n ! System.Drawin..ContentAli.nment.=iddle'i.ht =e.btnclear.$ocation ! New System.Drawin..Point(AJ9 1IA2 =e.btnclear.Name ! btnclear =e.btnclear.SiGe ! New System.Drawin..SiGe(10,9 0,2 =e.btnclear./abInde< ! J =e.btnclear./e<t ! BClear =e.btnclear.1se7isualStyle6ac5Color ! False ; ;btne<it ; =e.btne<it.6ac5Color ! System.Drawin..Color.Na3y =e.btne<it.ForeColor ! System.Drawin..SystemColors.6utton:i.hli.ht =e.btne<it.Ima.e ! C/ype(resources.Fet8b*ect( btne<it.Ima.e 29 System.Drawin..Ima.e2 =e.btne<it.Ima.eAli.n ! System.Drawin..ContentAli.nment.=iddle'i.ht =e.btne<it.$ocation ! New System.Drawin..Point(AJ9 +1I2 =e.btne<it.Name ! btne<it =e.btne<it.SiGe ! New System.Drawin..SiGe(10,9 012 =e.btne<it./abInde< ! K =e.btne<it./e<t ! B%<it =e.btne<it.1se7isualStyle6ac5Color ! False ; ;$abel1 ; =e.$abel1.AutoSiGe ! /rue =e.$abel1.Font ! New System.Drawin..Font( =icroso-t Sans Seri- 9 +A.,>9 C/ype((System.Drawin..FontStyle.6old 8r System.Drawin..FontStyle.Italic29 System.Drawin..FontStyle29 System.Drawin..Fraphics1nit.Point9 C/ype(,9 6yte22 =e.$abel1.ForeColor ! System.Drawin..Color.FromAr.b(C/ype(C/ype(,9 6yte29 Inte.er29 C/ype(C/ype(,9 6yte29 Inte.er29 C/ype(C/ype(KA9 6yte29 Inte.er22 =e.$abel1.$ocation ! New System.Drawin..Point(0IJ9 A2 =e.$abel1.Name ! $abel1 =e.$abel1.SiGe ! New System.Drawin..SiGe(1IH9 0I2 =e.$abel1./abInde< ! , =e.$abel1./e<t ! PAE6AND ; ;DataFrid7iew1 ; =e.DataFrid7iew1.AutoFenerateColumns ! False =e.DataFrid7iew1.Column:eaders:ei.htSiGe=ode ! System.Cindows.Forms.DataFrid7iewColumn:eaders:ei.htSiGe=ode.AutoSiGe =e.DataFrid7iew1.Columns.Add'an.e(New System.Cindows.Forms.DataFrid7iewColumn(2 M=e.PbcodeDataFrid7iew/e<t6o<Column9 =e.ScaleDataFrid7iew/e<t6o<Column9 =e.FpayDataFrid7iew/e<t6o<ColumnN2 =e.DataFrid7iew1.DataSource ! =e.Payband6indin.Source =e.DataFrid7iew1.$ocation ! New System.Drawin..Point(+L09 01H2 =e.DataFrid7iew1.Name ! DataFrid7iew1 =e.DataFrid7iew1.SiGe ! New System.Drawin..SiGe(A0J9 1J,2 =e.DataFrid7iew1./abInde< ! 1 ;
G.C.W PARADE
55

;PbcodeDataFrid7iew/e<t6o<Column ; =e.PbcodeDataFrid7iew/e<t6o<Column.DataPropertyName ! pbcode =e.PbcodeDataFrid7iew/e<t6o<Column.:eader/e<t ! pbcode =e.PbcodeDataFrid7iew/e<t6o<Column.Name ! PbcodeDataFrid7iew/e<t6o<Column ; ;ScaleDataFrid7iew/e<t6o<Column ; =e.ScaleDataFrid7iew/e<t6o<Column.DataPropertyName ! scale =e.ScaleDataFrid7iew/e<t6o<Column.:eader/e<t ! scale =e.ScaleDataFrid7iew/e<t6o<Column.Name ! ScaleDataFrid7iew/e<t6o<Column ; ;FpayDataFrid7iew/e<t6o<Column ; =e.FpayDataFrid7iew/e<t6o<Column.DataPropertyName ! .pay =e.FpayDataFrid7iew/e<t6o<Column.:eader/e<t ! .pay =e.FpayDataFrid7iew/e<t6o<Column.Name ! FpayDataFrid7iew/e<t6o<Column ; ;Payband6indin.Source ; =e.Payband6indin.Source.Data=ember ! payband =e.Payband6indin.Source.DataSource ! =e.PayrollDataSet+6indin.Source1 ; ;PayrollDataSet+6indin.Source1 ; =e.PayrollDataSet+6indin.Source1.DataSource ! =e.PayrollDataSet+ =e.PayrollDataSet+6indin.Source1.Position ! , ; ;PayrollDataSet+ ; =e.PayrollDataSet+.DataSetName ! payrollDataSet+ =e.PayrollDataSet+.SchemaSerialiGation=ode ! System.Data.SchemaSerialiGation=ode.IncludeSchema ; ;PayrollDataSet+6indin.Source ; =e.PayrollDataSet+6indin.Source.DataSource ! =e.PayrollDataSet1 =e.PayrollDataSet+6indin.Source.Position ! , ; ;PayrollDataSet1 ; =e.PayrollDataSet1.DataSetName ! payrollDataSet1 =e.PayrollDataSet1.SchemaSerialiGation=ode ! System.Data.SchemaSerialiGation=ode.IncludeSchema ; ;Payband/ableAdapter ; =e.Payband/ableAdapter.Clear6e-oreFill ! /rue ; ;/ableAdapter=ana.er ; =e./ableAdapter=ana.er.6ac5upDataSet6e-ore1pdate ! False =e./ableAdapter=ana.er.payband/ableAdapter ! =e.Payband/ableAdapter =e./ableAdapter=ana.er.salary/ableAdapter ! Nothin.
G.C.W PARADE
5(

=e./ableAdapter=ana.er.1pdate8rder ! payroll.payrollDataSet1/ableAdapters./ableAdapter=ana.er.1pdate8rder8ption.Inse rt1pdateDelete ; ;Fill6y/oolStrip ; =e.Fill6y/oolStrip.Items.Add'an.e(New System.Cindows.Forms./oolStripItem(2 M=e.Fill6y/oolStrip6uttonN2 =e.Fill6y/oolStrip.$ocation ! New System.Drawin..Point(,9 ,2 =e.Fill6y/oolStrip.Name ! Fill6y/oolStrip =e.Fill6y/oolStrip.SiGe ! New System.Drawin..SiGe(1,1A9 +J2 =e.Fill6y/oolStrip./abInde< ! + =e.Fill6y/oolStrip./e<t ! Fill6y/oolStrip ; ;Fill6y/oolStrip6utton ; =e.Fill6y/oolStrip6utton.DisplayStyle ! System.Cindows.Forms./oolStripItemDisplayStyle./e<t =e.Fill6y/oolStrip6utton.Name ! Fill6y/oolStrip6utton =e.Fill6y/oolStrip6utton.SiGe ! New System.Drawin..SiGe(0J9 ++2 =e.Fill6y/oolStrip6utton./e<t ! Fill6y ; ;PayrollDataSet ; =e.PayrollDataSet.DataSetName ! payrollDataSet =e.PayrollDataSet.SchemaSerialiGation=ode ! System.Data.SchemaSerialiGation=ode.IncludeSchema ; ;PayrollDataSet6indin.Source ; =e.PayrollDataSet6indin.Source.DataSource ! =e.PayrollDataSet =e.PayrollDataSet6indin.Source.Position ! , ; ;PayrollDataSet16indin.Source ; =e.PayrollDataSet16indin.Source.DataSource ! =e.PayrollDataSet1 =e.PayrollDataSet16indin.Source.Position ! , ; ;Payband/ableAdapter1 ; =e.Payband/ableAdapter1.Clear6e-oreFill ! /rue ; ;Form1 ; =e.AutoScaleDimensions ! New System.Drawin..SiGeF(K.,>9 10.,>2 =e.AutoScale=ode ! System.Cindows.Forms.AutoScale=ode.Font =e.6ac5Color ! System.Drawin..Color.FromAr.b(C/ype(C/ype(1H+9 6yte29 Inte.er29 C/ype(C/ype(1H+9 6yte29 Inte.er29 C/ype(C/ype(+JJ9 6yte29 Inte.er22 =e.ClientSiGe ! New System.Drawin..SiGe(1,1A9 J1,2 =e.Controls.Add(=e.Fill6y/oolStrip2 =e.Controls.Add(=e.DataFrid7iew12 =e.Controls.Add(=e.Froup6o<+2 =e.Controls.Add(=e.Froup6o<12 =e.Controls.Add(=e.$abel12 =e.Name ! Form1 =e./e<t ! Form1 =e.CindowState ! System.Cindows.Forms.FormCindowState.=a<imiGed
G.C.W PARADE
5)

=e.Froup6o<1.'esume$ayout(False2 =e.Froup6o<1.Per-orm$ayout(2 =e.Froup6o<+.'esume$ayout(False2 C/ype(=e.DataFrid7iew19 System.Component=odel.ISupportInitialiGe2.%ndInit(2 C/ype(=e.Payband6indin.Source9 System.Component=odel.ISupportInitialiGe2.%ndInit(2 C/ype(=e.PayrollDataSet+6indin.Source19 System.Component=odel.ISupportInitialiGe2.%ndInit(2 C/ype(=e.PayrollDataSet+9 System.Component=odel.ISupportInitialiGe2.%ndInit(2 C/ype(=e.PayrollDataSet+6indin.Source9 System.Component=odel.ISupportInitialiGe2.%ndInit(2 C/ype(=e.PayrollDataSet19 System.Component=odel.ISupportInitialiGe2.%ndInit(2 =e.Fill6y/oolStrip.'esume$ayout(False2 =e.Fill6y/oolStrip.Per-orm$ayout(2 C/ype(=e.PayrollDataSet9 System.Component=odel.ISupportInitialiGe2.%ndInit(2 C/ype(=e.PayrollDataSet6indin.Source9 System.Component=odel.ISupportInitialiGe2.%ndInit(2 C/ype(=e.PayrollDataSet16indin.Source9 System.Component=odel.ISupportInitialiGe2.%ndInit(2 =e.'esume$ayout(False2 =e.Per-orm$ayout(2 %nd Sub Friend Cith%3ents Froup6o<1 As System.Cindows.Forms.Froup6o< Friend Cith%3ents labelA As System.Cindows.Forms.$abel Friend Cith%3ents label0 As System.Cindows.Forms.$abel Friend Cith%3ents cmbpayband As System.Cindows.Forms.$abel Friend Cith%3ents $abel+ As System.Cindows.Forms.$abel Friend Cith%3ents Froup6o<+ As System.Cindows.Forms.Froup6o< Friend Cith%3ents $abel1 As System.Cindows.Forms.$abel Friend Cith%3ents cmb.pay As System.Cindows.Forms.Combo6o< Friend Cith%3ents cmbscale As System.Cindows.Forms.Combo6o< Friend Cith%3ents cmbpbcode As System.Cindows.Forms.Combo6o< Friend Cith%3ents t<tecode As System.Cindows.Forms./e<t6o< Friend Cith%3ents btne<it As System.Cindows.Forms.6utton Friend Cith%3ents btnadd As System.Cindows.Forms.6utton Friend Cith%3ents btndelete As System.Cindows.Forms.6utton Friend Cith%3ents btnedit As System.Cindows.Forms.6utton Friend Cith%3ents btnsearch As System.Cindows.Forms.6utton Friend Cith%3ents btnclear As System.Cindows.Forms.6utton Friend Cith%3ents DataFrid7iew1 As System.Cindows.Forms.DataFrid7iew Friend Cith%3ents btno5 As System.Cindows.Forms.6utton Friend Cith%3ents PayrollDataSet+6indin.Source As System.Cindows.Forms.6indin.Source Friend Cith%3ents PayrollDataSet+ As payroll.payrollDataSet+ Friend Cith%3ents PayrollDataSet1 As payroll.payrollDataSet1 Friend Cith%3ents Payband/ableAdapter As payroll.payrollDataSet1/ableAdapters.payband/ableAdapter Friend Cith%3ents /ableAdapter=ana.er As payroll.payrollDataSet1/ableAdapters./ableAdapter=ana.er Friend Cith%3ents Fill6y/oolStrip As System.Cindows.Forms./oolStrip Friend Cith%3ents Fill6y/oolStrip6utton As System.Cindows.Forms./oolStrip6utton
G.C.W PARADE
53

Friend Cith%3ents PayrollDataSet+6indin.Source1 As System.Cindows.Forms.6indin.Source Friend Cith%3ents PayrollDataSet As payroll.payrollDataSet Friend Cith%3ents PayrollDataSet6indin.Source As System.Cindows.Forms.6indin.Source Friend Cith%3ents PayrollDataSet16indin.Source As System.Cindows.Forms.6indin.Source Friend Cith%3ents Payband6indin.Source As System.Cindows.Forms.6indin.Source Friend Cith%3ents Payband/ableAdapter1 As payroll.payrollDataSet+/ableAdapters.payband/ableAdapter Friend Cith%3ents PbcodeDataFrid7iew/e<t6o<Column As System.Cindows.Forms.DataFrid7iew/e<t6o<Column Friend Cith%3ents ScaleDataFrid7iew/e<t6o<Column As System.Cindows.Forms.DataFrid7iew/e<t6o<Column Friend Cith%3ents FpayDataFrid7iew/e<t6o<Column As System.Cindows.Forms.DataFrid7iew/e<t6o<Column %nd Class
F:!- D 3 &/A!T-&%T4
Imports System Imports System.Data.SqlClient Public Class Form+ Dim cmdadd As New SqlCommand Dim cmddelete As New SqlCommand Dim cmdedit As New SqlCommand Dim cmdsearch As New SqlCommand Dim cnn As New SqlConnection( Data Source!."S#$%&P'%SS(AttachDbFilename!C)"Pro*ects"+,1+ pro*ects"payroll.cwp"payroll"payroll"payroll.md-(Inte.rated Security!/rue(Connect /imeout!0,(1ser Instance!/rue 2 Pri3ate Sub btnadd4Clic5(6y7al sender As System.8b*ect9 6y7al e As System.%3entAr.s2 :andles btnadd.Clic5
G.C.W PARADE
5@

;Call -illte<tbo<(2 Dim cnt As Inte.er cnt ! , /ry I- cnn.State ! 1 /hen %lse cnn.Close(2
cnn.8pen(2 =s.6o<( Connection 8pen > 2 %nd I;cnn.Close(2 Catch e< As %<ception =s.6o<( Can not open connection > 2 %nd /ry ;cnn.8pen(2 cmdsearch.Command/e<t ! S%$%C/ D F'8= department cmdsearch.Connection ! cnn Dim rdrS#$ As SqlData'eader ! cmdsearch.%<ecute'eader Chile rdrS#$.'ead ! /rue cnt ! cnt O 1 %nd Chile cmdsearch.Dispose(2 cnn.Close(2 cmbdeptcode./e<t ! cnt O 1 t<tdeptname.Focus(2 I- t<tdeptname./e<t ?@ /hen cmdadd.Command/e<t ! INS%'/ IN/8 department(deptname9deptcode2 B 7A$1%S (; B t<tdeptname./e<t B ;9; B cmbdeptcode./e<t B ; 2( cnn.8pen(2 cmdadd.Command/ype ! Command/ype./e<t cmdadd.Connection ! cnn cmdadd.%<ecuteNon#uery(2 =s.6o<( 'ecord inserted success-ully. 2
%lse =s.6o<( %nter the required 3alues) 2 %nd I-
cmdadd.Dispose(2 cnn.Close(2
G.C.W PARADE
(A

%nd Sub
Pri3ate Sub 6uttonK4Clic5(6y7al sender As System.8b*ect9 6y7al e As System.%3entAr.s2 :andles 6uttonK.Clic5 =e.Close(2 %nd Sub Pri3ate Sub Form+4$oad(6y7al sender As System.8b*ect9 6y7al e As System.%3entAr.s2 :andles =y6ase.$oad ;/8D8) /his line o- code loads data into the ;PayrollDataSet+.department; table. Eou can mo3e9 or remo3e it9 as needed. =e.Department/ableAdapter.Fill(=e.PayrollDataSet+.department2 ;/8D8) /his line o- code loads data into the ;PayrollDataSet1.department; table. Eou can mo3e9 or remo3e it9 as needed. ; =e.Department/ableAdapter.Fill(=e.PayrollDataSet1.department2 t<tdeptname.Focus(2 %nd Sub Pri3ate Sub Department6indin.Source4CurrentChan.ed(6y7al sender As System.8b*ect9 6y7al e As System.%3entAr.s2 %nd Sub %nd Class
F:!- D &'0(%&! C: & 3 &/A!T-&%T4

?Flobal.=icroso-t.7isual6asic.CompilerSer3ices.Desi.nerFenerated(2@ 4 Partial Class Form+ Inherits System.Cindows.Forms.Form ;Form o3errides dispose to clean up the component list. ?System.Dia.nostics.Debu..erNon1serCode(2@ 4 Protected 83errides Sub Dispose(6y7al disposin. As 6oolean2 /ry I- disposin. AndAlso components IsNot Nothin. /hen components.Dispose(2 %nd IFinally
G.C.W PARADE
(1

=y6ase.Dispose(disposin.2 %nd /ry %nd Sub ;'equired by the Cindows Form Desi.ner Pri3ate components As System.Component=odel.IContainer ;N8/%) /he -ollowin. procedure is required by the Cindows Form Desi.ner ;It can be modi-ied usin. the Cindows Form Desi.ner. ;Do not modi-y it usin. the code editor. ?System.Dia.nostics.Debu..erStep/hrou.h(2@ 4 Pri3ate Sub InitialiGeComponent(2 =e.components ! New System.Component=odel.Container(2 Dim resources As System.Component=odel.Component'esource=ana.er ! New System.Component=odel.Component'esource=ana.er(Fet/ype(Form+22 =e.$abel1 ! New System.Cindows.Forms.$abel(2 =e.Froup6o<1 ! New System.Cindows.Forms.Froup6o<(2 =e.$abelJ ! New System.Cindows.Forms.$abel(2 =e.t<tdeptname ! New System.Cindows.Forms./e<t6o<(2 =e.cmbdeptcode ! New System.Cindows.Forms.Combo6o<(2 =e.$abel0 ! New System.Cindows.Forms.$abel(2 =e.$abel+ ! New System.Cindows.Forms.$abel(2 =e.Froup6o<+ ! New System.Cindows.Forms.Froup6o<(2 =e.btnadd ! New System.Cindows.Forms.6utton(2 =e.6uttonK ! New System.Cindows.Forms.6utton(2 =e.DataFrid7iew1 ! New System.Cindows.Forms.DataFrid7iew(2 =e.Column1 ! New System.Cindows.Forms.DataFrid7iew/e<t6o<Column(2 =e.Column+ ! New System.Cindows.Forms.DataFrid7iew/e<t6o<Column(2 =e.DataFrid7iew/e<t6o<Column1 ! New System.Cindows.Forms.DataFrid7iew/e<t6o<Column(2 =e.DataFrid7iew/e<t6o<Column+ ! New System.Cindows.Forms.DataFrid7iew/e<t6o<Column(2 =e.6indin.Source1 ! New System.Cindows.Forms.6indin.Source(=e.components2 =e.PayrollDataSet+ ! New payroll.payrollDataSet+(2 =e.$abelA ! New System.Cindows.Forms.$abel(2 =e.Department/ableAdapter ! New payroll.payrollDataSet+/ableAdapters.department/ableAdapter(2 =e.Froup6o<1.Suspend$ayout(2 =e.Froup6o<+.Suspend$ayout(2 C/ype(=e.DataFrid7iew19 System.Component=odel.ISupportInitialiGe2.6e.inInit(2 C/ype(=e.6indin.Source19 System.Component=odel.ISupportInitialiGe2.6e.inInit(2 C/ype(=e.PayrollDataSet+9 System.Component=odel.ISupportInitialiGe2.6e.inInit(2 =e.Suspend$ayout(2 ; ;$abel1 ; =e.$abel1.AutoSiGe ! /rue =e.$abel1.Font ! New System.Drawin..Font( Arial 9 +A.,>9 System.Drawin..FontStyle.6old9 System.Drawin..Fraphics1nit.Point9 C/ype(,9 6yte22 =e.$abel1.ForeColor ! System.Drawin..Color.FromAr.b(C/ype(C/ype(,9 6yte29 Inte.er29 C/ype(C/ype(,9 6yte29 Inte.er29 C/ype(C/ype(KA9 6yte29 Inte.er22
G.C.W PARADE
(2

=e.$abel1.$ocation ! New System.Drawin..Point(+J+9 KJ2 =e.$abel1.Name ! $abel1 =e.$abel1.SiGe ! New System.Drawin..SiGe(0AI9 0I2 =e.$abel1./abInde< ! , =e.$abel1./e<t ! D%PA'/=%N/ F8'= ; ;Froup6o<1 ; =e.Froup6o<1.6ac5Color ! System.Drawin..SystemColors.Acti3eCaption =e.Froup6o<1.Controls.Add(=e.$abelJ2 =e.Froup6o<1.Controls.Add(=e.t<tdeptname2 =e.Froup6o<1.Controls.Add(=e.cmbdeptcode2 =e.Froup6o<1.Controls.Add(=e.$abel02 =e.Froup6o<1.Controls.Add(=e.$abel+2 =e.Froup6o<1.Font ! New System.Drawin..Font( =icroso-t Sans Seri- 9 H.IJ>9 System.Drawin..FontStyle.6old9 System.Drawin..Fraphics1nit.Point9 C/ype(,9 6yte22 =e.Froup6o<1.ForeColor ! System.Drawin..Color.FromAr.b(C/ype(C/ype(,9 6yte29 Inte.er29 C/ype(C/ype(,9 6yte29 Inte.er29 C/ype(C/ype(KA9 6yte29 Inte.er22 =e.Froup6o<1.$ocation ! New System.Drawin..Point(L,9 1+02 =e.Froup6o<1.Name ! Froup6o<1 =e.Froup6o<1.SiGe ! New System.Drawin..SiGe(0HI9 1HJ2 =e.Froup6o<1./abInde< ! 1 =e.Froup6o<1./abStop ! False =e.Froup6o<1./e<t ! Department in-ormation ; ;$abelJ ; =e.$abelJ.AutoSiGe ! /rue =e.$abelJ.Font ! New System.Drawin..Font( =icroso-t Sans Seri- 9 H.,>9 System.Drawin..FontStyle.6old9 System.Drawin..Fraphics1nit.Point9 C/ype(,9 6yte22 =e.$abelJ.ForeColor ! System.Drawin..Color.=aroon =e.$abelJ.$ocation ! New System.Drawin..Point(K9 LI2 =e.$abelJ.Name ! $abelJ =e.$abelJ.SiGe ! New System.Drawin..SiGe(0JJ9 1J2 =e.$abelJ./abInde< ! J =e.$abelJ./e<t ! %nter New Department Name and Press AdNew 6utton ; ;t<tdeptname ; =e.t<tdeptname.Font ! New System.Drawin..Font( =icroso-t Sans Seri- 9 1+.,>9 System.Drawin..FontStyle.6old9 System.Drawin..Fraphics1nit.Point9 C/ype(,9 6yte22 =e.t<tdeptname.$ocation ! New System.Drawin..Point(+0H9 A+2 =e.t<tdeptname.=ultiline ! /rue =e.t<tdeptname.Name ! t<tdeptname =e.t<tdeptname.SiGe ! New System.Drawin..SiGe(1,,9 ++2 =e.t<tdeptname./abInde< ! A ; ;cmbdeptcode ; =e.cmbdeptcode.Font ! New System.Drawin..Font( =icroso-t Sans Seri- 9 1+.,>9 System.Drawin..FontStyle.6old9 System.Drawin..Fraphics1nit.Point9 C/ype(,9 6yte22 =e.cmbdeptcode.Formattin.%nabled ! /rue
G.C.W PARADE
(3

=e.cmbdeptcode.$ocation ! New System.Drawin..Point(++K9 10,2 =e.cmbdeptcode.Name ! cmbdeptcode =e.cmbdeptcode.SiGe ! New System.Drawin..SiGe(1+19 +L2 =e.cmbdeptcode./abInde< ! 0 ; ;$abel0 ; =e.$abel0.AutoSiGe ! /rue =e.$abel0.Font ! New System.Drawin..Font( =icroso-t Sans Seri- 9 1+.,>9 System.Drawin..FontStyle.6old9 System.Drawin..Fraphics1nit.Point9 C/ype(,9 6yte22 =e.$abel0.ForeColor ! System.Drawin..SystemColors.6utton:i.hli.ht =e.$abel0.$ocation ! New System.Drawin..Point(0K9 1002 =e.$abel0.Name ! $abel0 =e.$abel0.SiGe ! New System.Drawin..SiGe(1AL9 +,2 =e.$abel0./abInde< ! 1 =e.$abel0./e<t ! Department code ; ;$abel+ ; =e.$abel+.AutoSiGe ! /rue =e.$abel+.Font ! New System.Drawin..Font( =icroso-t Sans Seri- 9 1+.,>9 System.Drawin..FontStyle.6old9 System.Drawin..Fraphics1nit.Point9 C/ype(,9 6yte22 =e.$abel+.ForeColor ! System.Drawin..SystemColors.6utton:i.hli.ht =e.$abel+.$ocation ! New System.Drawin..Point(0K9 AJ2 =e.$abel+.Name ! $abel+ =e.$abel+.SiGe ! New System.Drawin..SiGe(1J09 +,2 =e.$abel+./abInde< ! , =e.$abel+./e<t ! Department name ; ;Froup6o<+ ; =e.Froup6o<+.6ac5Color ! System.Drawin..SystemColors.Acti3eCaption =e.Froup6o<+.Controls.Add(=e.btnadd2 =e.Froup6o<+.Controls.Add(=e.6uttonK2 =e.Froup6o<+.Font ! New System.Drawin..Font( =icroso-t Sans Seri- 9 H.,>9 System.Drawin..FontStyle.6old9 System.Drawin..Fraphics1nit.Point9 C/ype(,9 6yte22 =e.Froup6o<+.ForeColor ! System.Drawin..Color.FromAr.b(C/ype(C/ype(,9 6yte29 Inte.er29 C/ype(C/ype(,9 6yte29 Inte.er29 C/ype(C/ype(KA9 6yte29 Inte.er22 =e.Froup6o<+.$ocation ! New System.Drawin..Point(J,L9 1+02 =e.Froup6o<+.Name ! Froup6o<+ =e.Froup6o<+.SiGe ! New System.Drawin..SiGe(++L9 1HJ2 =e.Froup6o<+./abInde< ! + =e.Froup6o<+./abStop ! False =e.Froup6o<+./e<t ! 8P%'A/I8NS ; ;btnadd ; =e.btnadd.6ac5Color ! System.Drawin..Color.6lue =e.btnadd.Font ! New System.Drawin..Font( =icroso-t Sans Seri- 9 1+.,>9 System.Drawin..FontStyle.6old9 System.Drawin..Fraphics1nit.Point9 C/ype(,9 6yte22 =e.btnadd.ForeColor ! System.Drawin..SystemColors.6utton:i.hli.ht
G.C.W PARADE
(4

=e.btnadd.Ima.e ! C/ype(resources.Fet8b*ect( btnadd.Ima.e 29 System.Drawin..Ima.e2 =e.btnadd.Ima.eAli.n ! System.Drawin..ContentAli.nment.=iddle'i.ht =e.btnadd.$ocation ! New System.Drawin..Point(0A9 A,2 =e.btnadd.Name ! btnadd =e.btnadd.SiGe ! New System.Drawin..SiGe(1I19 A12 =e.btnadd./abInde< ! 0 =e.btnadd./e<t ! AddBNew =e.btnadd./e<tAli.n ! System.Drawin..ContentAli.nment.=iddle$e-t =e.btnadd.1se7isualStyle6ac5Color ! False ; ;6uttonK ; =e.6uttonK.6ac5Color ! System.Drawin..Color.6lue =e.6uttonK.Font ! New System.Drawin..Font( =icroso-t Sans Seri- 9 1+.,>9 System.Drawin..FontStyle.6old9 System.Drawin..Fraphics1nit.Point9 C/ype(,9 6yte22 =e.6uttonK.ForeColor ! System.Drawin..SystemColors.6utton:i.hli.ht =e.6uttonK.Ima.e ! C/ype(resources.Fet8b*ect( 6uttonK.Ima.e 29 System.Drawin..Ima.e2 =e.6uttonK.Ima.eAli.n ! System.Drawin..ContentAli.nment.=iddle'i.ht =e.6uttonK.$ocation ! New System.Drawin..Point(0A9 1102 =e.6uttonK.Name ! 6uttonK =e.6uttonK.SiGe ! New System.Drawin..SiGe(1I19 A,2 =e.6uttonK./abInde< ! L =e.6uttonK./e<t ! %B<it =e.6uttonK./e<tAli.n ! System.Drawin..ContentAli.nment.=iddle$e-t =e.6uttonK.1se7isualStyle6ac5Color ! False ; ;DataFrid7iew1 ; =e.DataFrid7iew1.AutoFenerateColumns ! False =e.DataFrid7iew1.Column:eaders:ei.htSiGe=ode ! System.Cindows.Forms.DataFrid7iewColumn:eaders:ei.htSiGe=ode.AutoSiGe =e.DataFrid7iew1.Columns.Add'an.e(New System.Cindows.Forms.DataFrid7iewColumn(2 M=e.Column19 =e.Column+9 =e.DataFrid7iew/e<t6o<Column19 =e.DataFrid7iew/e<t6o<Column+N2 =e.DataFrid7iew1.DataSource ! =e.6indin.Source1 =e.DataFrid7iew1.$ocation ! New System.Drawin..Point(0,K9 0A02 =e.DataFrid7iew1.Name ! DataFrid7iew1 =e.DataFrid7iew1.SiGe ! New System.Drawin..SiGe(+AJ9 1J,2 =e.DataFrid7iew1./abInde< ! 0 ; ;Column1 ; =e.Column1.DataPropertyName ! deptname =e.Column1.:eader/e<t ! Department name =e.Column1.Name ! Column1 ; ;Column+ ; =e.Column+.DataPropertyName ! deptcode =e.Column+.:eader/e<t ! Department code =e.Column+.Name ! Column+ ; ;DataFrid7iew/e<t6o<Column1 ;
G.C.W PARADE
(5

=e.DataFrid7iew/e<t6o<Column1.DataPropertyName ! deptcode =e.DataFrid7iew/e<t6o<Column1.:eader/e<t ! deptcode =e.DataFrid7iew/e<t6o<Column1.Name ! DataFrid7iew/e<t6o<Column1 ; ;DataFrid7iew/e<t6o<Column+ ; =e.DataFrid7iew/e<t6o<Column+.DataPropertyName ! deptname =e.DataFrid7iew/e<t6o<Column+.:eader/e<t ! deptname =e.DataFrid7iew/e<t6o<Column+.Name ! DataFrid7iew/e<t6o<Column+ ; ;6indin.Source1 ; =e.6indin.Source1.Data=ember ! department =e.6indin.Source1.DataSource ! =e.PayrollDataSet+ ; ;PayrollDataSet+ ; =e.PayrollDataSet+.DataSetName ! payrollDataSet+ =e.PayrollDataSet+.SchemaSerialiGation=ode ! System.Data.SchemaSerialiGation=ode.IncludeSchema ; ;$abelA ; =e.$abelA.AutoSiGe ! /rue =e.$abelA.Font ! New System.Drawin..Font( =onotype Corsi3a 9 +A.,>9 C/ype((System.Drawin..FontStyle.6old 8r System.Drawin..FontStyle.Italic29 System.Drawin..FontStyle29 System.Drawin..Fraphics1nit.Point9 C/ype(,9 6yte22 =e.$abelA.ForeColor ! System.Drawin..Color.FromAr.b(C/ype(C/ype(KA9 6yte29 Inte.er29 C/ype(C/ype(,9 6yte29 Inte.er29 C/ype(C/ype(,9 6yte29 Inte.er22 =e.$abelA.$ocation ! New System.Drawin..Point(+009 H2 =e.$abelA.Name ! $abelA =e.$abelA.SiGe ! New System.Drawin..SiGe(A0I9 0H2 =e.$abelA./abInde< ! A =e.$abelA./e<t ! C8$$%F% PAE'8$$ SES/%= ; ;Department/ableAdapter ; =e.Department/ableAdapter.Clear6e-oreFill ! /rue ; ;Form+ ; =e.AutoScaleDimensions ! New System.Drawin..SiGeF(K.,>9 10.,>2 =e.AutoScale=ode ! System.Cindows.Forms.AutoScale=ode.Font =e.6ac5Color ! System.Drawin..Color.FromAr.b(C/ype(C/ype(1H+9 6yte29 Inte.er29 C/ype(C/ype(1H+9 6yte29 Inte.er29 C/ype(C/ype(+JJ9 6yte29 Inte.er22 =e.ClientSiGe ! New System.Drawin..SiGe(LJI9 AH,2 =e.Controls.Add(=e.$abelA2 =e.Controls.Add(=e.DataFrid7iew12 =e.Controls.Add(=e.Froup6o<+2 =e.Controls.Add(=e.Froup6o<12 =e.Controls.Add(=e.$abel12 =e.Name ! Form+ =e./e<t ! Form+ =e.CindowState ! System.Cindows.Forms.FormCindowState.=a<imiGed =e.Froup6o<1.'esume$ayout(False2 =e.Froup6o<1.Per-orm$ayout(2 =e.Froup6o<+.'esume$ayout(False2
G.C.W PARADE
((

C/ype(=e.DataFrid7iew19 System.Component=odel.ISupportInitialiGe2.%ndInit(2 C/ype(=e.6indin.Source19 System.Component=odel.ISupportInitialiGe2.%ndInit(2 C/ype(=e.PayrollDataSet+9 System.Component=odel.ISupportInitialiGe2.%ndInit(2 =e.'esume$ayout(False2 =e.Per-orm$ayout(2 %nd Sub Friend Cith%3ents $abel1 As System.Cindows.Forms.$abel Friend Cith%3ents Froup6o<1 As System.Cindows.Forms.Froup6o< Friend Cith%3ents cmbdeptcode As System.Cindows.Forms.Combo6o< Friend Cith%3ents $abel0 As System.Cindows.Forms.$abel Friend Cith%3ents $abel+ As System.Cindows.Forms.$abel Friend Cith%3ents Froup6o<+ As System.Cindows.Forms.Froup6o< Friend Cith%3ents btnadd As System.Cindows.Forms.6utton Friend Cith%3ents 6uttonK As System.Cindows.Forms.6utton Friend Cith%3ents t<tdeptname As System.Cindows.Forms./e<t6o< ; Friend Cith%3ents Department/ableAdapter As payroll.payrollDataSet1/ableAdapters.department/ableAdapter Friend Cith%3ents DataFrid7iew1 As System.Cindows.Forms.DataFrid7iew Friend Cith%3ents $abelA As System.Cindows.Forms.$abel Friend Cith%3ents Column1 As System.Cindows.Forms.DataFrid7iew/e<t6o<Column Friend Cith%3ents Column+ As System.Cindows.Forms.DataFrid7iew/e<t6o<Column Friend Cith%3ents DeptcodeDataFrid7iew/e<t6o<Column As System.Cindows.Forms.DataFrid7iew/e<t6o<Column Friend Cith%3ents DeptnameDataFrid7iew/e<t6o<Column As System.Cindows.Forms.DataFrid7iew/e<t6o<Column Friend Cith%3ents 6indin.Source1 As System.Cindows.Forms.6indin.Source Friend Cith%3ents PayrollDataSet+ As payroll.payrollDataSet+ Friend Cith%3ents Department/ableAdapter As payroll.payrollDataSet+/ableAdapters.department/ableAdapter Friend Cith%3ents DataFrid7iew/e<t6o<Column1 As System.Cindows.Forms.DataFrid7iew/e<t6o<Column Friend Cith%3ents DataFrid7iew/e<t6o<Column+ As System.Cindows.Forms.DataFrid7iew/e<t6o<Column Friend Cith%3ents $abelJ As System.Cindows.Forms.$abel %nd Class
G.C.W PARADE
()
F:!- J 3'A,A!)4
Imports System.Data Imports System.Data.SqlClient Public Class Form0 Dim tbasic As Inte.er Dim cmdadd As New SqlCommand Dim cmdSearch As New SqlCommand Dim cmddelete As New SqlCommand Dim cmdedit As New SqlCommand Dim cnn As New SqlConnection( Data Source!."S#$%&P'%SS(AttachDbFilename! C)"Pro*ects"+,1+ pro*ects"payroll.cwp"payroll"payroll"payroll.md-(Inte.rated Security!/rue(Connect /imeout!0,(1ser Instance!/rue 2 Pri3ate Sub Form04$oad(6y7al sender As System.8b*ect9 6y7al e As System.%3entAr.s2 :andles =y6ase.$oad cmbsalmonth.6e.in1pdate(2 Dim intloopinde< As Inte.er For intloopinde< ! 1 /o 1+ cmbsalmonth.Items.Add(=onthName(intloopinde<22 Ne<t cmbsalmonth.%nd1pdate(2 t<tempcode.Focus(2 ; =e.'eport7iewer1.'e-resh'eport(2 %nd Sub Pri3ate Sub btnprint4Clic5(6y7al sender As System.8b*ect9 6y7al e As System.%3entAr.s2 :andles btnprint.Clic5 Dim t For %ach t In =e.Controls I- /ype8- t Is /e<t6o< /hen I- t./e<t ! /hen =s.6o<( Complete %ntry> 2 %<it Sub %<it For %nd I%nd INe<t /ry I- cnn.State ! 1 /hen cnn.Close(2
G.C.W PARADE
(3

%lse cnn.8pen(2 =s.6o<( Connection 8pen > 2 %nd I;cnn.Close(2 Catch e< As %<ception =s.6o<( Can not open connection > 2 %nd /ry I- t<tempcode./e<t ?@ And cmbsalmonth./e<t ?@ /hen
And t<tit./e<t ?@
cmdadd.Command/e<t ! INS%'/ IN/8 salary(salmonth9empcode9basicpay9da9hra9cca9.p9it9*i9.rosspay9netpay2 B 7A$1%S (; B cmbsalmonth./e<t B ;9 B t<tempcode./e<t B 9 B t<tbasic./e<t B 9 B t<tda./e<t B 9 B t<thra./e<t B 9 B t<tcca./e<t B 9 B t<t.p-./e<t B 9 B t<tit./e<t B 9 B t<t*i./e<t B 9 B t<t.ross./e<t B 9 B t<tnet./e<t B 2( cmdadd.Command/ype ! Command/ype./e<t cmdadd.Connection ! cnn cmdadd.%<ecuteNon#uery(2 =s.6o<( 'ecord inserted success-ully. 2 cmdadd.Dispose(2 cnn.Close(2 %nd I%nd Sub Pri3ate Sub btn.etdetails4Clic5(6y7al sender As System.8b*ect9 6y7al e As System.%3entAr.s2 :andles btn.etdetails.Clic5 I- t<tempcode./e<t ?@ /hen cmdSearch.Command/e<t ! B CInt(t<tempcode./e<t2 S%$%C/ D F'8= emppersonal C:%'% empcode!
cmdSearch.Connection ! cnn cnn.8pen(2 Dim rdrS#$ As SqlData'eader ! cmdSearch.%<ecute'eader I- rdrS#$.'ead ! /rue /hen I- cmbsalmonth./e<t ! Panuary 8r cmbsalmonth./e<t ! /hen
Puly
tbasic B
tbasic ! rdrS#$.Item(102./oStrin. tbasic ! tbasic O (tbasic D 0 Q 1,,2 cmdedit.Command/e<t ! 1PDA/% emppersonal S%/ basic! where empcode! B CInt(t<tempcode./e<t2 cmdedit.Command/ype ! Command/ype./e<t cmdedit.Connection ! cnn rdrS#$.Close(2 cmdedit.%<ecuteNon#uery(2 %nd I%nd IrdrS#$ ! cmdSearch.%<ecute'eader(2
G.C.W PARADE
(@

I- rdrS#$.'ead ! /rue /hen t<tename./e<t B! rdrS#$.Item(12./oStrin. t<tdesi../e<t ! rdrS#$.Item(+2./oStrin. t<tdept./e<t ! rdrS#$.Item(02./oStrin. t<tpb./e<t ! rdrS#$.Item(A2./oStrin. t<tbasic./e<t ! rdrS#$.Item(102./oStrin. rdrS#$.Close(2 cnn.Close(2 ; t<tbasic.Focus(2 %<it Sub %lse =s.6o<( 'ecord not -ound 2 %<it Sub %lse %nd I=s.6o<( %nter %mployee Code. 2 %<it Sub %nd I%nd Sub Pri3ate Sub /e<t6o<14/e<tChan.ed(6y7al sender As System.8b*ect9 6y7al e As System.%3entAr.s2 :andles t<tename./e<tChan.ed %nd Sub
Pri3ate Sub Froup6o<+4%nter(6y7al sender As System.8b*ect9 6y7al e As System.%3entAr.s2 :andles Froup6o<+.%nter %nd Sub Pri3ate Sub btno54Clic5(6y7al sender As System.8b*ect9 6y7al e As System.%3entAr.s2 :andles btno5.Clic5 I- 7al(t<tbasic./e<t2 ? 7al(t<tpb./e<t2 /hen =s.6o<( 6asic 7alue should between Payband 7alue 9 =s.6o<Style.858nly2 %lse t<tda./e<t ! 7al(t<tbasic./e<t2 D J, Q 1,, t<thra./e<t ! 7al(t<tbasic./e<t2 D +, Q 1,, t<tcca./e<t ! +,, t<t.p-./e<t ! 7al(t<tbasic./e<t2 D L.J Q 1,, t<tit.Focus(2
G.C.W PARADE
)A

%nd I%nd Sub Pri3ate Sub t<tit4ReyPress(6y7al sender As 8b*ect9 6y7al e As System.Cindows.Forms.ReyPress%3entAr.s2 :andles t<tit.ReyPress t<t*i./e<t ! 1,, t<t.ross./e<t ! 7al(t<tbasic./e<t2 O 7al(t<tda./e<t2 O 7al(t<thra./e<t2 O 7al(t<tcca./e<t2 t<tnet./e<t ! 7al(t<t.ross./e<t2 S (7al(t<t.p-./e<t2 O 7al(t<tit./e<t2 O 7al(t<t*i./e<t22 %nd Sub Pri3ate Sub btne<it4Clic5(6y7al sender As System.8b*ect9 6y7al e As System.%3entAr.s2 :andles btne<it.Clic5 =e.Close(2 %nd Sub %nd Class
F:!- J &'0(%&! C: & 3'A,A!)4

?Flobal.=icroso-t.7isual6asic.CompilerSer3ices.Desi.nerFenerated(2@ 4 Partial Class Form0 Inherits System.Cindows.Forms.Form ;Form o3errides dispose to clean up the component list. ?System.Dia.nostics.Debu..erNon1serCode(2@ 4 Protected 83errides Sub Dispose(6y7al disposin. As 6oolean2 /ry I- disposin. AndAlso components IsNot Nothin. /hen components.Dispose(2 %nd IFinally =y6ase.Dispose(disposin.2 %nd /ry %nd Sub ;'equired by the Cindows Form Desi.ner Pri3ate components As System.Component=odel.IContainer ;N8/%) /he -ollowin. procedure is required by the Cindows Form Desi.ner ;It can be modi-ied usin. the Cindows Form Desi.ner. ;Do not modi-y it usin. the code editor. ?System.Dia.nostics.Debu..erStep/hrou.h(2@ 4 Pri3ate Sub InitialiGeComponent(2 Dim resources As System.Component=odel.Component'esource=ana.er ! New System.Component=odel.Component'esource=ana.er(Fet/ype(Form022 =e.$abel1 ! New System.Cindows.Forms.$abel(2 =e.Froup6o<+ ! New System.Cindows.Forms.Froup6o<(2 =e.t<tpb ! New System.Cindows.Forms./e<t6o<(2
G.C.W PARADE
)1

=e.t<tdept ! New System.Cindows.Forms./e<t6o<(2 =e.t<tdesi. ! New System.Cindows.Forms./e<t6o<(2 =e.$abel1K ! New System.Cindows.Forms.$abel(2 =e.$abel1J ! New System.Cindows.Forms.$abel(2 =e.$abel1A ! New System.Cindows.Forms.$abel(2 =e.t<tename ! New System.Cindows.Forms./e<t6o<(2 =e.$abel10 ! New System.Cindows.Forms.$abel(2 =e.Froup6o<A ! New System.Cindows.Forms.Froup6o<(2 =e.t<t*i ! New System.Cindows.Forms./e<t6o<(2 =e.t<tit ! New System.Cindows.Forms./e<t6o<(2 =e.t<t.p- ! New System.Cindows.Forms./e<t6o<(2 =e.$abel1, ! New System.Cindows.Forms.$abel(2 =e.$abelH ! New System.Cindows.Forms.$abel(2 =e.$abelL ! New System.Cindows.Forms.$abel(2 =e.Froup6o<0 ! New System.Cindows.Forms.Froup6o<(2 =e.btno5 ! New System.Cindows.Forms.6utton(2 =e.t<tcca ! New System.Cindows.Forms./e<t6o<(2 =e.t<thra ! New System.Cindows.Forms./e<t6o<(2 =e.t<tda ! New System.Cindows.Forms./e<t6o<(2 =e.t<tbasic ! New System.Cindows.Forms./e<t6o<(2 =e.$abelI ! New System.Cindows.Forms.$abel(2 =e.$abelK ! New System.Cindows.Forms.$abel(2 =e.$abelJ ! New System.Cindows.Forms.$abel(2 =e.$abelA ! New System.Cindows.Forms.$abel(2 =e.btn.etdetails ! New System.Cindows.Forms.6utton(2 =e.cmbsalmonth ! New System.Cindows.Forms.Combo6o<(2 =e.t<tnet ! New System.Cindows.Forms./e<t6o<(2 =e.t<t.ross ! New System.Cindows.Forms./e<t6o<(2 =e.t<tempcode ! New System.Cindows.Forms./e<t6o<(2 =e.$abel1+ ! New System.Cindows.Forms.$abel(2 =e.$abel11 ! New System.Cindows.Forms.$abel(2 =e.$abel0 ! New System.Cindows.Forms.$abel(2 =e.$abel+ ! New System.Cindows.Forms.$abel(2 =e.Froup6o<1 ! New System.Cindows.Forms.Froup6o<(2 =e.btne<it ! New System.Cindows.Forms.6utton(2 =e.btnprint ! New System.Cindows.Forms.6utton(2 =e.Froup6o<+.Suspend$ayout(2 =e.Froup6o<A.Suspend$ayout(2 =e.Froup6o<0.Suspend$ayout(2 =e.Froup6o<1.Suspend$ayout(2 =e.Suspend$ayout(2 ; ;$abel1 ; =e.$abel1.AutoSiGe ! /rue =e.$abel1.Font ! New System.Drawin..Font( =icroso-t Sans Seri- 9 1L.,>9 System.Drawin..FontStyle.6old9 System.Drawin..Fraphics1nit.Point9 C/ype(,9 6yte22 =e.$abel1.$ocation ! New System.Drawin..Point(+JK9 H2 =e.$abel1.=ar.in ! New System.Cindows.Forms.Paddin.(+9 ,9 +9 ,2 =e.$abel1.Name ! $abel1 =e.$abel1.SiGe ! New System.Drawin..SiGe(0KH9 +H2 =e.$abel1./abInde< ! , =e.$abel1./e<t ! SA$A'E F%N%'A/I8N F8'= ; ;Froup6o<+ ;
G.C.W PARADE
)2

=e.Froup6o<+.Controls.Add(=e.t<tpb2 =e.Froup6o<+.Controls.Add(=e.t<tdept2 =e.Froup6o<+.Controls.Add(=e.t<tdesi.2 =e.Froup6o<+.Controls.Add(=e.$abel1K2 =e.Froup6o<+.Controls.Add(=e.$abel1J2 =e.Froup6o<+.Controls.Add(=e.$abel1A2 =e.Froup6o<+.Controls.Add(=e.t<tename2 =e.Froup6o<+.Controls.Add(=e.$abel102 =e.Froup6o<+.Controls.Add(=e.Froup6o<A2 =e.Froup6o<+.Controls.Add(=e.Froup6o<02 =e.Froup6o<+.Controls.Add(=e.btn.etdetails2 =e.Froup6o<+.Controls.Add(=e.cmbsalmonth2 =e.Froup6o<+.Controls.Add(=e.t<tnet2 =e.Froup6o<+.Controls.Add(=e.t<t.ross2 =e.Froup6o<+.Controls.Add(=e.t<tempcode2 =e.Froup6o<+.Controls.Add(=e.$abel1+2 =e.Froup6o<+.Controls.Add(=e.$abel112 =e.Froup6o<+.Controls.Add(=e.$abel02 =e.Froup6o<+.Controls.Add(=e.$abel+2 =e.Froup6o<+.ForeColor ! System.Drawin..Color.FromAr.b(C/ype(C/ype(1H+9 6yte29 Inte.er29 C/ype(C/ype(,9 6yte29 Inte.er29 C/ype(C/ype(,9 6yte29 Inte.er22 =e.Froup6o<+.$ocation ! New System.Drawin..Point(KJ9 I02 =e.Froup6o<+.Name ! Froup6o<+ =e.Froup6o<+.SiGe ! New System.Drawin..SiGe(KHA9 AHI2 =e.Froup6o<+./abInde< ! +A =e.Froup6o<+./abStop ! False =e.Froup6o<+./e<t ! %mployee Salary ; ;t<tpb ; =e.t<tpb.6ac5Color ! System.Drawin..Color.Alice6lue =e.t<tpb.%nabled ! False =e.t<tpb.Font ! New System.Drawin..Font( Arial 'ounded =/ 6old 9 1+.,>9 System.Drawin..FontStyle.'e.ular9 System.Drawin..Fraphics1nit.Point9 C/ype(,9 6yte22 =e.t<tpb.ForeColor ! System.Drawin..Color.Na3y =e.t<tpb.$ocation ! New System.Drawin..Point(1L,9 +K02 =e.t<tpb.Name ! t<tpb =e.t<tpb.'ead8nly ! /rue =e.t<tpb.SiGe ! New System.Drawin..SiGe(10I9 +K2 =e.t<tpb./abInde< ! JK ; ;t<tdept ; =e.t<tdept.6ac5Color ! System.Drawin..Color.Alice6lue =e.t<tdept.%nabled ! False =e.t<tdept.Font ! New System.Drawin..Font( Arial 'ounded =/ 6old 9 1+.,>9 System.Drawin..FontStyle.'e.ular9 System.Drawin..Fraphics1nit.Point9 C/ype(,9 6yte22 =e.t<tdept.ForeColor ! System.Drawin..Color.Na3y =e.t<tdept.$ocation ! New System.Drawin..Point(1L,9 ++L2 =e.t<tdept.Name ! t<tdept =e.t<tdept.'ead8nly ! /rue =e.t<tdept.SiGe ! New System.Drawin..SiGe(10I9 +K2 =e.t<tdept./abInde< ! JJ ; ;t<tdesi.
G.C.W PARADE
)3

; =e.t<tdesi..6ac5Color ! System.Drawin..Color.Alice6lue =e.t<tdesi..%nabled ! False =e.t<tdesi..Font ! New System.Drawin..Font( Arial 'ounded =/ 6old 9 1+.,>9 System.Drawin..FontStyle.'e.ular9 System.Drawin..Fraphics1nit.Point9 C/ype(,9 6yte22 =e.t<tdesi..ForeColor ! System.Drawin..Color.Na3y =e.t<tdesi..$ocation ! New System.Drawin..Point(1L,9 1I+2 =e.t<tdesi..Name ! t<tdesi. =e.t<tdesi..'ead8nly ! /rue =e.t<tdesi..SiGe ! New System.Drawin..SiGe(10I9 +K2 =e.t<tdesi../abInde< ! JA ; ;$abel1K ; =e.$abel1K.AutoSiGe ! /rue =e.$abel1K.Font ! New System.Drawin..Font( Arial 'ounded =/ 6old 9 1+.,>9 System.Drawin..FontStyle.'e.ular9 System.Drawin..Fraphics1nit.Point9 C/ype(,9 6yte22 =e.$abel1K.ForeColor ! System.Drawin..Color.6lue =e.$abel1K.$ocation ! New System.Drawin..Point(+J9 +K,2 =e.$abel1K.Name ! $abel1K =e.$abel1K.SiGe ! New System.Drawin..SiGe(IL9 1L2 =e.$abel1K./abInde< ! J0 =e.$abel1K./e<t ! Payband ; ;$abel1J ; =e.$abel1J.AutoSiGe ! /rue =e.$abel1J.Font ! New System.Drawin..Font( Arial 'ounded =/ 6old 9 1+.,>9 System.Drawin..FontStyle.'e.ular9 System.Drawin..Fraphics1nit.Point9 C/ype(,9 6yte22 =e.$abel1J.ForeColor ! System.Drawin..Color.6lue =e.$abel1J.$ocation ! New System.Drawin..Point(+J9 +1J2 =e.$abel1J.Name ! $abel1J =e.$abel1J.SiGe ! New System.Drawin..SiGe(1,09 1L2 =e.$abel1J./abInde< ! J+ =e.$abel1J./e<t ! Department ; ;$abel1A ; =e.$abel1A.AutoSiGe ! /rue =e.$abel1A.Font ! New System.Drawin..Font( Arial 'ounded =/ 6old 9 1+.,>9 System.Drawin..FontStyle.'e.ular9 System.Drawin..Fraphics1nit.Point9 C/ype(,9 6yte22 =e.$abel1A.ForeColor ! System.Drawin..Color.6lue =e.$abel1A.$ocation ! New System.Drawin..Point(+J9 1I+2 =e.$abel1A.Name ! $abel1A =e.$abel1A.SiGe ! New System.Drawin..SiGe(1,09 1L2 =e.$abel1A./abInde< ! J1 =e.$abel1A./e<t ! Desi.nation ; ;t<tename ; =e.t<tename.6ac5Color ! System.Drawin..Color.Alice6lue =e.t<tename.%nabled ! False
G.C.W PARADE
)4

=e.t<tename.Font ! New System.Drawin..Font( Arial 'ounded =/ 6old 9 1+.,>9 System.Drawin..FontStyle.'e.ular9 System.Drawin..Fraphics1nit.Point9 C/ype(,9 6yte22 =e.t<tename.ForeColor ! System.Drawin..Color.Na3y =e.t<tename.$ocation ! New System.Drawin..Point(1L,9 1+02 =e.t<tename.=ultiline ! /rue =e.t<tename.Name ! t<tename =e.t<tename.'ead8nly ! /rue =e.t<tename.Scroll6ars ! System.Cindows.Forms.Scroll6ars.:oriGontal =e.t<tename.SiGe ! New System.Drawin..SiGe(10I9 ++2 =e.t<tename./abInde< ! J, ; ;$abel10 ; =e.$abel10.AutoSiGe ! /rue =e.$abel10.Font ! New System.Drawin..Font( Arial 'ounded =/ 6old 9 1+.,>9 System.Drawin..FontStyle.6old9 System.Drawin..Fraphics1nit.Point9 C/ype(,9 6yte22 =e.$abel10.ForeColor ! System.Drawin..Color.6lue =e.$abel10.$ocation ! New System.Drawin..Point(+J9 1+02 =e.$abel10.Name ! $abel10 =e.$abel10.SiGe ! New System.Drawin..SiGe(JL9 1L2 =e.$abel10./abInde< ! AH =e.$abel10./e<t ! Name ; ;Froup6o<A ; =e.Froup6o<A.Controls.Add(=e.t<t*i2 =e.Froup6o<A.Controls.Add(=e.t<tit2 =e.Froup6o<A.Controls.Add(=e.t<t.p-2 =e.Froup6o<A.Controls.Add(=e.$abel1,2 =e.Froup6o<A.Controls.Add(=e.$abelH2 =e.Froup6o<A.Controls.Add(=e.$abelL2 =e.Froup6o<A.Font ! New System.Drawin..Font( =icroso-t Sans Seri- 9 L.+J>9 System.Drawin..FontStyle.6old9 System.Drawin..Fraphics1nit.Point9 C/ype(,9 6yte22 =e.Froup6o<A.ForeColor ! System.Drawin..Color.FromAr.b(C/ype(C/ype(1H+9 6yte29 Inte.er29 C/ype(C/ype(,9 6yte29 Inte.er29 C/ype(C/ype(,9 6yte29 Inte.er22 =e.Froup6o<A.$ocation ! New System.Drawin..Point(A+H9 +L2 =e.Froup6o<A.Name ! Froup6o<A =e.Froup6o<A.SiGe ! New System.Drawin..SiGe(+A+9 1A,2 =e.Froup6o<A./abInde< ! AL =e.Froup6o<A./abStop ! False =e.Froup6o<A./e<t ! Deductions ; ;t<t*i ; =e.t<t*i.6ac5Color ! System.Drawin..Color.Chite =e.t<t*i.Font ! New System.Drawin..Font( Arial 'ounded =/ 6old 9 1+.,>9 System.Drawin..FontStyle.6old9 System.Drawin..Fraphics1nit.Point9 C/ype(,9 6yte22 =e.t<t*i.ForeColor ! System.Drawin..Color.6lac5 =e.t<t*i.$ocation ! New System.Drawin..Point(1K+9 1,,2 =e.t<t*i.=ar.in ! New System.Cindows.Forms.Paddin.(+2 =e.t<t*i.Name ! t<t*i =e.t<t*i.SiGe ! New System.Drawin..SiGe(IK9 +K2 =e.t<t*i./abInde< ! AL
G.C.W PARADE
)5

; ;t<tit ; =e.t<tit.6ac5Color ! System.Drawin..Color.Chite =e.t<tit.Font ! New System.Drawin..Font( Arial 'ounded =/ 6old 9 1+.,>9 System.Drawin..FontStyle.6old9 System.Drawin..Fraphics1nit.Point9 C/ype(,9 6yte22 =e.t<tit.ForeColor ! System.Drawin..Color.6lac5 =e.t<tit.$ocation ! New System.Drawin..Point(1K+9 K,2 =e.t<tit.=ar.in ! New System.Cindows.Forms.Paddin.(+2 =e.t<tit.Name ! t<tit =e.t<tit.SiGe ! New System.Drawin..SiGe(IK9 +K2 =e.t<tit./abInde< ! AI ; ;t<t.p; =e.t<t.p-.6ac5Color ! System.Drawin..Color.Chite =e.t<t.p-.Font ! New System.Drawin..Font( Arial 'ounded =/ 6old 9 1+.,>9 System.Drawin..FontStyle.6old9 System.Drawin..Fraphics1nit.Point9 C/ype(,9 6yte22 =e.t<t.p-.ForeColor ! System.Drawin..Color.6lac5 =e.t<t.p-.$ocation ! New System.Drawin..Point(1K+9 1J2 =e.t<t.p-.=ar.in ! New System.Cindows.Forms.Paddin.(+2 =e.t<t.p-.Name ! t<t.p=e.t<t.p-.SiGe ! New System.Drawin..SiGe(IK9 +K2 =e.t<t.p-./abInde< ! AK ; ;$abel1, ; =e.$abel1,.6ac5Color ! System.Drawin..Color.FromAr.b(C/ype(C/ype(1H+9 6yte29 Inte.er29 C/ype(C/ype(1H+9 6yte29 Inte.er29 C/ype(C/ype(+JJ9 6yte29 Inte.er22 =e.$abel1,.Font ! New System.Drawin..Font( Arial 'ounded =/ 6old 9 1+.,>9 System.Drawin..FontStyle.6old9 System.Drawin..Fraphics1nit.Point9 C/ype(,9 6yte22 =e.$abel1,.ForeColor ! System.Drawin..SystemColors.Acti3eCaption =e.$abel1,.$ocation ! New System.Drawin..Point(A9 1,A2 =e.$abel1,.=ar.in ! New System.Cindows.Forms.Paddin.(+9 ,9 +9 ,2 =e.$abel1,.Name ! $abel1, =e.$abel1,.SiGe ! New System.Drawin..SiGe(1IK9 ++2 =e.$abel1,./abInde< ! AJ =e.$abel1,./e<t ! Panta insurance ; ;$abelH ; =e.$abelH.6ac5Color ! System.Drawin..Color.FromAr.b(C/ype(C/ype(1H+9 6yte29 Inte.er29 C/ype(C/ype(1H+9 6yte29 Inte.er29 C/ype(C/ype(+JJ9 6yte29 Inte.er22 =e.$abelH.Font ! New System.Drawin..Font( Arial 'ounded =/ 6old 9 1+.,>9 System.Drawin..FontStyle.6old9 System.Drawin..Fraphics1nit.Point9 C/ype(,9 6yte22 =e.$abelH.ForeColor ! System.Drawin..SystemColors.Acti3eCaption =e.$abelH.$ocation ! New System.Drawin..Point(A9 K,2 =e.$abelH.=ar.in ! New System.Cindows.Forms.Paddin.(+9 ,9 +9 ,2 =e.$abelH.Name ! $abelH =e.$abelH.SiGe ! New System.Drawin..SiGe(10I9 +K2 =e.$abelH./abInde< ! AA
G.C.W PARADE
)(

=e.$abelH./e<t ! Income ta< ; ;$abelL ; =e.$abelL.6ac5Color ! System.Drawin..Color.FromAr.b(C/ype(C/ype(1H+9 6yte29 Inte.er29 C/ype(C/ype(1H+9 6yte29 Inte.er29 C/ype(C/ype(+JJ9 6yte29 Inte.er22 =e.$abelL.Font ! New System.Drawin..Font( Arial 'ounded =/ 6old 9 1+.,>9 System.Drawin..FontStyle.6old9 System.Drawin..Fraphics1nit.Point9 C/ype(,9 6yte22 =e.$abelL.ForeColor ! System.Drawin..SystemColors.Acti3eCaption =e.$abelL.$ocation ! New System.Drawin..Point(A9 1H2 =e.$abelL.=ar.in ! New System.Cindows.Forms.Paddin.(+9 ,9 +9 ,2 =e.$abelL.Name ! $abelL =e.$abelL.SiGe ! New System.Drawin..SiGe(1,19 ++2 =e.$abelL./abInde< ! A0 =e.$abelL./e<t ! F P F ; ;Froup6o<0 ; =e.Froup6o<0.Controls.Add(=e.btno52 =e.Froup6o<0.Controls.Add(=e.t<tcca2 =e.Froup6o<0.Controls.Add(=e.t<thra2 =e.Froup6o<0.Controls.Add(=e.t<tda2 =e.Froup6o<0.Controls.Add(=e.t<tbasic2 =e.Froup6o<0.Controls.Add(=e.$abelI2 =e.Froup6o<0.Controls.Add(=e.$abelK2 =e.Froup6o<0.Controls.Add(=e.$abelJ2 =e.Froup6o<0.Controls.Add(=e.$abelA2 =e.Froup6o<0.Font ! New System.Drawin..Font( =icroso-t Sans Seri- 9 L.+J>9 System.Drawin..FontStyle.6old9 System.Drawin..Fraphics1nit.Point9 C/ype(,9 6yte22 =e.Froup6o<0.ForeColor ! System.Drawin..Color.FromAr.b(C/ype(C/ype(1H+9 6yte29 Inte.er29 C/ype(C/ype(,9 6yte29 Inte.er29 C/ype(C/ype(,9 6yte29 Inte.er22 =e.Froup6o<0.$ocation ! New System.Drawin..Point(+L9 +HJ2 =e.Froup6o<0.Name ! Froup6o<0 =e.Froup6o<0.SiGe ! New System.Drawin..SiGe(0J09 1LK2 =e.Froup6o<0./abInde< ! AI =e.Froup6o<0./abStop ! False =e.Froup6o<0./e<t ! %arnin.s ; ;btno5 ; =e.btno5.$ocation ! New System.Drawin..Point(+HA9 ++2 =e.btno5.Name ! btno5 =e.btno5.SiGe ! New System.Drawin..SiGe(AJ9 +02 =e.btno5./abInde< ! AL =e.btno5./e<t ! 85 =e.btno5.1se7isualStyle6ac5Color ! /rue ; ;t<tcca ; =e.t<tcca.6ac5Color ! System.Drawin..Color.Chite =e.t<tcca.%nabled ! False =e.t<tcca.Font ! New System.Drawin..Font( Arial 'ounded =/ 6old 9 1+.,>9 System.Drawin..FontStyle.6old9 System.Drawin..Fraphics1nit.Point9 C/ype(,9 6yte22
G.C.W PARADE
))

=e.t<tcca.ForeColor ! System.Drawin..Color.6lac5 =e.t<tcca.$ocation ! New System.Drawin..Point(1KL9 1+L2 =e.t<tcca.=ar.in ! New System.Cindows.Forms.Paddin.(+2 =e.t<tcca.Name ! t<tcca =e.t<tcca.'ead8nly ! /rue =e.t<tcca.SiGe ! New System.Drawin..SiGe(1+19 +K2 =e.t<tcca./abInde< ! AI ; ;t<thra ; =e.t<thra.6ac5Color ! System.Drawin..Color.Chite =e.t<thra.%nabled ! False =e.t<thra.Font ! New System.Drawin..Font( Arial 'ounded =/ 6old 9 1+.,>9 System.Drawin..FontStyle.6old9 System.Drawin..Fraphics1nit.Point9 C/ype(,9 6yte22 =e.t<thra.ForeColor ! System.Drawin..Color.6lac5 =e.t<thra.$ocation ! New System.Drawin..Point(1KL9 HA2 =e.t<thra.=ar.in ! New System.Cindows.Forms.Paddin.(+2 =e.t<thra.Name ! t<thra =e.t<thra.'ead8nly ! /rue =e.t<thra.SiGe ! New System.Drawin..SiGe(1+19 +K2 =e.t<thra./abInde< ! AK ; ;t<tda ; =e.t<tda.6ac5Color ! System.Drawin..Color.Chite =e.t<tda.%nabled ! False =e.t<tda.Font ! New System.Drawin..Font( Arial 'ounded =/ 6old 9 1+.,>9 System.Drawin..FontStyle.6old9 System.Drawin..Fraphics1nit.Point9 C/ype(,9 6yte22 =e.t<tda.ForeColor ! System.Drawin..Color.6lac5 =e.t<tda.$ocation ! New System.Drawin..Point(1KL9 KA2 =e.t<tda.=ar.in ! New System.Cindows.Forms.Paddin.(+2 =e.t<tda.Name ! t<tda =e.t<tda.'ead8nly ! /rue =e.t<tda.SiGe ! New System.Drawin..SiGe(1+19 +K2 =e.t<tda./abInde< ! AJ ; ;t<tbasic ; =e.t<tbasic.6ac5Color ! System.Drawin..Color.Alice6lue =e.t<tbasic.Font ! New System.Drawin..Font( Arial 'ounded =/ 6old 9 1+.,>9 System.Drawin..FontStyle.6old9 System.Drawin..Fraphics1nit.Point9 C/ype(,9 6yte22 =e.t<tbasic.ForeColor ! System.Drawin..Color.6lac5 =e.t<tbasic.$ocation ! New System.Drawin..Point(1KL9 +,2 =e.t<tbasic.=ar.in ! New System.Cindows.Forms.Paddin.(+2 =e.t<tbasic.Name ! t<tbasic =e.t<tbasic.'ead8nly ! /rue =e.t<tbasic.SiGe ! New System.Drawin..SiGe(1+19 +K2 =e.t<tbasic./abInde< ! AA ; ;$abelI ; =e.$abelI.6ac5Color ! System.Drawin..Color.FromAr.b(C/ype(C/ype(1H+9 6yte29 Inte.er29 C/ype(C/ype(1H+9 6yte29 Inte.er29 C/ype(C/ype(+JJ9 6yte29 Inte.er22
G.C.W PARADE
)3

=e.$abelI.Font ! New System.Drawin..Font( Arial 'ounded =/ 6old 9 1+.,>9 System.Drawin..FontStyle.6old9 System.Drawin..Fraphics1nit.Point9 C/ype(,9 6yte22 =e.$abelI.ForeColor ! System.Drawin..SystemColors.Acti3eCaption =e.$abelI.$ocation ! New System.Drawin..Point(109 1012 =e.$abelI.=ar.in ! New System.Cindows.Forms.Paddin.(+9 ,9 +9 ,2 =e.$abelI.Name ! $abelI =e.$abelI.SiGe ! New System.Drawin..SiGe(1,19 +02 =e.$abelI./abInde< ! A0 =e.$abelI./e<t ! C C A ; ;$abelK ; =e.$abelK.6ac5Color ! System.Drawin..Color.FromAr.b(C/ype(C/ype(1H+9 6yte29 Inte.er29 C/ype(C/ype(1H+9 6yte29 Inte.er29 C/ype(C/ype(+JJ9 6yte29 Inte.er22 =e.$abelK.Font ! New System.Drawin..Font( Arial 'ounded =/ 6old 9 1+.,>9 System.Drawin..FontStyle.6old9 System.Drawin..Fraphics1nit.Point9 C/ype(,9 6yte22 =e.$abelK.ForeColor ! System.Drawin..SystemColors.Acti3eCaption =e.$abelK.$ocation ! New System.Drawin..Point(119 HA2 =e.$abelK.=ar.in ! New System.Cindows.Forms.Paddin.(+9 ,9 +9 ,2 =e.$abelK.Name ! $abelK =e.$abelK.SiGe ! New System.Drawin..SiGe(1,09 +K2 =e.$abelK./abInde< ! A+ =e.$abelK./e<t ! : ' A ; ;$abelJ ; =e.$abelJ.6ac5Color ! System.Drawin..Color.FromAr.b(C/ype(C/ype(1H+9 6yte29 Inte.er29 C/ype(C/ype(1H+9 6yte29 Inte.er29 C/ype(C/ype(+JJ9 6yte29 Inte.er22 =e.$abelJ.Font ! New System.Drawin..Font( Arial 'ounded =/ 6old 9 1+.,>9 System.Drawin..FontStyle.6old9 System.Drawin..Fraphics1nit.Point9 C/ype(,9 6yte22 =e.$abelJ.ForeColor ! System.Drawin..SystemColors.Acti3eCaption =e.$abelJ.$ocation ! New System.Drawin..Point(119 K+2 =e.$abelJ.=ar.in ! New System.Cindows.Forms.Paddin.(+9 ,9 +9 ,2 =e.$abelJ.Name ! $abelJ =e.$abelJ.SiGe ! New System.Drawin..SiGe(LH9 +L2 =e.$abelJ./abInde< ! A1 =e.$abelJ./e<t ! D A ; ;$abelA ; =e.$abelA.6ac5Color ! System.Drawin..Color.FromAr.b(C/ype(C/ype(1H+9 6yte29 Inte.er29 C/ype(C/ype(1H+9 6yte29 Inte.er29 C/ype(C/ype(+JJ9 6yte29 Inte.er22 =e.$abelA.Font ! New System.Drawin..Font( Arial 'ounded =/ 6old 9 1+.,>9 System.Drawin..FontStyle.6old9 System.Drawin..Fraphics1nit.Point9 C/ype(,9 6yte22 =e.$abelA.ForeColor ! System.Drawin..SystemColors.Acti3eCaption =e.$abelA.$ocation ! New System.Drawin..Point(119 1H2 =e.$abelA.=ar.in ! New System.Cindows.Forms.Paddin.(+9 ,9 +9 ,2 =e.$abelA.Name ! $abelA =e.$abelA.SiGe ! New System.Drawin..SiGe(1+J9 +I2 =e.$abelA./abInde< ! A,
G.C.W PARADE
)@

=e.$abelA./e<t ! 6asic pay ; ;btn.etdetails ; =e.btn.etdetails.$ocation ! New System.Drawin..Point(1L,9 HA2 =e.btn.etdetails.Name ! btn.etdetails =e.btn.etdetails.SiGe ! New System.Drawin..SiGe(IJ9 +02 =e.btn.etdetails./abInde< ! AK =e.btn.etdetails./e<t ! Fet Details =e.btn.etdetails.1se7isualStyle6ac5Color ! /rue ; ;cmbsalmonth ; =e.cmbsalmonth.6ac5Color ! System.Drawin..Color.Chite =e.cmbsalmonth.Font ! New System.Drawin..Font( Arial 'ounded =/ 6old 9 1+.,>9 System.Drawin..FontStyle.6old9 System.Drawin..Fraphics1nit.Point9 C/ype(,9 6yte22 =e.cmbsalmonth.ForeColor ! System.Drawin..Color.6lac5 =e.cmbsalmonth.Formattin.%nabled ! /rue =e.cmbsalmonth.$ocation ! New System.Drawin..Point(1L,9 +L2 =e.cmbsalmonth.Name ! cmbsalmonth =e.cmbsalmonth.SiGe ! New System.Drawin..SiGe(10I9 +K2 =e.cmbsalmonth./abInde< ! AJ ; ;t<tnet ; =e.t<tnet.6ac5Color ! System.Drawin..Color.Chite =e.t<tnet.Font ! New System.Drawin..Font( Arial 'ounded =/ 6old 9 1+.,>9 System.Drawin..FontStyle.6old9 System.Drawin..Fraphics1nit.Point9 C/ype(,9 6yte22 =e.t<tnet.ForeColor ! System.Drawin..Color.6lac5 =e.t<tnet.$ocation ! New System.Drawin..Point(JLI9 +K,2 =e.t<tnet.=ar.in ! New System.Cindows.Forms.Paddin.(+2 =e.t<tnet.Name ! t<tnet =e.t<tnet.SiGe ! New System.Drawin..SiGe(IK9 +K2 =e.t<tnet./abInde< ! AA ; ;t<t.ross ; =e.t<t.ross.6ac5Color ! System.Drawin..Color.Chite =e.t<t.ross.Font ! New System.Drawin..Font( Arial 'ounded =/ 6old 9 1+.,>9 System.Drawin..FontStyle.6old9 System.Drawin..Fraphics1nit.Point9 C/ype(,9 6yte22 =e.t<t.ross.ForeColor ! System.Drawin..Color.6lac5 =e.t<t.ross.$ocation ! New System.Drawin..Point(JLI9 ++L2 =e.t<t.ross.=ar.in ! New System.Cindows.Forms.Paddin.(+2 =e.t<t.ross.Name ! t<t.ross =e.t<t.ross.SiGe ! New System.Drawin..SiGe(IK9 +K2 =e.t<t.ross./abInde< ! A0 ; ;t<tempcode ; =e.t<tempcode.6ac5Color ! System.Drawin..Color.Chite =e.t<tempcode.Font ! New System.Drawin..Font( Arial 'ounded =/ 6old 9 1+.,>9 System.Drawin..FontStyle.6old9 System.Drawin..Fraphics1nit.Point9 C/ype(,9 6yte22 =e.t<tempcode.ForeColor ! System.Drawin..Color.6lac5
G.C.W PARADE
3A

=e.t<tempcode.$ocation ! New System.Drawin..Point(1L,9 K02 =e.t<tempcode.=ar.in ! New System.Cindows.Forms.Paddin.(+2 =e.t<tempcode.Name ! t<tempcode =e.t<tempcode.SiGe ! New System.Drawin..SiGe(10I9 +K2 =e.t<tempcode./abInde< ! 0J ; ;$abel1+ ; =e.$abel1+.6ac5Color ! System.Drawin..Color.FromAr.b(C/ype(C/ype(1H+9 6yte29 Inte.er29 C/ype(C/ype(1H+9 6yte29 Inte.er29 C/ype(C/ype(+JJ9 6yte29 Inte.er22 =e.$abel1+.Font ! New System.Drawin..Font( Arial 'ounded =/ 6old 9 1+.,>9 System.Drawin..FontStyle.6old9 System.Drawin..Fraphics1nit.Point9 C/ype(,9 6yte22 =e.$abel1+.ForeColor ! System.Drawin..SystemColors.Acti3eCaption =e.$abel1+.$ocation ! New System.Drawin..Point(A009 +K02 =e.$abel1+.=ar.in ! New System.Cindows.Forms.Paddin.(+9 ,9 +9 ,2 =e.$abel1+.Name ! $abel1+ =e.$abel1+.SiGe ! New System.Drawin..SiGe(11K9 +02 =e.$abel1+./abInde< ! 0A =e.$abel1+./e<t ! Net pay ; ;$abel11 ; =e.$abel11.6ac5Color ! System.Drawin..Color.FromAr.b(C/ype(C/ype(1H+9 6yte29 Inte.er29 C/ype(C/ype(1H+9 6yte29 Inte.er29 C/ype(C/ype(+JJ9 6yte29 Inte.er22 =e.$abel11.Font ! New System.Drawin..Font( Arial 'ounded =/ 6old 9 1+.,>9 System.Drawin..FontStyle.6old9 System.Drawin..Fraphics1nit.Point9 C/ype(,9 6yte22 =e.$abel11.ForeColor ! System.Drawin..SystemColors.Acti3eCaption =e.$abel11.$ocation ! New System.Drawin..Point(A009 +0,2 =e.$abel11.=ar.in ! New System.Cindows.Forms.Paddin.(+9 ,9 +9 ,2 =e.$abel11.Name ! $abel11 =e.$abel11.SiGe ! New System.Drawin..SiGe(10A9 +A2 =e.$abel11./abInde< ! 00 =e.$abel11./e<t ! Fross pay ; ;$abel0 ; =e.$abel0.6ac5Color ! System.Drawin..Color.FromAr.b(C/ype(C/ype(1H+9 6yte29 Inte.er29 C/ype(C/ype(1H+9 6yte29 Inte.er29 C/ype(C/ype(+JJ9 6yte29 Inte.er22 =e.$abel0.Font ! New System.Drawin..Font( Arial 'ounded =/ 6old 9 1+.,>9 System.Drawin..FontStyle.6old9 System.Drawin..Fraphics1nit.Point9 C/ype(,9 6yte22 =e.$abel0.ForeColor ! System.Drawin..SystemColors.Acti3eCaption =e.$abel0.$ocation ! New System.Drawin..Point(+J9 K02 =e.$abel0.=ar.in ! New System.Cindows.Forms.Paddin.(+9 ,9 +9 ,2 =e.$abel0.Name ! $abel0 =e.$abel0.SiGe ! New System.Drawin..SiGe(1+09 +K2 =e.$abel0./abInde< ! +A =e.$abel0./e<t ! %mpcode ; ;$abel+ ;
G.C.W PARADE
31

=e.$abel+.6ac5Color ! System.Drawin..Color.FromAr.b(C/ype(C/ype(1H+9 6yte29 Inte.er29 C/ype(C/ype(1H+9 6yte29 Inte.er29 C/ype(C/ype(+JJ9 6yte29 Inte.er22 =e.$abel+.Font ! New System.Drawin..Font( Arial 'ounded =/ 6old 9 1+.,>9 System.Drawin..FontStyle.6old9 System.Drawin..Fraphics1nit.Point9 C/ype(,9 6yte22 =e.$abel+.ForeColor ! System.Drawin..SystemColors.Acti3eCaption =e.$abel+.$ocation ! New System.Drawin..Point(+09 +L2 =e.$abel+.=ar.in ! New System.Cindows.Forms.Paddin.(+9 ,9 +9 ,2 =e.$abel+.Name ! $abel+ =e.$abel+.SiGe ! New System.Drawin..SiGe(1A19 +K2 =e.$abel+./abInde< ! +0 =e.$abel+./e<t ! Salary =onth ; ;Froup6o<1 ; =e.Froup6o<1.Controls.Add(=e.btne<it2 =e.Froup6o<1.Controls.Add(=e.btnprint2 =e.Froup6o<1.$ocation ! New System.Drawin..Point(A,19 JIK2 =e.Froup6o<1.Name ! Froup6o<1 =e.Froup6o<1.SiGe ! New System.Drawin..SiGe(0JL9 IJ2 =e.Froup6o<1./abInde< ! AJ =e.Froup6o<1./abStop ! False =e.Froup6o<1./e<t ! Froup6o<1 ; ;btne<it ; =e.btne<it.Font ! New System.Drawin..Font( =icroso-t Sans Seri- 9 1+.,>9 System.Drawin..FontStyle.6old9 System.Drawin..Fraphics1nit.Point9 C/ype(,9 6yte22 =e.btne<it.Ima.e ! C/ype(resources.Fet8b*ect( btne<it.Ima.e 29 System.Drawin..Ima.e2 =e.btne<it.Ima.eAli.n ! System.Drawin..ContentAli.nment.=iddle'i.ht =e.btne<it.$ocation ! New System.Drawin..Point(+,09 1A2 =e.btne<it.Name ! btne<it =e.btne<it.SiGe ! New System.Drawin..SiGe(1+19 J+2 =e.btne<it./abInde< ! 1 =e.btne<it./e<t ! %<it =e.btne<it./e<tAli.n ! System.Drawin..ContentAli.nment.=iddle$e-t =e.btne<it.1se7isualStyle6ac5Color ! /rue ; ;btnprint ; =e.btnprint.Font ! New System.Drawin..Font( =icroso-t Sans Seri- 9 1+.,>9 System.Drawin..FontStyle.6old9 System.Drawin..Fraphics1nit.Point9 C/ype(,9 6yte22 =e.btnprint.Ima.e ! C/ype(resources.Fet8b*ect( btnprint.Ima.e 29 System.Drawin..Ima.e2 =e.btnprint.Ima.eAli.n ! System.Drawin..ContentAli.nment.=iddle'i.ht =e.btnprint.$ocation ! New System.Drawin..Point(+J9 1H2 =e.btnprint.Name ! btnprint =e.btnprint.SiGe ! New System.Drawin..SiGe(1K19 AI2 =e.btnprint./abInde< ! , =e.btnprint./e<t ! Fenerate Salary =e.btnprint./e<tAli.n ! System.Drawin..ContentAli.nment.=iddle$e-t =e.btnprint.1se7isualStyle6ac5Color ! /rue ;
G.C.W PARADE
32

;Form0 ; =e.AutoScaleDimensions ! New System.Drawin..SiGeF(K.,>9 10.,>2 =e.AutoScale=ode ! System.Cindows.Forms.AutoScale=ode.Font =e.6ac5Color ! System.Drawin..Color.FromAr.b(C/ype(C/ype(1H+9 6yte29 Inte.er29 C/ype(C/ype(1H+9 6yte29 Inte.er29 C/ype(C/ype(+JJ9 6yte29 Inte.er22 =e.ClientSiGe ! New System.Drawin..SiGe(L109 KK02 =e.Controls.Add(=e.Froup6o<12 =e.Controls.Add(=e.Froup6o<+2 =e.Controls.Add(=e.$abel12 =e.=ar.in ! New System.Cindows.Forms.Paddin.(+2 =e.Name ! Form0 =e./e<t ! Form0 =e.CindowState ! System.Cindows.Forms.FormCindowState.=a<imiGed =e.Froup6o<+.'esume$ayout(False2 =e.Froup6o<+.Per-orm$ayout(2 =e.Froup6o<A.'esume$ayout(False2 =e.Froup6o<A.Per-orm$ayout(2 =e.Froup6o<0.'esume$ayout(False2 =e.Froup6o<0.Per-orm$ayout(2 =e.Froup6o<1.'esume$ayout(False2 =e.'esume$ayout(False2 =e.Per-orm$ayout(2 %nd Sub Friend Cith%3ents Friend Cith%3ents Friend Cith%3ents Friend Cith%3ents Friend Cith%3ents Friend Cith%3ents Friend Cith%3ents Friend Cith%3ents Friend Cith%3ents Friend Cith%3ents Friend Cith%3ents Friend Cith%3ents Friend Cith%3ents Friend Cith%3ents Friend Cith%3ents Friend Cith%3ents Friend Cith%3ents Friend Cith%3ents Friend Cith%3ents Friend Cith%3ents Friend Cith%3ents Friend Cith%3ents Friend Cith%3ents Friend Cith%3ents Friend Cith%3ents Friend Cith%3ents Friend Cith%3ents Friend Cith%3ents Friend Cith%3ents Friend Cith%3ents Friend Cith%3ents Friend Cith%3ents $abel1 As System.Cindows.Forms.$abel Froup6o<+ As System.Cindows.Forms.Froup6o< t<tnet As System.Cindows.Forms./e<t6o< t<t.ross As System.Cindows.Forms./e<t6o< t<tempcode As System.Cindows.Forms./e<t6o< $abel1+ As System.Cindows.Forms.$abel $abel11 As System.Cindows.Forms.$abel $abel0 As System.Cindows.Forms.$abel $abel+ As System.Cindows.Forms.$abel Froup6o<1 As System.Cindows.Forms.Froup6o< btne<it As System.Cindows.Forms.6utton btnprint As System.Cindows.Forms.6utton cmbsalmonth As System.Cindows.Forms.Combo6o< btn.etdetails As System.Cindows.Forms.6utton t<tename As System.Cindows.Forms./e<t6o< $abel10 As System.Cindows.Forms.$abel Froup6o<A As System.Cindows.Forms.Froup6o< t<t*i As System.Cindows.Forms./e<t6o< t<tit As System.Cindows.Forms./e<t6o< t<t.p- As System.Cindows.Forms./e<t6o< $abel1, As System.Cindows.Forms.$abel $abelH As System.Cindows.Forms.$abel $abelL As System.Cindows.Forms.$abel Froup6o<0 As System.Cindows.Forms.Froup6o< t<tcca As System.Cindows.Forms./e<t6o< t<thra As System.Cindows.Forms./e<t6o< t<tda As System.Cindows.Forms./e<t6o< t<tbasic As System.Cindows.Forms./e<t6o< $abelI As System.Cindows.Forms.$abel $abelK As System.Cindows.Forms.$abel $abelJ As System.Cindows.Forms.$abel $abelA As System.Cindows.Forms.$abel
G.C.W PARADE
33

Friend Friend Friend Friend Friend Friend Friend %nd Class Cith%3ents Cith%3ents Cith%3ents Cith%3ents Cith%3ents Cith%3ents Cith%3ents t<tpb As System.Cindows.Forms./e<t6o< t<tdept As System.Cindows.Forms./e<t6o< t<tdesi. As System.Cindows.Forms./e<t6o< $abel1K As System.Cindows.Forms.$abel $abel1J As System.Cindows.Forms.$abel $abel1A As System.Cindows.Forms.$abel btno5 As System.Cindows.Forms.6utton
F:!- L3&-/,:)&& 0%F:!-AT0:%4

Imports System.Data.SqlClient Imports System Public Class FormA Dim cmd.etdata As New SqlCommand Dim cmdadd As New SqlCommand Dim cmdSearch As New SqlCommand Dim cmddelete As New SqlCommand Dim cmdedit As New SqlCommand Dim cnn As New SqlConnection( Data Source!."S#$%&P'%SS(AttachDbFilename! C)"Pro*ects"+,1+ pro*ects"payroll.cwp"payroll"payroll"payroll.md-(Inte.rated Security!/rue(Connect /imeout!0,(1ser Instance!/rue 2 Pri3ate Sub btnadd4Clic5(6y7al sender As System.8b*ect9 6y7al e As System.%3entAr.s2 :andles btnadd.Clic5 ;Call -illte<tbo<(2 t<tecode.Focus(2 t<tdob./e<t ! dtdob.7alue t<tdo*./e<t ! dtdo*.7alue Dim t For %ach t In =e.Controls I- /ype8- t Is /e<t6o< /hen I- t./e<t ! /hen =s.6o<( Complete %ntry> 2 %<it Sub %<it For %nd I%nd INe<t /ry I- cnn.State ! 1 /hen
G.C.W PARADE
34

cnn.Close(2
%lse
cnn.8pen(2 =s.6o<( Connection 8pen > 2 %nd I;cnn.Close(2 Catch e< As %<ception =s.6o<( Can not open connection > 2 %nd /ry ;cnn.8pen(2 I- cmbscale.SelectedInde< ! , /hen t<tbasicpay./e<t ! J+,, O 7al(cmb.p./e<t2 %lseI- cmbscale.SelectedInde< ! 1 /hen t<tbasicpay./e<t ! H0,, O 7al(cmb.p./e<t2 %lseI- cmbscale.SelectedInde< ! + /hen t<tbasicpay./e<t ! 1JK,, O 7al(cmb.p./e<t2 %lseI- cmbscale.SelectedInde< ! 0 /hen t<tbasicpay./e<t ! 0H1,, O 7al(cmb.p./e<t2 %nd I-
I- t<tecode./e<t ?@ And t<tename./e<t ?@ And cmbedesi../e<t ?@ And cmbedept./e<t ?@ And cmbepb./e<t ?@ And t<teaddr./e<t ?@ And t<tetel./e<t ?@ And cmbemarital./e<t ?@ And cmbse<./e<t ?@ And dtdob./e<t ?@ And dtdo*./e<t ?@ /hen cmdadd.Command/e<t ! INS%'/ IN/8 emppersonal(empcode9name9desi.nation9dptname9pbcode9address9telephone9se<9dob9d o*9mstatus9scale9.pay9basic2 B 7A$1%S ( B t<tecode./e<t B 9; B t<tename./e<t B ;9; B cmbedesi../e<t B ;9; B cmbedept./e<t B ;9 ; B cmbepb./e<t B ;9; B t<teaddr./e<t B ;9 B t<tetel./e<t B 9 ; B cmbse<./e<t B ;9 ; B dtdob.7alue B ;9 ; B dtdo*.7alue B ;9; B cmbemarital./e<t B ;9; B cmbscale./e<t B ;9; B cmb.p./e<t B ;9 B t<tbasicpay./e<t B 2( cmdadd.Command/ype ! Command/ype./e<t cmdadd.Connection ! cnn cmdadd.%<ecuteNon#uery(2 =s.6o<( 'ecord inserted success-ully. 2
%lse =s.6o<( %nter the required 3alues) 2 %nd Icmdadd.Dispose(2 cnn.Close(2 %nd Sub
G.C.W PARADE
35

Pri3ate Sub FormA4$oad(6y7al sender As System.8b*ect9 6y7al e As System.%3entAr.s2 :andles =y6ase.$oad ;/8D8) /his line o- code loads data into the ;PayrollDataSet+.emppersonal; table. Eou can mo3e9 or remo3e it9 as needed. =e.%mppersonal/ableAdapter1.Fill(=e.PayrollDataSet+.emppersonal2 ;/8D8) /his line o- code loads data into the ;PayrollDataSet1.payband; table. Eou can mo3e9 or remo3e it9 as needed. =e.Payband/ableAdapter.Fill(=e.PayrollDataSet1.payband2 ;/8D8) /his line o- code loads data into the ;PayrollDataSet.emppersonal; table. Eou can mo3e9 or remo3e it9 as needed. =e.%mppersonal/ableAdapter.Fill(=e.PayrollDataSet.emppersonal2 t<tdo*./e<t ! dtdo*.7alue t<tdob./e<t ! dtdob.7alue ; =e.'eport7iewer1.'e-resh'eport(2 %nd Sub Pri3ate Sub t<tecode4/e<tChan.ed(6y7al sender As System.8b*ect9 6y7al e As System.%3entAr.s2 :andles t<tecode./e<tChan.ed %nd Sub Pri3ate Sub t<tecode45epress(6y7al 5eyascii As Inte.er2 I- 5eyascii ! 10 /hen t<tename.Focus(2 %nd I%nd Sub Pri3ate Sub btnsearch4Clic5(6y7al sender As System.8b*ect9 6y7al e As System.%3entAr.s2 :andles btnsearch.Clic5 Call -illte<tbo<(2 Dim 3Search As Strin. ! Input6o<( %nter %mployee Code to search ) 2 cnn.8pen(2 I- 3Search ?@ /hen cmdSearch.Command/e<t ! B CInt(3Search2 S%$%C/ D F'8= emppersonal C:%'% empcode!
cmdSearch.Connection ! cnn Dim rdrS#$ As SqlData'eader ! cmdSearch.%<ecute'eader I- rdrS#$.'ead ! /rue /hen t<tecode./e<t B! rdrS#$.Item(,2./oStrin. t<tename./e<t B! rdrS#$.Item(12./oStrin. cmbedesi../e<t B! rdrS#$.Item(+2./oStrin. cmbedept./e<t B! rdrS#$.Item(02./oStrin. cmbepb./e<t B! rdrS#$.Item(A2./oStrin. t<teaddr./e<t B! rdrS#$.Item(J2./oStrin. t<tetel./e<t B! rdrS#$.Item(K2./oStrin. cmbse<./e<t B! rdrS#$.Item(I2./oStrin. t<tdob./e<t B! rdrS#$.Item(L2./oStrin. t<tdo*./e<t B! rdrS#$.Item(H2./oStrin. cmbemarital./e<t B! rdrS#$.Item(1,2./oStrin.
G.C.W PARADE
3(

rdrS#$.Close(2 cnn.Close(2 %<it Sub %lse =s.6o<( 'ecord not -ound 2 %<it Sub %nd I%lse =s.6o<( %nter search 3alue. 2 %<it Sub %nd I%nd Sub Pri3ate Sub btnedit4Clic5(6y7al sender As System.8b*ect9 6y7al e As System.%3entAr.s2 :andles btnedit.Clic5 ;Call -illte<tbo<(2 I- t<tecode./e<t ?@ And t<tename./e<t ?@ And cmbedesi../e<t ?@ And cmbedept./e<t ?@ And cmbepb./e<t ?@ And t<teaddr./e<t ?@ And t<tetel./e<t ?@ And cmbemarital./e<t ?@ And cmbse<./e<t ?@ And dtdob./e<t ?@ And dtdo*./e<t ?@ /hen ;cnn.8pen(2 /ry I- cnn.State ! 1 /hen %lse cnn.Close(2
cnn.8pen(2 =s.6o<( Connection 8pen > 2 %nd I;cnn.Close(2 Catch e< As %<ception =s.6o<( Can not open connection > %nd /ry
cmdedit.Command/e<t ! 1PDA/% emppersonal S%/ name ! ; B t<tename./e<t B ;9 desi.nation!; B cmbedesi../e<t B ;9dptname!; B cmbedept./e<t B ;9 pbcode!; B cmbepb./e<t B ;9address!; B t<teaddr./e<t B ;9telephone! B t<tetel./e<t B 9 se<!; B cmbse<./e<t B ;9 dob!; B dtdob.7alue B ;9 do*!; B dtdo*.7alue B ;9mstatus!; B cmbemarital./e<t B ; C:%'% empcode ! B t<tecode./e<t B ( ;=s.6o<(cmd1pdate.Command/e<t2 cmdedit.Command/ype ! Command/ype./e<t
G.C.W PARADE
3)

cmdedit.Connection ! cnn cmdedit.%<ecuteNon#uery(2 =s.6o<( 'ecord updated. 2 %lse Code =s.6o<( %nter the required 3alues) B 3bNew$ine B +. Name etc.. 2 %nd Icnn.Close(2 cmdedit.Dispose(2 %nd Sub Pri3ate Sub btndelete4Clic5(6y7al sender As System.8b*ect9 6y7al e As System.%3entAr.s2 :andles btndelete.Clic5 I- t<tecode./e<t ?@ And t<tename./e<t ?@ And cmbedesi../e<t ?@ And cmbedept./e<t ?@ And cmbepb./e<t ?@ And t<teaddr./e<t ?@ And t<tetel./e<t ?@ And cmbemarital./e<t ?@ And cmbse<./e<t ?@ And dtdob./e<t ?@ And dtdo*./e<t ?@ /hen ;cnn.8pen(2 /ry I- cnn.State ! 1 /hen cnn.Close(2 cnn.8pen(2 =s.6o<( Connection 8pen > 2 %nd I;cnn.Close(2 Catch e< As %<ception =s.6o<( Can not open connection > %nd /ry cmddelete.Command/e<t ! B t<tecode./e<t B %lse B 3bNew$ine B 1. %mployee
delete -rom emppersonal where empcode !
;=s.6o<(cmd1pdate.Command/e<t2 cmddelete.Command/ype ! Command/ype./e<t cmddelete.Connection ! cnn cmddelete.%<ecuteNon#uery(2 =s.6o<( 'ecord deleted. 2 %lse Code =s.6o<( %nter the required 3alues) B 3bNew$ine B B 3bNew$ine B 1. %mployee
G.C.W PARADE
33

+. Name etc.. 2 %nd Icnn.Close(2 cmddelete.Dispose(2 %nd Sub Pri3ate Sub btne<it4Clic5(6y7al sender As System.8b*ect9 6y7al e As System.%3entAr.s2 =e.Close(2 %nd Sub Pri3ate Sub Fill6y/oolStrip6utton4Clic5(6y7al sender As System.8b*ect9 6y7al e As System.%3entAr.s2 :andles Fill6y/oolStrip6utton.Clic5 /ry =e.%mppersonal/ableAdapter.Fill6y(=e.PayrollDataSet.emppersonal2 Catch e< As System.%<ception System.Cindows.Forms.=essa.e6o<.Show(e<.=essa.e2 %nd /ry %nd Sub Pri3ate Sub dtdob47alueChan.ed(6y7al sender As System.8b*ect9 6y7al e As System.%3entAr.s2 :andles dtdob.7alueChan.ed t<tdob./e<t ! dtdob.7alue %nd Sub Pri3ate Sub dtdo*47alueChan.ed(6y7al sender As System.8b*ect9 6y7al e As System.%3entAr.s2 :andles dtdo*.7alueChan.ed t<tdo*./e<t ! dtdo*.7alue %nd Sub Pri3ate Sub btne<it4Clic541(6y7al sender As System.8b*ect9 6y7al e As System.%3entAr.s2 :andles btne<it.Clic5 =e.Close(2 %nd Sub Pri3ate Sub btnclear4Clic5(6y7al sender As System.8b*ect9 6y7al e As System.%3entAr.s2 :andles btnclear.Clic5 Call -illte<tbo<(2 %nd Sub
Pri3ate Sub Froup6o<14%nter(6y7al sender As System.8b*ect9 6y7al e As System.%3entAr.s2 :andles Froup6o<1.%nter %nd Sub Pri3ate Sub $abel1A4Clic5(6y7al sender As System.8b*ect9 6y7al e As System.%3entAr.s2 :andles $abel1A.Clic5
G.C.W PARADE
3@

%nd Sub %nd Class
F8'= A D%SIFN%' C8D% (%=P$8E%% INF8'=A/I8N2

Imports System.Data.SqlClient Imports System Public Class FormA Dim cmd.etdata As New SqlCommand Dim cmdadd As New SqlCommand Dim cmdSearch As New SqlCommand Dim cmddelete As New SqlCommand Dim cmdedit As New SqlCommand Dim cnn As New SqlConnection( Data Source!."S#$%&P'%SS(AttachDbFilename! C)"Pro*ects"+,1+ pro*ects"payroll.cwp"payroll"payroll"payroll.md-(Inte.rated Security!/rue(Connect /imeout!0,(1ser Instance!/rue 2 Pri3ate Sub btnadd4Clic5(6y7al sender As System.8b*ect9 6y7al e As System.%3entAr.s2 :andles btnadd.Clic5 ;Call -illte<tbo<(2 t<tecode.Focus(2 t<tdob./e<t ! dtdob.7alue t<tdo*./e<t ! dtdo*.7alue Dim t For %ach t In =e.Controls I- /ype8- t Is /e<t6o< /hen I- t./e<t ! /hen =s.6o<( Complete %ntry> 2 %<it Sub %<it For %nd I%nd INe<t /ry I- cnn.State ! 1 /hen cnn.Close(2 cnn.8pen(2 =s.6o<( Connection 8pen > 2 %nd I;cnn.Close(2 Catch e< As %<ception =s.6o<( Can not open connection > 2 %nd /ry ;cnn.8pen(2 I- cmbscale.SelectedInde< ! , /hen t<tbasicpay./e<t ! J+,, O 7al(cmb.p./e<t2 %lse
G.C.W PARADE
@A

%lseI- cmbscale.SelectedInde< ! 1 /hen t<tbasicpay./e<t ! H0,, O 7al(cmb.p./e<t2 %lseI- cmbscale.SelectedInde< ! + /hen t<tbasicpay./e<t ! 1JK,, O 7al(cmb.p./e<t2 %lseI- cmbscale.SelectedInde< ! 0 /hen t<tbasicpay./e<t ! 0H1,, O 7al(cmb.p./e<t2 %nd I-
I- t<tecode./e<t ?@ And t<tename./e<t ?@ And cmbedesi../e<t ?@ And cmbedept./e<t ?@ And cmbepb./e<t ?@ And t<teaddr./e<t ?@ And t<tetel./e<t ?@ And cmbemarital./e<t ?@ And cmbse<./e<t ?@ And dtdob./e<t ?@ And dtdo*./e<t ?@ /hen cmdadd.Command/e<t ! INS%'/ IN/8 emppersonal(empcode9name9desi.nation9dptname9pbcode9address9telephone9se<9dob9d o*9mstatus9scale9.pay9basic2 B 7A$1%S ( B t<tecode./e<t B 9; B t<tename./e<t B ;9; B cmbedesi../e<t B ;9; B cmbedept./e<t B ;9 ; B cmbepb./e<t B ;9; B t<teaddr./e<t B ;9 B t<tetel./e<t B 9 ; B cmbse<./e<t B ;9 ; B dtdob.7alue B ;9 ; B dtdo*.7alue B ;9; B cmbemarital./e<t B ;9; B cmbscale./e<t B ;9; B cmb.p./e<t B ;9 B t<tbasicpay./e<t B 2( cmdadd.Command/ype ! Command/ype./e<t cmdadd.Connection ! cnn cmdadd.%<ecuteNon#uery(2 =s.6o<( 'ecord inserted success-ully. 2
%lse =s.6o<( %nter the required 3alues) 2 %nd Icmdadd.Dispose(2 cnn.Close(2 %nd Sub Pri3ate Sub FormA4$oad(6y7al sender As System.8b*ect9 6y7al e As System.%3entAr.s2 :andles =y6ase.$oad ;/8D8) /his line o- code loads data into the ;PayrollDataSet+.emppersonal; table. Eou can mo3e9 or remo3e it9 as needed. =e.%mppersonal/ableAdapter1.Fill(=e.PayrollDataSet+.emppersonal2 ;/8D8) /his line o- code loads data into the ;PayrollDataSet1.payband; table. Eou can mo3e9 or remo3e it9 as needed. =e.Payband/ableAdapter.Fill(=e.PayrollDataSet1.payband2 ;/8D8) /his line o- code loads data into the ;PayrollDataSet.emppersonal; table. Eou can mo3e9 or remo3e it9 as needed. =e.%mppersonal/ableAdapter.Fill(=e.PayrollDataSet.emppersonal2
G.C.W PARADE
@1

t<tdo*./e<t ! dtdo*.7alue t<tdob./e<t ! dtdob.7alue ; =e.'eport7iewer1.'e-resh'eport(2 %nd Sub Pri3ate Sub t<tecode4/e<tChan.ed(6y7al sender As System.8b*ect9 6y7al e As System.%3entAr.s2 :andles t<tecode./e<tChan.ed %nd Sub Pri3ate Sub t<tecode45epress(6y7al 5eyascii As Inte.er2 I- 5eyascii ! 10 /hen t<tename.Focus(2 %nd I%nd Sub Pri3ate Sub btnsearch4Clic5(6y7al sender As System.8b*ect9 6y7al e As System.%3entAr.s2 :andles btnsearch.Clic5 Call -illte<tbo<(2 Dim 3Search As Strin. ! Input6o<( %nter %mployee Code to search ) 2 cnn.8pen(2 I- 3Search ?@ /hen cmdSearch.Command/e<t ! B CInt(3Search2 S%$%C/ D F'8= emppersonal C:%'% empcode!
cmdSearch.Connection ! cnn Dim rdrS#$ As SqlData'eader ! cmdSearch.%<ecute'eader I- rdrS#$.'ead ! /rue /hen t<tecode./e<t B! rdrS#$.Item(,2./oStrin. t<tename./e<t B! rdrS#$.Item(12./oStrin. cmbedesi../e<t B! rdrS#$.Item(+2./oStrin. cmbedept./e<t B! rdrS#$.Item(02./oStrin. cmbepb./e<t B! rdrS#$.Item(A2./oStrin. t<teaddr./e<t B! rdrS#$.Item(J2./oStrin. t<tetel./e<t B! rdrS#$.Item(K2./oStrin. cmbse<./e<t B! rdrS#$.Item(I2./oStrin. t<tdob./e<t B! rdrS#$.Item(L2./oStrin. t<tdo*./e<t B! rdrS#$.Item(H2./oStrin. cmbemarital./e<t B! rdrS#$.Item(1,2./oStrin. rdrS#$.Close(2 cnn.Close(2 %<it Sub %lse =s.6o<( 'ecord not -ound 2 %<it Sub
G.C.W PARADE
@2

%nd I%lse =s.6o<( %nter search 3alue. 2 %<it Sub %nd I%nd Sub Pri3ate Sub btnedit4Clic5(6y7al sender As System.8b*ect9 6y7al e As System.%3entAr.s2 :andles btnedit.Clic5 ;Call -illte<tbo<(2 I- t<tecode./e<t ?@ And t<tename./e<t ?@ And cmbedesi../e<t ?@ And cmbedept./e<t ?@ And cmbepb./e<t ?@ And t<teaddr./e<t ?@ And t<tetel./e<t ?@ And cmbemarital./e<t ?@ And cmbse<./e<t ?@ And dtdob./e<t ?@ And dtdo*./e<t ?@ /hen ;cnn.8pen(2 /ry I- cnn.State ! 1 /hen cnn.Close(2 cnn.8pen(2 =s.6o<( Connection 8pen > 2 %nd I;cnn.Close(2 Catch e< As %<ception =s.6o<( Can not open connection > %nd /ry %lse
cmdedit.Command/e<t ! 1PDA/% emppersonal S%/ name ! ; B t<tename./e<t B ;9 desi.nation!; B cmbedesi../e<t B ;9dptname!; B cmbedept./e<t B ;9 pbcode!; B cmbepb./e<t B ;9address!; B t<teaddr./e<t B ;9telephone! B t<tetel./e<t B 9 se<!; B cmbse<./e<t B ;9 dob!; B dtdob.7alue B ;9 do*!; B dtdo*.7alue B ;9mstatus!; B cmbemarital./e<t B ; C:%'% empcode ! B t<tecode./e<t B ( ;=s.6o<(cmd1pdate.Command/e<t2 cmdedit.Command/ype ! Command/ype./e<t cmdedit.Connection ! cnn cmdedit.%<ecuteNon#uery(2 =s.6o<( 'ecord updated. 2 %lse Code =s.6o<( %nter the required 3alues) B 3bNew$ine B +. Name etc.. 2 B 3bNew$ine B 1. %mployee
G.C.W PARADE
@3

%nd Icnn.Close(2 cmdedit.Dispose(2 %nd Sub Pri3ate Sub btndelete4Clic5(6y7al sender As System.8b*ect9 6y7al e As System.%3entAr.s2 :andles btndelete.Clic5 I- t<tecode./e<t ?@ And t<tename./e<t ?@ And cmbedesi../e<t ?@ And cmbedept./e<t ?@ And cmbepb./e<t ?@ And t<teaddr./e<t ?@ And t<tetel./e<t ?@ And cmbemarital./e<t ?@ And cmbse<./e<t ?@ And dtdob./e<t ?@ And dtdo*./e<t ?@ /hen ;cnn.8pen(2 /ry I- cnn.State ! 1 /hen %lse cnn.Close(2
cnn.8pen(2 =s.6o<( Connection 8pen > 2 %nd I;cnn.Close(2 Catch e< As %<ception =s.6o<( Can not open connection > %nd /ry cmddelete.Command/e<t ! B t<tecode./e<t B
delete -rom emppersonal where empcode !
;=s.6o<(cmd1pdate.Command/e<t2 cmddelete.Command/ype ! Command/ype./e<t cmddelete.Connection ! cnn cmddelete.%<ecuteNon#uery(2 =s.6o<( 'ecord deleted. 2 %lse Code =s.6o<( %nter the required 3alues) B 3bNew$ine B +. Name etc.. 2 %nd Icnn.Close(2 cmddelete.Dispose(2 %nd Sub Pri3ate Sub btne<it4Clic5(6y7al sender As System.8b*ect9 6y7al e As System.%3entAr.s2 =e.Close(2 %nd Sub B 3bNew$ine B 1. %mployee
G.C.W PARADE
@4

Pri3ate Sub Fill6y/oolStrip6utton4Clic5(6y7al sender As System.8b*ect9 6y7al e As System.%3entAr.s2 :andles Fill6y/oolStrip6utton.Clic5 /ry =e.%mppersonal/ableAdapter.Fill6y(=e.PayrollDataSet.emppersonal2 Catch e< As System.%<ception System.Cindows.Forms.=essa.e6o<.Show(e<.=essa.e2 %nd /ry %nd Sub Pri3ate Sub dtdob47alueChan.ed(6y7al sender As System.8b*ect9 6y7al e As System.%3entAr.s2 :andles dtdob.7alueChan.ed t<tdob./e<t ! dtdob.7alue %nd Sub Pri3ate Sub dtdo*47alueChan.ed(6y7al sender As System.8b*ect9 6y7al e As System.%3entAr.s2 :andles dtdo*.7alueChan.ed t<tdo*./e<t ! dtdo*.7alue %nd Sub Pri3ate Sub btne<it4Clic541(6y7al sender As System.8b*ect9 6y7al e As System.%3entAr.s2 :andles btne<it.Clic5 =e.Close(2 %nd Sub Pri3ate Sub btnclear4Clic5(6y7al sender As System.8b*ect9 6y7al e As System.%3entAr.s2 :andles btnclear.Clic5 Call -illte<tbo<(2 %nd Sub
Pri3ate Sub Froup6o<14%nter(6y7al sender As System.8b*ect9 6y7al e As System.%3entAr.s2 :andles Froup6o<1.%nter %nd Sub Pri3ate Sub $abel1A4Clic5(6y7al sender As System.8b*ect9 6y7al e As System.%3entAr.s2 :andles $abel1A.Clic5 %nd Sub %nd Class
$8FIN F8'=
Imports System.Data Imports System.Data.SqlClient Public Class $o.inForm1
G.C.W PARADE
@5

Dim cmdadd As New SqlCommand Dim cnn As New SqlConnection( Data Source!."S#$%&P'%SS(AttachDbFilename!C)"Pro*ects"+,1+ pro*ects"payroll.cwp"payroll"payroll"payroll.md-(Inte.rated Security!/rue(Connect /imeout!0,(1ser Instance!/rue 2 Pri3ate Sub 8R4Clic5(6y7al sender As System.8b*ect9 6y7al e As System.%3entAr.s2 :andles 8R.Clic5 Dim cmd As New SqlCommand I- 1sername/e<t6o<./e<t ! .cw And Password/e<t6o<./e<t ! ; =s.6o<( success-ule lo.in 2 =DIParent1.Show(2 %nd I; cmd.Command/e<t ! S%$%C/ D F'8= user ;C:%'%(username ! B 1sername/e<t6o<./e<t 2 ;cmd.Connection ! cnn ; cnn.8pen(2 ; Dim rdrS#$ As SqlData'eader ! cmd.%<ecute'eader ; I- rdrS#$.'ead ! /rue /hen ; =s.6o<( $o.in Success-ul9 B 1sername/e<t6o<./e<t B ; =DIParentA.Show(2 ; %lse ;=s.6o<( wron. passward or username 2 ;%nd I=e.Close(2 %nd Sub Pri3ate Sub Cancel4Clic5(6y7al sender As System.8b*ect9 6y7al e As System.%3entAr.s2 :andles Cancel.Clic5 =e.Close(2 %nd Sub Pri3ate Sub 1sername$abel4Clic5(6y7al sender As System.8b*ect9 6y7al e As System.%3entAr.s2 :andles 1sername$abel.Clic5 %nd Sub Pri3ate Sub $o.inForm14$oad(6y7al sender As System.8b*ect9 6y7al e As System.%3entAr.s2 :andles =y6ase.$oad %nd Sub %nd Class
parade
/hen
> 2
$8FIN F8'= D%SIFN%' C8D%

?Flobal.=icroso-t.7isual6asic.CompilerSer3ices.Desi.nerFenerated (2@ 4
G.C.W PARADE
@(

?Flobal.System.Dia.nostics.CodeAnalysis.Suppress=essa.e ( =icroso-t.Namin. 9 CA1I+K 2@ 4 Partial Class $o.inForm1 Inherits System.Cindows.Forms.Form ;Form o3errides dispose to clean up the component list. ?System.Dia.nostics.Debu..erNon1serCode (2@ 4 Protected 83errides Sub Dispose (6y7al disposin. As 6oolean2 /ry I- disposin. AndAlso components IsNot Nothin. /hen components.Dispose (2 %nd IFinally =y6ase.Dispose (disposin.2 %nd /ry %nd Sub Friend Cith%3ents $o.oPicture6o< as System.Cindows.Forms.Picture6o< Friend Cith%3ents 1sername$abel as System.Cindows.Forms.$abel Friend Cith%3ents Password$abel as System.Cindows.Forms.$abel Friend Cith%3ents 1sername/e<t6o< as System.Cindows.Forms./e<t6o< Friend Cith%3ents Password/e<t6o< as System.Cindows.Forms./e<t6o< Friend Cith%3ents 8R as System.Cindows.Forms.6utton Friend Cith%3ents Cancel as System.Cindows.Forms.6utton ;'equired by the Cindows Form Desi.ner Pri3ate components As System.Component=odel.IContainer ;N8/%) /he -ollowin. procedure is required by the Cindows Form Desi.ner ;It can be modi-ied usin. the Cindows Form Desi.ner. ;Do not modi-y it usin. the code editor. ?System.Dia.nostics.Debu..erStep/hrou.h (2@ 4 Pri3ate Sub InitialiGeComponent (2 Dim resources As System.Component=odel.Component'esource=ana.er ! New System.Component=odel.Component'esource=ana.er (Fet/ype ($o.inForm122 =e.$o.oPicture6o< ! New System.Cindows.Forms.Picture6o< (2 =e.1sername$abel ! New System.Cindows.Forms.$abel (2 =e.Password$abel ! New System.Cindows.Forms.$abel (2 =e.1sername/e<t6o< ! New System.Cindows.Forms./e<t6o< (2 =e.Password/e<t6o< ! New System.Cindows.Forms./e<t6o< (2 =e.8R ! New System.Cindows.Forms.6utton (2 =e.Cancel ! New System.Cindows.Forms.6utton (2 C/ype (=e.$o.oPicture6o<9 System.Component=odel.ISupportInitialiGe2.6e.inInit(2 =e.Suspend$ayout (2 ; ;$o.oPicture6o< ; =e.$o.oPicture6o<.Ima.e ! C/ype (resources.Fet8b*ect ( $o.oPicture6o<.Ima.e 29 System.Drawin..Ima.e2 =e.$o.oPicture6o<.$ocation ! New System.Drawin..Point (,9 ,2 =e.$o.oPicture6o<.Name ! $o.oPicture6o< =e.$o.oPicture6o<.SiGe ! New System.Drawin..SiGe (1KJ9 1H02 =e.$o.oPicture6o<./abInde< ! , =e.$o.oPicture6o<./abStop ! False ; ;1sername$abel ;
G.C.W PARADE
@)

=e.1sername$abel.$ocation ! New System.Drawin..Point (1I+9 +A2 =e.1sername$abel.Name ! 1sername$abel =e.1sername$abel.SiGe ! New System.Drawin..SiGe (++,9 +02 =e.1sername$abel./abInde< ! , =e.1sername$abel./e<t ! B1ser name =e.1sername$abel./e<tAli.n ! System.Drawin..ContentAli.nment.=iddle$e-t ; ;Password$abel ; =e.Password$abel.$ocation ! New System.Drawin..Point (1I+9 L12 =e.Password$abel.Name ! Password$abel =e.Password$abel.SiGe ! New System.Drawin..SiGe (++,9 +02 =e.Password$abel./abInde< ! + =e.Password$abel./e<t ! BPassword =e.Password$abel./e<tAli.n ! System.Drawin..ContentAli.nment.=iddle$e-t ; ;1sername/e<t6o< ; =e.1sername/e<t6o<.$ocation ! New System.Drawin..Point (1IA9 AA2 =e.1sername/e<t6o<.Name ! 1sername/e<t6o< =e.1sername/e<t6o<.SiGe ! New System.Drawin..SiGe (++,9 +,2 =e.1sername/e<t6o<./abInde< ! 1 ; ;Password/e<t6o< ; =e.Password/e<t6o<.$ocation ! New System.Drawin..Point (1IA9 1,12 =e.Password/e<t6o<.Name ! Password/e<t6o< =e.Password/e<t6o<.PasswordChar ! Flobal.=icroso-t.7isual6asic.ChrC (A+2 =e.Password/e<t6o<.SiGe ! New System.Drawin..SiGe (++,9 +,2 =e.Password/e<t6o<./abInde< ! 0 ; ;8R ; =e.8R.$ocation ! New System.Drawin..Point (1HI9 1K12 =e.8R.Name ! 8R =e.8R.SiGe ! New System.Drawin..SiGe (HA9 +02 =e.8R./abInde< ! A =e.8R./e<t ! B8R ; ;Cancel ; =e.Cancel.Dialo.'esult ! System.Cindows.Forms.Dialo.'esult.Cancel =e.Cancel.$ocation ! New System.Drawin..Point (0,,9 1K12 =e.Cancel.Name ! Cancel =e.Cancel.SiGe ! New System.Drawin..SiGe (HA9 +02 =e.Cancel./abInde< ! J =e.Cancel./e<t ! BCancel ; ;$o.inForm1 ; =e.Accept6utton ! =e.8R =e.AutoScaleDimensions ! New System.Drawin..SiGeF (K.,> 10.,>2 =e.AutoScale=ode ! System.Cindows.Forms.AutoScale=ode.Font =e.Cancel6utton ! =e.Cancel =e.ClientSiGe ! New System.Drawin..SiGe (A,19 1H+2 =e.Controls.Add(=e.Cancel2 =e.Controls.Add(=e.8R2
G.C.W PARADE
@3

=e.Controls.Add(=e.Password/e<t6o<2 =e.Controls.Add(=e.1sername/e<t6o<2 =e.Controls.Add(=e.Password$abel2 =e.Controls.Add(=e.1sername$abel2 =e.Controls.Add(=e.$o.oPicture6o<2 =e.Form6orderStyle ! System.Cindows.Forms.Form6orderStyle.Fi<edDialo. =e.=a<imiGe6o< ! False =e.=inimiGe6o< ! False =e.Name ! $o.inForm1 =e.SiGeFripStyle ! System.Cindows.Forms.SiGeFripStyle.:ide =e.StartPosition ! System.Cindows.Forms.FormStartPosition.CenterParent =e./e<t ! $o.inForm1 C/ype(=e.$o.oPicture6o<9 System.Component=odel.ISupportInitialiGe2.%ndInit(2 =e.'esume$ayout(False2 =e.Per-orm$ayout(2 %nd Sub %nd Class
=DI F8'=
Imports System.Cindows.Forms Public Class =DIParent1 Pri3ate Sub ShowNewForm(6y7al sender As 8b*ect9 6y7al e As %3entAr.s2 :andles New/oolStrip6utton.Clic5 ; Create a new instance o- the child -orm. FormA.Show(2 %nd Sub Pri3ate Sub 8penFile(6y7al sender As 8b*ect9 6y7al e As %3entAr.s2 :andles 8pen/oolStrip6utton.Clic5 Form0.Show(2 %nd Sub Pri3ate Sub Sa3eAs/oolStrip=enuItem4Clic5(6y7al sender As 8b*ect9 6y7al e As %3entAr.s2 Dim Sa3eFileDialo. As New Sa3eFileDialo. Sa3eFileDialo..InitialDirectory ! =y.Computer.FileSystem.SpecialDirectories.=yDocuments Sa3eFileDialo..Filter ! /e<t Files (D.t<t2TD.t<tTAll Files (D.D2TD.D I- (Sa3eFileDialo..ShowDialo.(=e2 ! System.Cindows.Forms.Dialo.'esult.8R2 /hen Dim FileName As Strin. ! Sa3eFileDialo..FileName ; /8D8) Add code here to sa3e the current contents o- the -orm to a -ile. %nd I%nd Sub
G.C.W PARADE
@@

Pri3ate Sub %<it/oolsStrip=enuItem4Clic5(6y7al sender As 8b*ect9 6y7al e As %3entAr.s2 =e.Close(2 %nd Sub Pri3ate Sub Cut/oolStrip=enuItem4Clic5(6y7al sender As 8b*ect9 6y7al e As %3entAr.s2 ; 1se =y.Computer.Clipboard to insert the selected te<t or ima.es into the clipboard %nd Sub Pri3ate Sub Copy/oolStrip=enuItem4Clic5(6y7al sender As 8b*ect9 6y7al e As %3entAr.s2 ; 1se =y.Computer.Clipboard to insert the selected te<t or ima.es into the clipboard %nd Sub Pri3ate Sub Paste/oolStrip=enuItem4Clic5(6y7al sender As 8b*ect9 6y7al e As %3entAr.s2 ;1se =y.Computer.Clipboard.Fet/e<t(2 or =y.Computer.Clipboard.FetData to retrie3e in-ormation -rom the clipboard. %nd Sub
Pri3ate Sub Cascade/oolStrip=enuItem4Clic5(6y7al sender As 8b*ect9 6y7al e As %3entAr.s2 =e.$ayout=di(=di$ayout.Cascade2 %nd Sub Pri3ate Sub /ile7ertical/oolStrip=enuItem4Clic5(6y7al sender As 8b*ect9 6y7al e As %3entAr.s2 =e.$ayout=di(=di$ayout./ile7ertical2 %nd Sub Pri3ate Sub /ile:oriGontal/oolStrip=enuItem4Clic5(6y7al sender As 8b*ect9 6y7al e As %3entAr.s2 =e.$ayout=di(=di$ayout./ile:oriGontal2 %nd Sub Pri3ate Sub Arran.eIcons/oolStrip=enuItem4Clic5(6y7al sender As 8b*ect9 6y7al e As %3entAr.s2 =e.$ayout=di(=di$ayout.Arran.eIcons2 %nd Sub Pri3ate Sub CloseAll/oolStrip=enuItem4Clic5(6y7al sender As 8b*ect9 6y7al e As %3entAr.s2 ; Close all child -orms o- the parent. For %ach ChildForm As Form In =e.=diChildren ChildForm.Close(2 Ne<t %nd Sub Pri3ate m4ChildFormNumber As Inte.er Pri3ate Sub 1pdate/oolStrip=enuItem4Clic5(6y7al sender As System.8b*ect9 6y7al e As System.%3entAr.s2 :andles 1pdate/oolStrip=enuItem.Clic5
G.C.W PARADE
1AA

FormA.Show(2 %nd Sub Pri3ate Sub =DIParent14$oad(6y7al sender As System.8b*ect9 6y7al e As System.%3entAr.s2 :andles =y6ase.$oad %nd Sub Pri3ate Sub Salary/oolStrip=enuItem4Clic5(6y7al sender As System.8b*ect9 6y7al e As System.%3entAr.s2 :andles Salary/oolStrip=enuItem.Clic5 Form0.Show(2 %nd Sub Pri3ate Sub 1pdation/oolStrip=enuItem4Clic5(6y7al sender As System.8b*ect9 6y7al e As System.%3entAr.s2 :andles 1pdation/oolStrip=enuItem.Clic5 Form+.Show(2 %nd Sub Pri3ate Sub 1pdation/oolStrip=enuItem14Clic5(6y7al sender As System.8b*ect9 6y7al e As System.%3entAr.s2 :andles 1pdation/oolStrip=enuItem1.Clic5 Form1.Show(2 %nd Sub Pri3ate Sub %<it/oolStrip=enuItem14Clic5(6y7al sender As System.8b*ect9 6y7al e As System.%3entAr.s2 :andles %<it/oolStrip=enuItem1.Clic5 =e.Close(2 %nd Sub Pri3ate Sub Sa3e/oolStrip6utton4Clic5(6y7al sender As System.8b*ect9 6y7al e As System.%3entAr.s2 :andles Sa3e/oolStrip6utton.Clic5 Form+.Show(2 %nd Sub Pri3ate Sub PrintPre3iew/oolStrip6utton4Clic5(6y7al sender As System.8b*ect9 6y7al e As System.%3entAr.s2 :andles PrintPre3iew/oolStrip6utton.Clic5 Form1.Show(2 %nd Sub %nd Class
=DI F8'= D%SIFN%' C8D%

?Flobal.=icroso-t.7isual6asic.CompilerSer3ices.Desi.nerFenerated(2@ 4 Partial Class =DIParent1 Inherits System.Cindows.Forms.Form ;Form o3errides dispose to clean up the component list. ?System.Dia.nostics.Debu..erNon1serCode(2@ 4
G.C.W PARADE
1A1

Protected 83errides Sub Dispose(6y7al disposin. As 6oolean2 /ry I- disposin. AndAlso components IsNot Nothin. /hen components.Dispose(2 %nd IFinally =y6ase.Dispose(disposin.2 %nd /ry %nd Sub ;'equired by the Cindows Form Desi.ner Pri3ate components As System.Component=odel.IContainer ;N8/%) /he -ollowin. procedure is required by the Cindows Form Desi.ner ;It can be modi-ied usin. the Cindows Form Desi.ner. ;Do not modi-y it usin. the code editor. ?System.Dia.nostics.Debu..erStep/hrou.h(2@ 4 Pri3ate Sub InitialiGeComponent(2 =e.components ! New System.Component=odel.Container(2 Dim resources As System.Component=odel.Component'esource=ana.er ! New System.Component=odel.Component'esource=ana.er(Fet/ype(=DIParent122 =e.=enuStrip ! New System.Cindows.Forms.=enuStrip(2 =e.%mployee/oolStrip=enuItem ! New System.Cindows.Forms./oolStrip=enuItem(2 =e.1pdate/oolStrip=enuItem ! New System.Cindows.Forms./oolStrip=enuItem(2 =e.Salary/oolStrip=enuItem ! New System.Cindows.Forms./oolStrip=enuItem(2 =e.Department/oolStrip=enuItem ! New System.Cindows.Forms./oolStrip=enuItem(2 =e.1pdation/oolStrip=enuItem ! New System.Cindows.Forms./oolStrip=enuItem(2 =e.Payband/oolStrip=enuItem ! New System.Cindows.Forms./oolStrip=enuItem(2 =e.1pdation/oolStrip=enuItem1 ! New System.Cindows.Forms./oolStrip=enuItem(2 =e.%<it/oolStrip=enuItem1 ! New System.Cindows.Forms./oolStrip=enuItem(2 =e./oolStrip ! New System.Cindows.Forms./oolStrip(2 =e.New/oolStrip6utton ! New System.Cindows.Forms./oolStrip6utton(2 =e.8pen/oolStrip6utton ! New System.Cindows.Forms./oolStrip6utton(2 =e.Sa3e/oolStrip6utton ! New System.Cindows.Forms./oolStrip6utton(2 =e./oolStripSeparator1 ! New System.Cindows.Forms./oolStripSeparator(2 =e.Print/oolStrip6utton ! New System.Cindows.Forms./oolStrip6utton(2 =e.PrintPre3iew/oolStrip6utton ! New System.Cindows.Forms./oolStrip6utton(2 =e./oolStripSeparator+ ! New System.Cindows.Forms./oolStripSeparator(2 =e.StatusStrip ! New System.Cindows.Forms.StatusStrip(2 =e./oolStripStatus$abel ! New System.Cindows.Forms./oolStripStatus$abel(2 =e./ool/ip ! New System.Cindows.Forms./ool/ip(=e.components2 =e.=enuStrip.Suspend$ayout(2 =e./oolStrip.Suspend$ayout(2 =e.StatusStrip.Suspend$ayout(2 =e.Suspend$ayout(2 ; ;=enuStrip
G.C.W PARADE
1A2

; =e.=enuStrip.Items.Add'an.e(New System.Cindows.Forms./oolStripItem(2 M=e.%mployee/oolStrip=enuItem9 =e.Department/oolStrip=enuItem9 =e.Payband/oolStrip=enuItem9 =e.%<it/oolStrip=enuItem1N2 =e.=enuStrip.$ocation ! New System.Drawin..Point(,9 ,2 =e.=enuStrip.Name ! =enuStrip =e.=enuStrip.SiGe ! New System.Drawin..SiGe(K0+9 +A2 =e.=enuStrip./abInde< ! J =e.=enuStrip./e<t ! =enuStrip ; ;%mployee/oolStrip=enuItem ; =e.%mployee/oolStrip=enuItem.DropDownItems.Add'an.e(New System.Cindows.Forms./oolStripItem(2 M=e.1pdate/oolStrip=enuItem9 =e.Salary/oolStrip=enuItemN2 =e.%mployee/oolStrip=enuItem.Name ! %mployee/oolStrip=enuItem =e.%mployee/oolStrip=enuItem.SiGe ! New System.Drawin..SiGe(KJ9 +,2 =e.%mployee/oolStrip=enuItem./e<t ! %mployee ; ;1pdate/oolStrip=enuItem ; =e.1pdate/oolStrip=enuItem.Name ! 1pdate/oolStrip=enuItem =e.1pdate/oolStrip=enuItem.SiGe ! New System.Drawin..SiGe(1J+9 ++2 =e.1pdate/oolStrip=enuItem./e<t ! 1pdation ; ;Salary/oolStrip=enuItem ; =e.Salary/oolStrip=enuItem.Name ! Salary/oolStrip=enuItem =e.Salary/oolStrip=enuItem.SiGe ! New System.Drawin..SiGe(1J+9 ++2 =e.Salary/oolStrip=enuItem./e<t ! Salary ; ;Department/oolStrip=enuItem ; =e.Department/oolStrip=enuItem.DropDownItems.Add'an.e(New System.Cindows.Forms./oolStripItem(2 M=e.1pdation/oolStrip=enuItemN2 =e.Department/oolStrip=enuItem.Name ! Department/oolStrip=enuItem =e.Department/oolStrip=enuItem.SiGe ! New System.Drawin..SiGe(IK9 +,2 =e.Department/oolStrip=enuItem./e<t ! Department ; ;1pdation/oolStrip=enuItem ; =e.1pdation/oolStrip=enuItem.Name ! 1pdation/oolStrip=enuItem =e.1pdation/oolStrip=enuItem.SiGe ! New System.Drawin..SiGe(1+L9 ++2 =e.1pdation/oolStrip=enuItem./e<t ! 1pdation ; ;Payband/oolStrip=enuItem ; =e.Payband/oolStrip=enuItem.DropDownItems.Add'an.e(New System.Cindows.Forms./oolStripItem(2 M=e.1pdation/oolStrip=enuItem1N2 =e.Payband/oolStrip=enuItem.Name ! Payband/oolStrip=enuItem =e.Payband/oolStrip=enuItem.SiGe ! New System.Drawin..SiGe(K19 +,2 =e.Payband/oolStrip=enuItem./e<t ! Payband ; ;1pdation/oolStrip=enuItem1 ; =e.1pdation/oolStrip=enuItem1.Name ! 1pdation/oolStrip=enuItem1 =e.1pdation/oolStrip=enuItem1.SiGe ! New System.Drawin..SiGe(1+L9 ++2
G.C.W PARADE
1A3

=e.1pdation/oolStrip=enuItem1./e<t ! 1pdation ; ;%<it/oolStrip=enuItem1 ; =e.%<it/oolStrip=enuItem1.Name ! %<it/oolStrip=enuItem1 =e.%<it/oolStrip=enuItem1.SiGe ! New System.Drawin..SiGe(0I9 +,2 =e.%<it/oolStrip=enuItem1./e<t ! %<it ; ;/oolStrip ; =e./oolStrip.Items.Add'an.e(New System.Cindows.Forms./oolStripItem(2 M=e.New/oolStrip6utton9 =e.8pen/oolStrip6utton9 =e.Sa3e/oolStrip6utton9 =e./oolStripSeparator19 =e.Print/oolStrip6utton9 =e.PrintPre3iew/oolStrip6utton9 =e./oolStripSeparator+N2 =e./oolStrip.$ocation ! New System.Drawin..Point(,9 +A2 =e./oolStrip.Name ! /oolStrip =e./oolStrip.SiGe ! New System.Drawin..SiGe(K0+9 +J2 =e./oolStrip./abInde< ! K =e./oolStrip./e<t ! /oolStrip ; ;New/oolStrip6utton ; =e.New/oolStrip6utton.DisplayStyle ! System.Cindows.Forms./oolStripItemDisplayStyle.Ima.e =e.New/oolStrip6utton.Ima.e ! C/ype(resources.Fet8b*ect( New/oolStrip6utton.Ima.e 29 System.Drawin..Ima.e2 =e.New/oolStrip6utton.Ima.e/ransparentColor ! System.Drawin..Color.6lac5 =e.New/oolStrip6utton.Name ! New/oolStrip6utton =e.New/oolStrip6utton.SiGe ! New System.Drawin..SiGe(+09 ++2 =e.New/oolStrip6utton./e<t ! %mployee Database ; ;8pen/oolStrip6utton ; =e.8pen/oolStrip6utton.DisplayStyle ! System.Cindows.Forms./oolStripItemDisplayStyle.Ima.e =e.8pen/oolStrip6utton.Ima.e ! C/ype(resources.Fet8b*ect( 8pen/oolStrip6utton.Ima.e 29 System.Drawin..Ima.e2 =e.8pen/oolStrip6utton.Ima.e/ransparentColor ! System.Drawin..Color.6lac5 =e.8pen/oolStrip6utton.Name ! 8pen/oolStrip6utton =e.8pen/oolStrip6utton.SiGe ! New System.Drawin..SiGe(+09 ++2 =e.8pen/oolStrip6utton./e<t ! Salary ; ;Sa3e/oolStrip6utton ; =e.Sa3e/oolStrip6utton.DisplayStyle ! System.Cindows.Forms./oolStripItemDisplayStyle.Ima.e =e.Sa3e/oolStrip6utton.Ima.e ! C/ype(resources.Fet8b*ect( Sa3e/oolStrip6utton.Ima.e 29 System.Drawin..Ima.e2 =e.Sa3e/oolStrip6utton.Ima.e/ransparentColor ! System.Drawin..Color.6lac5 =e.Sa3e/oolStrip6utton.Name ! Sa3e/oolStrip6utton =e.Sa3e/oolStrip6utton.SiGe ! New System.Drawin..SiGe(+09 ++2 =e.Sa3e/oolStrip6utton./e<t ! Department ; ;/oolStripSeparator1 ;
G.C.W PARADE
1A4

=e./oolStripSeparator1.Name ! /oolStripSeparator1 =e./oolStripSeparator1.SiGe ! New System.Drawin..SiGe(K9 +J2 ; ;Print/oolStrip6utton ; =e.Print/oolStrip6utton.DisplayStyle ! System.Cindows.Forms./oolStripItemDisplayStyle.Ima.e =e.Print/oolStrip6utton.Ima.e ! C/ype(resources.Fet8b*ect( Print/oolStrip6utton.Ima.e 29 System.Drawin..Ima.e2 =e.Print/oolStrip6utton.Ima.e/ransparentColor ! System.Drawin..Color.6lac5 =e.Print/oolStrip6utton.Name ! Print/oolStrip6utton =e.Print/oolStrip6utton.SiGe ! New System.Drawin..SiGe(+09 ++2 =e.Print/oolStrip6utton./e<t ! Payband ; ;PrintPre3iew/oolStrip6utton ; =e.PrintPre3iew/oolStrip6utton.DisplayStyle ! System.Cindows.Forms./oolStripItemDisplayStyle.Ima.e =e.PrintPre3iew/oolStrip6utton.Ima.e ! C/ype(resources.Fet8b*ect( PrintPre3iew/oolStrip6utton.Ima.e 29 System.Drawin..Ima.e2 =e.PrintPre3iew/oolStrip6utton.Ima.e/ransparentColor ! System.Drawin..Color.6lac5 =e.PrintPre3iew/oolStrip6utton.Name ! PrintPre3iew/oolStrip6utton =e.PrintPre3iew/oolStrip6utton.SiGe ! New System.Drawin..SiGe(+09 ++2 =e.PrintPre3iew/oolStrip6utton./e<t ! Print 'eports ; ;/oolStripSeparator+ ; =e./oolStripSeparator+.Name ! /oolStripSeparator+ =e./oolStripSeparator+.SiGe ! New System.Drawin..SiGe(K9 +J2 ; ;StatusStrip ; =e.StatusStrip.Items.Add'an.e(New System.Cindows.Forms./oolStripItem(2 M=e./oolStripStatus$abelN2 =e.StatusStrip.$ocation ! New System.Drawin..Point(,9 A012 =e.StatusStrip.Name ! StatusStrip =e.StatusStrip.SiGe ! New System.Drawin..SiGe(K0+9 ++2 =e.StatusStrip./abInde< ! I =e.StatusStrip./e<t ! Payroll =ana.ement System De3eloped 6yS 'adhi5a9 ; ;/oolStripStatus$abel ; =e./oolStripStatus$abel.DisplayStyle ! System.Cindows.Forms./oolStripItemDisplayStyle./e<t =e./oolStripStatus$abel.Name ! /oolStripStatus$abel =e./oolStripStatus$abel.SiGe ! New System.Drawin..SiGe(+II9 1I2 =e./oolStripStatus$abel./e<t ! Pay'oll =ana.ement System De3eloped 6yS 'adhi5a ; ;=DIParent1 ; =e.AutoScaleDimensions ! New System.Drawin..SiGeF(K.,>9 10.,>2 =e.AutoScale=ode ! System.Cindows.Forms.AutoScale=ode.Font
G.C.W PARADE
1A5

=e.6ac5.roundIma.e ! C/ype(resources.Fet8b*ect( Uthis.6ac5.roundIma.e 29 System.Drawin..Ima.e2 =e.ClientSiGe ! New System.Drawin..SiGe(K0+9 AJ02 =e.Controls.Add(=e./oolStrip2 =e.Controls.Add(=e.=enuStrip2 =e.Controls.Add(=e.StatusStrip2 =e.Is=diContainer ! /rue =e.=ain=enuStrip ! =e.=enuStrip =e.Name ! =DIParent1 =e./e<t ! =DIParent1 =e.CindowState ! System.Cindows.Forms.FormCindowState.=a<imiGed =e.=enuStrip.'esume$ayout(False2 =e.=enuStrip.Per-orm$ayout(2 =e./oolStrip.'esume$ayout(False2 =e./oolStrip.Per-orm$ayout(2 =e.StatusStrip.'esume$ayout(False2 =e.StatusStrip.Per-orm$ayout(2 =e.'esume$ayout(False2 =e.Per-orm$ayout(2 %nd Sub Friend Cith%3ents /oolStripSeparator+ As System.Cindows.Forms./oolStripSeparator Friend Cith%3ents PrintPre3iew/oolStrip6utton As System.Cindows.Forms./oolStrip6utton Friend Cith%3ents /ool/ip As System.Cindows.Forms./ool/ip Friend Cith%3ents /oolStripStatus$abel As System.Cindows.Forms./oolStripStatus$abel Friend Cith%3ents StatusStrip As System.Cindows.Forms.StatusStrip Friend Cith%3ents Print/oolStrip6utton As System.Cindows.Forms./oolStrip6utton Friend Cith%3ents New/oolStrip6utton As System.Cindows.Forms./oolStrip6utton Friend Cith%3ents /oolStrip As System.Cindows.Forms./oolStrip Friend Cith%3ents 8pen/oolStrip6utton As System.Cindows.Forms./oolStrip6utton Friend Cith%3ents Sa3e/oolStrip6utton As System.Cindows.Forms./oolStrip6utton Friend Cith%3ents /oolStripSeparator1 As System.Cindows.Forms./oolStripSeparator Friend Cith%3ents =enuStrip As System.Cindows.Forms.=enuStrip Friend Cith%3ents %mployee/oolStrip=enuItem As System.Cindows.Forms./oolStrip=enuItem Friend Cith%3ents 1pdate/oolStrip=enuItem As System.Cindows.Forms./oolStrip=enuItem Friend Cith%3ents Salary/oolStrip=enuItem As System.Cindows.Forms./oolStrip=enuItem Friend Cith%3ents Department/oolStrip=enuItem As System.Cindows.Forms./oolStrip=enuItem Friend Cith%3ents 1pdation/oolStrip=enuItem As System.Cindows.Forms./oolStrip=enuItem Friend Cith%3ents Payband/oolStrip=enuItem As System.Cindows.Forms./oolStrip=enuItem Friend Cith%3ents 1pdation/oolStrip=enuItem1 As System.Cindows.Forms./oolStrip=enuItem Friend Cith%3ents %<it/oolStrip=enuItem1 As System.Cindows.Forms./oolStrip=enuItem
G.C.W PARADE
1A(

%nd Class
=8D1$% C8D%
=odule =odule1 Public Sub -illte<tbo<(2 FormA.t<tecode./e<t ! FormA.t<tename./e<t ! FormA.t<teaddr./e<t ! FormA.t<tetel./e<t ! FormA.t<tdob./e<t ! FormA.t<tdo*./e<t ! FormA.cmbedept./e<t ! FormA.cmbedesi../e<t ! FormA.cmbemarital./e<t ! FormA.cmbepb./e<t ! FormA.cmbse<./e<t ! %nd Sub %nd =odule
AP$$ICA/I8N C8NFIF1'A/I8N
?V<ml 3ersion! 1., encodin.! ut-SL V@ ?con-i.uration@ ?con-i.Sections@ ?Qcon-i.Sections@ ?startup@ ?supported'untime 3ersion! 3A., s5u! .N%/Framewor597ersion!3A.,9Pro-ile!Client Q@ ?Qstartup@ ?connectionStrin.s@ ?add name! payroll%ntities connectionStrin.! metadata!res)QQDQ=odel1.csdlT res)QQDQ=odel1.ssdlTres)QQDQ=odel1.msl(pro3ider!System.Data.SqlClient(pro3ider connection strin.!Bquot(Data Source!."S#$%&P'%SS(AttachDbFilename!T DataDirectoryT"payroll.md-(Inte.rated Security!/rue(Connect /imeout!0,(1ser Instance!/rue(=ultipleActi3e'esultSets!/rueBquot( pro3iderName! System.Data.%ntityClient Q@ ?add name! payroll.=y.=ySettin.s.payrollConnectionStrin. connectionStrin.! Data Source!."S#$%&P'%SS(AttachDbFilename!T DataDirectoryT"payroll.md-(Inte.rated Security!/rue(Connect /imeout!0,(1ser Instance!/rue pro3iderName! System.Data.SqlClient Q@ ?add name! payroll.=y.=ySettin.s.ClientPAE'8$$ConnectionStrin. connectionStrin.! Data Source!TDataDirectoryT"PAE'8$$.sd-(=a< Database SiGe!+,AI pro3iderName! =icroso-t.SqlSer3erCe.Client.0.J Q@ ?QconnectionStrin.s@ ?Qcon-i.uration@
G.C.W PARADE
1A)
C"APTER 10
TESTING
G.C.W PARADE 1A3
INTRODUCTION
'oftware Testing is a critical element of software quality assurance and represents the ultimate review specification* design and coding. 0t plays a critical role in quality assurance for software. ue to limitations of the verification methods of the previous phase* design and requirement faults also appear in the code. Testing is used to detect all these errors in addition to those in the code. OBJECTIVES OF TESTING The main objectives of the testing are2 To e5ecute program with intent of finding an error. To chec+ the proper functioning of various modules of the system individually and to correct errors* if any. To chec+ and test the proper integration of all individually tested modules so as to establish proper interaction. To chec+ whether all the data fields in the database are consistent or not. To chec+ the accuracy and reliability of the system.
G.C.W PARADE
1A@

To verify whether it fulfills the requirement of the proposed system.
The individual modules were tested and results measured against manual calculations. %ecessary corrections and proper error handlers have been when error was detected. 'uitable test data was used. The users of the system were involved all through the testing procedure and their suggestions are considered. TYPES OF TESTING PERFORMED There are various types of testing studied under the 'oftware &ngineering course. 'ome of these are2 UNIT TESTING This concentrates on each unit of the software as implemented in source code. &ach system modules were tested individually. Chec+ing the uniqueness of the +ey values in client interface. 0nput output format %ecessary corrections
0t addresses the issues associated with the dual problems of verification and programming. Blac+ bo5 test design case techniques are the most prevalent at this stage. 0n this* many unit tested modules are combined into sub systems* which are then tested. The goal is to see if the modules can be integrated properly. "ence* the emphasis is on testing interfaces between modules.
SYSTEM TESTING 'ystem tested after integration of all modules. Chec+ing the module interaction and collective wor+ing. %ecessary corrections.
FUNCTIONAL TESTING
G.C.W PARADE
11A

The goal is to see if the modules can be integrated properly. "ence* the emphasis is on testing interfaces between modules. The structure of the program is not considered. Test cases were decided on the basis of the requirements or specifications of the modules. Test cases were first chec+ed manually and then chec+ed on the system. %ecessary corrections were made wherever necessary. PERFORMANCE TESTING /erformance Testing is designed to test the run< time performance of the software within the conte5t of an integrated system. /erformance Testing was performed at each level of the software development. /erformance Testing was performed on individual modules. /erformance tests are coupled with stress testing and often required both hardware and software instrumentation. WHITE BOX TESTING 0t uses the control structure of the procedural design to derive test cases. 0t is predicted on close e5amination of procedural design. /roviding test case that e5ercise specific sets of condition and loops tests logical paths through the software.
BIB*('RAP&#
000.google.com 0i/ipedia 000.projecttopics.info
G.C.W PARADE
111

A Project Report On "College Pay Roll Management System": Department of Computer Science G.C.W Parade, Jammu (2012-2013)

Uploaded by

Copyright:

Available Formats

A Project Report On "College Pay Roll Management System": Department of Computer Science G.C.W Parade, Jammu (2012-2013)

Uploaded by

Document Information

Original Title

Copyright

Available Formats

Share this document

Share or Embed Document

Sharing Options

Did you find this document useful?

Is this content inappropriate?

Copyright:

Available Formats

A Project Report On "College Pay Roll Management System": Department of Computer Science G.C.W Parade, Jammu (2012-2013)

Uploaded by

Copyright:

Available Formats

A PROJECT REPORT ON "COLLEGE PAY ROLL MANAGEMENT SYSTEM"

DEPARTMENT OF COMPUTER SCIENCE G.C.W PARADE, JAMMU (2012-2013

COLLEGE PAY ROLL MANAGEMENT SYSTEM

UNDER THE GUIDANCE OF BHARAT MAHAJAN

BY: - HOD !. B"#$%&'"

C"A% (DEPARTMENT OF COMPUTER SCIENCES)

COLLEGE PAY ROLL MANAGEMENT SYSTEM

COLLEGE PAY ROLL MANAGEMENT SYSTEM

COLLEGE PAY ROLL MANAGEMENT SYSTEM

:. 9< <. 3== 3=. 3=9 33.

SCR!!% S&( S C("I%' !S I%' BIB*('RAP&#

996 ;=6 3=36 3=;

COLLEGE PAY ROLL MANAGEMENT SYSTEM

COLLEGE PAY ROLL MANAGEMENT SYSTEM

S#S !M "!4*(PM!% 'T!AT&!()

COLLEGE PAY ROLL MANAGEMENT SYSTEM

COLLEGE PAY ROLL MANAGEMENT SYSTEM

Fig. The .aterfall -odel

SYSTEM DEVELOPMENT LIFE CYCLE (SDLC)

#EASI I!IT% ST&D%

DESI'$ G.C.W PARADE CODI$' TESTI$' I"P!E"E$TATIO$ "AI$TAI$E$CE 4

COLLEGE PAY ROLL MANAGEMENT SYSTEM

PROBLEM DEFINITION & DESCRIPTION

COLLEGE PAY ROLL MANAGEMENT SYSTEM

COLLEGE PAY ROLL MANAGEMENT SYSTEM

COLLEGE PAY ROLL MANAGEMENT SYSTEM

COLLEGE PAY ROLL MANAGEMENT SYSTEM

PROB3EMS IN PRESENT SYSTEM45

COLLEGE PAY ROLL MANAGEMENT SYSTEM

21 E,al+ation and synt*esis1

31 S-e/ifi/ation and re,ie<

COLLEGE PAY ROLL MANAGEMENT SYSTEM

AD6ANTA2ES AND PROPOSED SYSTEM

COLLEGE PAY ROLL MANAGEMENT SYSTEM

COLLEGE PAY ROLL MANAGEMENT SYSTEM

COLLEGE PAY ROLL MANAGEMENT SYSTEM

COLLEGE PAY ROLL MANAGEMENT SYSTEM

COLLEGE PAY ROLL MANAGEMENT SYSTEM

COLLEGE PAY ROLL MANAGEMENT SYSTEM

COLLEGE PAY ROLL MANAGEMENT SYSTEM

COLLEGE PAY ROLL MANAGEMENT SYSTEM

COLLEGE PAY ROLL MANAGEMENT SYSTEM

COLLEGE PAY ROLL MANAGEMENT SYSTEM

"A A )*(, "IA'RAM

COLLEGE PAY ROLL MANAGEMENT SYSTEM

DATA F3O8 DIA2RAM OF CO33E2E PAY RO33 MANA2EMENT SYSTEM

COLLEGE PAY ROLL MANAGEMENT SYSTEM

COLLEGE PAY ROLL MANAGEMENT SYSTEM

ER-DIAGRAM OF PAYROLL MANAGEMENT SYSTEM

COLLEGE PAY ROLL MANAGEMENT SYSTEM

COLLEGE PAY ROLL MANAGEMENT SYSTEM

COLLEGE PAY ROLL MANAGEMENT SYSTEM

COLLEGE PAY ROLL MANAGEMENT SYSTEM

0ntroduction To $isual 'tudio.%et

COLLEGE PAY ROLL MANAGEMENT SYSTEM

COLLEGE PAY ROLL MANAGEMENT SYSTEM

COLLEGE PAY ROLL MANAGEMENT SYSTEM

COLLEGE PAY ROLL MANAGEMENT SYSTEM

COLLEGE PAY ROLL MANAGEMENT SYSTEM