三、

　　一、建立表文件

　　CREATE TABLE table3(學號 C(10), 姓名 C(6), 課程名 C(8), 分數(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 學號 tag 學號

　　select 0

　　use chengji

　　set relation to 學號 into xuesheng

　　go top

　　do while .not.eof()

　　if 數(shù)學<60

　　select ttt

　　append blank

　　replace 學號 with xuesheng.學號,姓名 with xuesheng.姓名

　　replace 課程名 with "數(shù)學",分數(shù) with chengji.數(shù)學

　　select chengji

　　endif

　　if 英語<60

　　select ttt

　　append blank

　　replace 學號 with xuesheng.學號,姓名 with xuesheng.姓名

　　replace 課程名 with "英語",分數(shù) with chengji.英語

　　select chengji

　　endif

　　if 信息技術(shù)<60

　　select ttt

　　append blank

　　replace 學號 with xuesheng.學號,姓名 with xuesheng.姓名

　　replace 課程名 with "信息技術(shù)",分數(shù) with chengji.信息技術(shù)

　　select chengji

　　endif

　　skip

　　enddo

　　select ttt

　　sort on 分數(shù),學號/d to ttt1

　　select table3

　　append from ttt1

　　close all

　　2002-2010計算機等級考試二級VFP歷年真題匯總

　　2011年計算機等級考試二級VFP基礎教程匯總

　　計算機等級考試二級VF三套全真預測試題及答案

　　計算機等級考試二級VFP上機試題及答案匯總