代码大全

OldSex = NewSex

OldSalary = NewSalary

NewName = PrevOldName

NewAddress = PrevOldAddress

NewPhone = PrevOldPhone

NewSNN = PrevOldSSN

NewSex = PrevOldsex

NewSalary = PrevOldSalary

Microsoft Quick Bas
eic Basic TYPE ENDTYPE

TYPE tEmployee

Name AS STRING

Address AS STRING

Phone AS STRING

SSN AS STRING

Sex AS STRING

Salary AS STRING

END TYPE

DIM NewEmployee AS tEmployee

DIM OldEmployee AS tEmployee

DIM PrevOldEmployee AS tEmployee

PtevOldEmployee = OldEmploydee

OldEmploye = NewEmployee

NewEmployee = PtevOldEmployee

NumWithholdings ,
Pascal C

Basic

CALL HardWayRoutine( Name, Address, Phone, SSN, Sex,Salary )

CALL EasyWayRoutine( Employee )
( ) NumWithholdings
HardWayRoutine() Employee N
umWithholdings EasyWayRoutine()