三、

　　一、建立表文件

　　CREATE TABLE table3(學(xué)號(hào) C(10), 姓名 C(6), 課程名 C(8), 分?jǐn)?shù) N(5,1))

　　二、在prog1.prg文件中編寫如下程序：

　　clear

　　close all

　　select 0

　　use table3

　　dele all

　　pack

　　copy to ttt

　　select 0

　　use ttt

　　select 0

　　use xuesheng

　　index on 學(xué)號(hào) tag 學(xué)號(hào)

　　select 0

　　use chengji

　　set relation to 學(xué)號(hào) into xuesheng

　　go top

　　do while .not.eof()

　　if 數(shù)學(xué)<60

　　select ttt

　　append blank

　　replace 學(xué)號(hào) with xuesheng.學(xué)號(hào),姓名 with xuesheng.姓名

　　replace 課程名 with "數(shù)學(xué)",分?jǐn)?shù) with chengji.數(shù)學(xué)

　　select chengji

　　endif

　　if 英語(yǔ)<60

　　select ttt

　　append blank

　　replace 學(xué)號(hào) with xuesheng.學(xué)號(hào),姓名 with xuesheng.姓名

　　replace 課程名 with "英語(yǔ)",分?jǐn)?shù) with chengji.英語(yǔ)

　　select chengji

　　endif

　　if 信息技術(shù)<60

　　select ttt

　　append blank

　　replace 學(xué)號(hào) with xuesheng.學(xué)號(hào),姓名 with xuesheng.姓名

　　replace 課程名 with "信息技術(shù)",分?jǐn)?shù) with chengji.信息技術(shù)

　　select chengji

　　endif

　　skip

　　enddo

　　select ttt

　　sort on 分?jǐn)?shù),學(xué)號(hào)/d to ttt1

　　select table3

　　append from ttt1

　　close all

　　2002-2010計(jì)算機(jī)等級(jí)考試二級(jí)VFP歷年真題匯總

　　2011年計(jì)算機(jī)等級(jí)考試二級(jí)VFP基礎(chǔ)教程匯總

　　計(jì)算機(jī)等級(jí)考試二級(jí)VF三套全真預(yù)測(cè)試題及答案

　　計(jì)算機(jī)等級(jí)考試二級(jí)VFP上機(jī)試題及答案匯總