计算机二级VFP上机考试命令速记：综合篇(2)

　　&&prog1-table3

　　use table3

　　delete all

　　pack

　　copy structure to tmp

　　close all

　　select 1

　　use xuesheng

　　index on 学号 tag xuehao

　　select 2

　　use chengji

　　index on 学号 tag xuehao

　　set relation to 学号 into a

　　go top

　　do while not eof()

　　if 数学<60

　　insert into tmp values(a.学号,a.姓名,"数学",b.数学)

　　endif

　　if 英语<60

　　insert into tmp values(a.学号,a.姓名,"英语",b.英语)

　　endif

　　if 信息技术<60

　　insert into tmp values(a.学号,a.姓名,"信息技术",b.信息技术)

　　endif

　　skip

　　enddo

　　select * from tmp order by 分数,学号 desc into array arr

　　insert into table3 from array arr

　　&&ptwo.prg 5个空

　　&&语句1

　　SET RELATION TO 商品号 INTO goods_t

　　&&语句2

　　SET RELATION TO 订单号 INTO orderitems

　　&&语句3

　　if 数量>goods_t.库存量

　　&&语句4

　　skip -n

　　&&语句5

　　库存量=库存量-orderitems.数量

　　&&菜单-考试-统计代码

　　SELECT year(签订日期) as 年份, month(签订日期) as 月份,;

　　sum(金额) as 合计;

　　FROM employee INNER JOIN orders ;

　　ON Employee.职员号 = Orders.职员号;

　　GROUP BY 1, 2;

　　ORDER BY 1 DESC, 2;

　　INTO TABLE tabletwo.dbf

　　2011年计算机等级考试二级VFP基础教程汇总

　　2011年全国计算机等级考试二级VFP考点汇总

　　计算机等级考试二级VF八套全真预测试题及答案

　　计算机等级考试二级VFP上机操作常见错误总结