Visual FoxPro及其应用系统开发书后练习答案(清华大学出版社).doc

第二章.表的基本操作习题 P69: 5.(1) list record 5 (2) go 3 List next 5 go 3 list next 3 list fields 货号,品名,生产单位 for 数量5 list for 进口=.t. or year(开单日期)=1995 list for 生产单位=”上海” *非精确比较 list for (单价4000 and 进口=.t.) or (单价5000 and 进口=.f.) 也可写成 list for (单价4000 and 进口) or (单价5000 and !进口) list fields 货号,品名,单价*0.9,开单日期 for year(开单日期)=1995 list for单价2000 or (单价5000 and 进口) go 3 list rest for !进口 set exact on list for right(货号,3)=”120” list for left(货号,1)=”L” or right(left(货号,2),1)=”V” list for 单价3000 and right(生产单位,4)=”公司” 6. (1) use sp Copy structure to sp1 Use sp1 List structure (2) use sp Copy structure to sp1 fields 货号, ,品名,数量,生产单位 (3)use sp Copy to sp3 或 copy file sp.dbf to sp3.dbf (4)use sp Copy to sp4 fields货号, ,品名,数量,生产单位 (5) use sp Go 2 Copy to sp5 next 5 for 单价=3000 and 进口 (6) use sp Copy to sp6 for 开单日期{1/1/1996} (7) use sp Copy to sp.txt sdf Use sp6 Append from sp.txt sdf 7. use sp Copy to sp1 use sp1 list stru list replace all 数量 with 数量*2 go 3 insert delete record 3 delete record 7 recall record 3 pack append from sp.dbf list use sp1 go 3 scatter to a memo a(4)=3500 gather from a 第三章 查询与统计 1 use sb sort to sb1 on 部门 /a fields 编号，名称，价格，部门 for 价格10000 use sb1 list use sb sort to sb2 on 名称 /d ,启用日期 /d for 主要设备=.t. use sb2 list 3. use sb (1) index on 编号 descending tag bh (2) index on 名称+DTOC(启用日期) descending tag mcqyrq unique (3) index on str(部门,10,0)- DTOC(启用日期) descending candidate 4.顺序查询: Locate for year(启用日期)=1992 and 主要设备=.f. Disp Continue 索引查询： Index on year(启用日期) tag qyrq Seek 1992 9. count to num for year(启用日期)1992 and 主要设备 10. use 考生.dbf List fields 姓名,语文+数学+外语 Calculate avg(语文),avg(数学)+avg(外语) 11. total to huizong.dbf on 部门 fields 价格