2013年9月計算機二級VF考試上機精選題及答案（19）

　　一、基本操作題(共4小題，第1和2題是7分、第3和4題是8分)

　　在考生文件夾下有一表單文件myform.scx。打開該表單文件，然后在表單設計器環(huán)境下完成如下操作：

　　1. 在屬性窗口中設置表單的有關(guān)屬性，使表單在打開時在VFP主窗口內(nèi)居中顯示。

　　2. 在屬性窗口中設置表單的有關(guān)屬性，使表單內(nèi)的Center、East、South、West和North五個按鈕的大小都設置為寬60、高25。

　　3. 將West、Center和East三個按鈕設置為頂邊對齊，頂邊距離是100;將North、Center和South三個按鈕設置為左邊對齊，左邊距離是200。

　　4. 按Center、East、South、West、North的順序設置各按鈕的Tab鍵次序。

　　二、簡單應用(2小題，每題20分，計40分)

　　1. 利用查詢設計器創(chuàng)建查詢，從考生目錄下的xuesheng表和chengji表中查詢數(shù)學、英語和信息技術(shù)三門課中至少有一門課在90分以上(含90分)的學生記錄。查詢結(jié)果包含學號、姓名、數(shù)學、英語和信息技術(shù)5個字段;各記錄按學號降序排序;查詢?nèi)ハ驗楸韙able1。最后將查詢保存在query1.qpr文件中，并運行該查詢。

　　2. 首先創(chuàng)建數(shù)據(jù)庫cj_m，并向其中添加xuesheng表和chengji表。然后在數(shù)據(jù)庫中創(chuàng)建視圖view1：利用該視圖只能查詢少數(shù)民族學生的英語成績;查詢結(jié)果包含學號、姓名、英語3個字段;各記錄按英語成績降序排序，若英語成績相同按學號升序排序。最后利用剛創(chuàng)建的視圖view1查詢視圖中的全部信息，并將查詢結(jié)果存放在表table2中。

　　三、綜合應用(1小題，計30分)

　　利用表設計器在考生目錄下建立表table3，表結(jié)構(gòu)如下：學號 字符型(10); 姓名 字符型(6);課程名 字符型(8);分數(shù) 數(shù)值型(5,1)。然后編寫程序prog1.prg，從xuesheng表和chengji表中找出所有成績不及格(分數(shù)小于60)的學生信息(學號、姓名、課程名和分數(shù))，并把這些數(shù)據(jù)保存到表table3中(若一個學生有多門課程不及格，在表table3中就會有多條記錄)。表table3中的各記錄應該按分數(shù)升序排序，分數(shù)相同則按學號降序排序。要求在程序中用SET RELATION命令建立chengji表和xuesheng表之間的關(guān)聯(lián)(同時用INDEX命令建立相關(guān)的索引)，并通過DO WHILE循環(huán)語句實現(xiàn)規(guī)定的功能。最后運行程序。

　　簡單應用題答案：

　　2、crea view view1 as sele xuesheng.學號,姓名,英語 from xuesheng,chengji where xuesheng.學號=chengji.學號 and;

　　民族<>"漢" order by 英語 desc,xuesheng.學號

　　sele * from view1 into table table2

　　綜合應用題答案：

　　SET TALK OFF

　　SET SAFE OFF

　　CLOS ALL

　　USE TABLE3

　　ZAP

　　SELECT * FROM table3 WHERE .f. INTO TABLE temp

　　SELECT 1

　　USE xuesheng

　　INDEX ON 學號 TAG 學號

　　SELECT 2

　　USE chengji

　　INDEX ON 學號 TAG 學號

　　SET RELATION TO 學號 INTO xuesheng

　　GO TOP

　　DO WHILE .NOT.EOF()

　　IF chengji.數(shù)學<60

　　INSERT INTO temp values (xuesheng.學號,xuesheng.姓名,'數(shù)學',chengji.數(shù)學)

　　ENDIF

　　IF chengji.英語<60

　　INSERT INTO temp values (xuesheng.學號,xuesheng.姓名,'英語',chengji.英語)

　　ENDIF

　　IF chengji.信息技術(shù)<60

　　INSERT INTO temp values (xuesheng.學號,xuesheng.姓名,'信息技術(shù)',chengji.信息技術(shù))

　　ENDIF

　　SKIP

　　ENDDO

　　SELECT * FROM temp ORDER BY 分數(shù),學號 DESC INTO ARRAY arr

　　INSERT INTO table3 FROM ARRAY arr

　　CLOSE ALL

　　DROP TABLE temp

　　SET TALK ON

　　RETURN