2013年9月計(jì)算機(jī)二級(jí)VF考試上機(jī)精選題及答案（19）

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

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

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

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

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

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

　　二、簡(jiǎn)單應(yīng)用(2小題，每題20分，計(jì)40分)

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

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

　　三、綜合應(yīng)用(1小題，計(jì)30分)

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

　　簡(jiǎn)單應(yīng)用題答案：

　　2、crea view view1 as sele xuesheng.學(xué)號(hào),姓名,英語(yǔ) from xuesheng,chengji where xuesheng.學(xué)號(hào)=chengji.學(xué)號(hào) and;

　　民族<>"漢" order by 英語(yǔ) desc,xuesheng.學(xué)號(hào)

　　sele * from view1 into table table2

　　綜合應(yīng)用題答案：

　　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 學(xué)號(hào) TAG 學(xué)號(hào)

　　SELECT 2

　　USE chengji

　　INDEX ON 學(xué)號(hào) TAG 學(xué)號(hào)

　　SET RELATION TO 學(xué)號(hào) INTO xuesheng

　　GO TOP

　　DO WHILE .NOT.EOF()

　　IF chengji.數(shù)學(xué)<60

　　INSERT INTO temp values (xuesheng.學(xué)號(hào),xuesheng.姓名,'數(shù)學(xué)',chengji.數(shù)學(xué))

　　ENDIF

　　IF chengji.英語(yǔ)<60

　　INSERT INTO temp values (xuesheng.學(xué)號(hào),xuesheng.姓名,'英語(yǔ)',chengji.英語(yǔ))

　　ENDIF

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

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

　　ENDIF

　　SKIP

　　ENDDO

　　SELECT * FROM temp ORDER BY 分?jǐn)?shù),學(xué)號(hào) DESC INTO ARRAY arr

　　INSERT INTO table3 FROM ARRAY arr

　　CLOSE ALL

　　DROP TABLE temp

　　SET TALK ON

　　RETURN