VFP习题答案(第二).docVIP

《Visual Foxpro 程序设计与应用教程（第二版）》 部分习题参考答案 （蒋望东整理，如您发现有遗漏及错误，或您有补充，请告知 hncsjwd@21，谢谢！） 第2章 第53页5题答案 x-int(x) y%4= 0 and y%100!=0 or y%400= 0 或 mod(y,4)=0 and mod(y,100)!=0 or mod(y,400)=0 x%3=2 and x%5=3 sin(pi()/6)+sqrt((x+y)/(x-y)) date() – {^1997-06-30} 第53页6题答案 （1） mod(员工编号，2)=1 and 婚否=.F. （2） left(联系电话，4)=’0731’ and 性别=’男’ （3） year(date()) – year(工作日期)15 or 工资级别10 （4） left(姓名，2)=”张” and 部门名称=’人事处’ （5） between(工作日期 ,{^2005-10-01},{^2008-01-01} ) and工资级别3 或 工作日期{^2005-10-01} and工作日期{^2008-01-01} and工资级别3 第3章 第85页第2题 1、go 2 list next 3 2、list for 性别=’男’ 3、list for性别=’女’ and 部门=”技术” 4、list for 出生日期 {^1975-01-01} 或 list for year(出生日期) 1975 5、list all fields 编号”女” 7、list for right(编号，1)=”8” and 婚否=.T. 8、list for substr(编号,2,1)=”3” 9、browse fields 姓名,部门,出生日期,职称 for 性别=”男” 10、（见P72 例3.22） browse fields编号“05060” …….. delete record 2 delete record 5 或 go 2 delete go 5 delete 或 delete for recno()=2 or recno()=5 go 2 recall pack 或 recall record 2 pack 或 recall for recno()=2 pack 4、use zgqk1 dimention aa(10) scatter to aa memo aa(5)={^1985-07-01} aa(9)=”该职工评为先进个人” gather from aa memo 5、use zgqk1 zap append from zgqk 第85页第5题 使用SQL语句修改：（参考教材P126） ⑴ alter table BF2 alter column 部门 char(8) ⑵ alter table BF2 rename column编号 to 职工编号 alter table BF2 alter column 职工编号 char(6) ⑶ alter table BF2 add column 职务 char(8) select 职工编号,部门,姓名,性别,出生日期,婚否,职务,工作日期,职称,简历,照片 from BF2 into table BF_temp delete file BF2.dbf rename BF_temp.dbf TO BF2.dbf ⑷ alter table BF2 drop column 职称 或者使用Visual Foxpro表扩展结构修改语句修改： 先将表文件 BF2.dbf 的扩展结构拷贝为BF2_struc.dbf use BF2.dbf COPY STRUCTURE EXTENDED TO BF2_struc.dbf BF2_struc.dbf 的结构如下： BF2_struc.dbf 的内容如下所示：(此处以 员工表.dbf 的为例) ⑴ use BF2_struc.dbf replace field_len with 8 for field_name =”部门” CREATE BF_temp FROM BF2_struc use BF_temp.dbf Append from BF2.dbf DELETE FILE BF2.dbf rename BF_temp.dbf TO BF2.dbf close all ⑵ use BF2_struc.dbf replace field_name with ”职工编号” for field_name =” 编号” replace field_len