VF程序設(shè)計復(fù)習(xí)資料36頁

1、VF程序設(shè)計復(fù)習(xí)資料內(nèi)容：VF程序設(shè)計課后習(xí)題答案 歷年考試題(帶答案)使用說明：在資料中，所有答案均為直接在題目中給出，“&&”符號后的內(nèi)容為說明，“*”后的內(nèi)容，為建立的文件。課后題答案主要給出考試重點內(nèi)容。另外，請同學(xué)們上機實踐以增強記憶。Visual FoxPro程序設(shè)計教程課后題答案說明：僅重點部分設(shè)置答案第一章 數(shù)據(jù)庫系統(tǒng)基礎(chǔ)知識(P17)2.什么是數(shù)據(jù)庫、數(shù)據(jù)庫管理系統(tǒng)和數(shù)據(jù)庫系統(tǒng)?答:數(shù)據(jù)庫是在數(shù)據(jù)管理系統(tǒng)的集中控制下,按一定的組織方式儲存起來的、相互關(guān)聯(lián)的數(shù)據(jù)集合.數(shù)據(jù)庫(Datebase,DB)是數(shù)據(jù)庫系統(tǒng)中按一定法則儲存在外存儲器中的大批數(shù)據(jù).數(shù)據(jù)庫管理系

2、統(tǒng)(Datebase Management System,DBMS)是系統(tǒng)軟件,用來對數(shù)據(jù)進(jìn)行同意的的控制和管理,從而有效減少數(shù)據(jù)冗余,實現(xiàn)數(shù)據(jù)共享,解決數(shù)據(jù)獨立性問題,并提供統(tǒng)一的安全性和并發(fā)控制功能.數(shù)據(jù)庫系統(tǒng)其實就是數(shù)據(jù)庫應(yīng)用為基礎(chǔ)的計算機系統(tǒng),是把有關(guān)計算機硬件、軟件、數(shù)據(jù)和人員組合起來的擁護(hù)提供信息服務(wù)的系統(tǒng).5.實體之間的聯(lián)系有哪幾種,分別舉例說明.答:1對1聯(lián)系,例:一個人有一個身份證,一個身份證也只有一個人可以使用.1對多聯(lián)系,例:一個班主任可以帶很多學(xué)生,一個學(xué)生只能有一個班主任.多對多聯(lián)系,例:一個人可以去任何酒吧中的任意一個,任意一個酒吧可以為任意多的人提供娛樂場地.6.

3、數(shù)據(jù)庫有哪幾種常用的數(shù)據(jù)模型?Visual FoxPro屬于哪一類?答:層次模型,網(wǎng)絡(luò)模型,關(guān)系模型.Visual FoxPro屬于關(guān)系模型.8.關(guān)系數(shù)據(jù)庫管理系統(tǒng)的3種基本關(guān)系運算是什么?答:關(guān)系運算有3種方式:選擇、投影、聯(lián)接.第二章 操作基礎(chǔ)(P33)3.Visual FoxPro有幾種操作凡是?各有什么特點?答:菜單操作方式 特點:優(yōu)點是直觀易懂,擊鍵簡單(主要是鼠標(biāo)單、雙擊),對于不熟悉Visual FoxPro命令、又沒有或不想花時間去學(xué)習(xí)它的最終用戶十分適合.不足是操作環(huán)節(jié)多,步驟繁瑣,因此速度慢,效率低.命令操作方式 特點:輸入命令完成操作比使用菜單和對話框速度更快,效率高,系

4、統(tǒng)菜單不可能包含所有的功能,有些操作只能通過命令窗口輸入;必須熟練掌握Visual FoxPro命令,才能談的上開發(fā)應(yīng)用程序.程序工作方式 特點:為用戶提供更簡潔的界面,達(dá)到操作目的.第三章 數(shù)據(jù)及其運算(P55)2.字段變量與內(nèi)存變量有何區(qū)別?答:字段變量是隨表存取而存取,定義在表中的變量. 內(nèi)存變量是擁護(hù)在內(nèi)存中定義的,用來存放程序運行中的中間結(jié)果和最終結(jié)果的變量,是進(jìn)行數(shù)據(jù)的傳遞和運算的變量.4.求下列表達(dá)式的值.(1)LEN(DTOC(DATE()輸出結(jié)果:8(2)STUFF("現(xiàn)代教育中心",5,0,LEFT("技術(shù)中心",4)輸出結(jié)果:現(xiàn)代技

5、術(shù)教育中心(3)VARTYPE(08/23/03)輸出結(jié)果:N(4)SPCACE(5)-SPACE(5)輸出結(jié)果:空白(5)"PRO"$"FoxPro" AND "100">"90"輸出結(jié)果:.F.5.針對學(xué)生表,寫出下列條件:先制作學(xué)生表:學(xué)號姓名性別年齡是否少數(shù)民族出生日期入學(xué)成績001王*男20否1986/09/20560002李*女19否1987/06/30590003張*男20是1986/02/03610004趙*女22是1985/12/17620(1)入學(xué)成績大于600分的學(xué)生;LIST FOR

6、入學(xué)成績>600(2)年齡大于18歲但是小于25歲的學(xué)生; LIST FOR 年齡>18 AND 年齡<25(3)少數(shù)民族的男生 LIST FOR 是否少數(shù)民族="是" AND 性別="男"(4)在1985年1月1日至1983年12月31日之間出生的學(xué)生; LIST FOR YEAR(DATE()-YEAR(出生日期)>20 ANDYEAR(DATE()-YEAR(出生;日期)<23 &&以2007年為例(5)入學(xué)成績在580分以上的漢族女生. LIST FOR 入學(xué)成績>580 AND 是否少數(shù)民族=

7、"否" AND 性別="女"6.寫出下列表達(dá)式.(1)求實數(shù)x的小數(shù)部分;x=3.1415926535897932384626? x-INT(x)(2)求自然數(shù)m的十位數(shù)字;m=125 n=INT(m) x=STR(&n) ? RIGHT(&x,2)(3)將實數(shù)x保留兩位小數(shù),第三位小數(shù)進(jìn)行四舍五入處理; x=3.1415926535897932384626 ? ROUND(x*3,2)(4)將c中的小寫字母轉(zhuǎn)換成相應(yīng)的大寫字母;CH2="c"CH1=CHR(ASC(ch2)-ASC("a")-AS

8、C("A") ? CH1(5)判斷n是否偶數(shù). ? MOD(n,2),"如果結(jié)果為1,則n是奇數(shù),如果為0,則n是偶數(shù)"第四章 表的基本操作(P86)13.就學(xué)生表,寫出實現(xiàn)下列操作的命令.(1)顯示第5號記錄; USE STUDENTS.DBFGO 5DISPLAY(2)顯示第5號至10號之間的全部記錄; USE STUDENTS.DBFGO 5 LIST NEXT 6(3)連續(xù)列出1980年以后出生的學(xué)生的姓名與出生年月; USE STUDENTS.DBFLIST 姓名,出生年月 FOR YEAR(DATE()-YEAR(出生年月)<27&am

9、p;&以07年為當(dāng)前時間.(4)顯示在1985年1月1日至1983年12月31日之間出生的學(xué)生記錄; USE STUDENTS.DBF LIST 姓名,出生年月 FOR YEAR(DATE()-YEAR(出生年月)>22 AND; YEAR(DATE()-YEAR(出生年月)<24 &&以07年為當(dāng)前時間(5)在表的頂部增加一個新記錄 USE STUDENTS.DBF GO TOP INSERT BLANK BEFORE(6)修改最后一個記錄 USE STUDENTS.DBF GO BOTT BROW(7)將16歲以下的少數(shù)民族學(xué)生成績提高20分; USE

10、STUDENTS.DBF REPLACE ALL 入學(xué)成績 WITH 入學(xué)成績+20 FOR 是否少數(shù)民族="是" AND YEAR(DATE()-YEAR(出生年月)<16(8)將學(xué)生表原樣復(fù)制為xsda.dbf,并物理刪除xsda.dbf中記錄號為偶數(shù)的記錄; USE STUDENTS.DBF COPY TO xsda.dbfUSE xsda DELETE FOR MOD(RECNO(),2)=0 PACK(9)顯示入學(xué)成績前5名的記錄;USE STUDENTS.DBF SORT ON 入學(xué)成績/D TO CJ.dbf USE CJ.dbf LIST NEXT 5

11、(10)統(tǒng)計1985年出生學(xué)生的人數(shù),并把它存在變量number中; USE STUDENTS.DBF COUNT FOR YEAR(DATE()-YEAR(出生年月)=22 TO number(11)分別求男女學(xué)生的平均年齡; USE STUDENTS.DBF AVER YEAR(DATE()-YEAR(出生年月) FOR 性別="男" TO x AVER YEAR(DATE()-YEAR(出生年月) FOR 性別="女" TO y ? "男生的平均年齡為:"+STR(x,3)+"歲","女生的平均年齡

12、為:"+STR(y,3)+;"歲"(12)查找并顯示第一位少數(shù)民族學(xué)生; USE STUDENTS.DBF INDEX ON 少數(shù)民族否 TO sy1 FOR 少數(shù)民族否="是" GO 1 DISPLAY(13)建立一個結(jié)構(gòu)符合索引文件,其中包括兩個索引:記錄以學(xué)號降序排列;記錄按出生年月升序排列; USE STUDENTS.DBF INDEX ON -學(xué)號+出生年月 TAG sy2(14)查詢年齡最小和最大的學(xué)生; USE STUDENTS.DBF LIST FOR MIN(出生年月) LIST FOR MAX(出生年月)(15)按性別對入學(xué)

13、成績進(jìn)行匯總. USE STUDENTS.DBF INDEX ON 性別 TAG sy3 TOTAL ON 性別 TO HZ FIELDS 入學(xué)成績第六章SQL語言的應(yīng)用（P114）2利用第5章習(xí)題 中給出的訂貨管理數(shù)據(jù)庫和記錄實例，用SQL語句完成下列操作：(1)列出在北京的供應(yīng)商名稱;USE 供應(yīng)商.dbfLIST FOR 地址=”北京”(2)列出發(fā)給供應(yīng)商S6的訂購單號; USE 訂購單.dbf LIST 訂購單號 FOR 供應(yīng)商號=”S6”(3)列出職工E6發(fā)給供應(yīng)商S6的供應(yīng)商信息; USE 訂購單.dbf LIST 訂購單號,訂購日期 FOR 職工號=”E6” AND 供應(yīng)商號=”

14、S6”(4)列出向供應(yīng)商S3發(fā)過訂購單的職工的職工號和倉庫號; SELECT a.職工號,b.倉庫號 FROM 職工b,訂購單a WHERE ;a.職工號=b.職工號 AND b.供應(yīng)商號=”S3”(5)列出和職工E1、E3都有聯(lián)系的北京的供應(yīng)商信息; SELECT a.供應(yīng)商號,b.供應(yīng)商名,地址 FROM 訂購單a,供應(yīng)商b WHERE ;a.供應(yīng)商號=b.供應(yīng)商號 AND a.職工號=”E1”,a.職工號=”E3”(6)列出與工資在1220元以下的職工沒有聯(lián)系的供應(yīng)商的名稱; SELECT a.供應(yīng)商名 FROM 供應(yīng)商a,職工b,訂購單c WHERE ;b.職工號=c.職工號,c.供應(yīng)

15、商號=a.供應(yīng)商號 AND b.工資<1220(7)列出向供應(yīng)商S4發(fā)出訂購單的倉庫所在的城市; SELECT a.城市 FROM 倉庫a,職工b,訂購單c WHERE a.倉庫號=b.倉庫號,;b.職工號=c.職工號 AND c.供應(yīng)商號=”S4”(8)列出在上海工作并且向供應(yīng)商S6發(fā)出了訂購單的職工號; SELECT a.職工號 FROM 職工a,倉庫b,訂購單c WHERE a.倉庫號=b.倉庫號,;a.職工號=c.職工號 AND b.城市=”上?！?c.供應(yīng)商號=”S6”(9)列出由工資多于1230元的職工向北京的供應(yīng)商發(fā)出的訂購單號;SELECT a.訂購單號 FROM 訂購單

16、a,職工b,供應(yīng)商c WHERE ;a.職工號=b.職工號,a.供應(yīng)商號=c.供應(yīng)商號 AND b.工資>1230,;c.地址=”北京”(10)列出倉庫的個數(shù); SELECT 倉庫號,COUNT(倉庫號) FROM 倉庫.dbf(11)列出有最大面積的倉庫信息; SELECT a.倉庫號,城市,面積 FROM 倉庫a ORDER BY 面積 GO 1 DISPLAY(12)列出所有倉庫的平均面積; SELECT AVG(面積) AS “所有倉庫的平均面積” FROM 倉庫.dbf(13)列出每個倉庫中工資多于1220元的職工個數(shù);SELECT 職工號,COUNT(職工號) FROM 職工

17、.dbf GROUP BY 倉庫號 WHERE ;工資>1220(14)列出和面積最小的倉庫有聯(lián)系的供應(yīng)商的個數(shù);SELECT a.職工號,COUNT(a.供應(yīng)商號) FROM 訂購單a,職工b,倉庫c WHERE ;a.職工號=b.職工號,b.倉庫號=c.倉庫號 AND MIN(c.面積)(15)列出工資低于本倉庫平均工資的職工信息.SELECT a.職工號,b.倉庫號,城市,c.供應(yīng)商號,訂購單號,訂購日期 FROM ;職工a,倉庫b,訂購單c WHERE a.倉庫號=b.倉庫號,a.職工號=c.職工號 ; AND a.工資<AVG(a.工資)第九章 結(jié)構(gòu)化程序設(shè)計1.寫出下列

18、程序的執(zhí)行結(jié)果.(1)CLEAR SET TALK OFF x=10 y=-3 FOR n=29+x TO x STEP y ENDFOR ? n RETURN執(zhí)行結(jié)果:9(2)主程序:t1.prg SET TALK OFFSTORE ABTO k1,k2DO t2? k1+k2RETURN子程序t2.prgPRIVATE k1k1=k2+”250”? k1RETURN執(zhí)行結(jié)果:AB250 ABAB (3)SET TALK OFFCLEARSTORE 1 TO xSTORE 20 TO yDO WHILE x<=y IF INT(x/2)<>x/2 x=1+x2 y=y+1L

19、OOP ELSE x=x+1 ENDIFENDDO? x,ySET TALK ONRETURN執(zhí)行結(jié)果: 122.00 23 (4)主程序:z.prg SET TALK OFF STORE 2 TO x1,x2,x3 x1=x1+1 DO z1 ?x1+x2+x3 RETURN 子程序:z1.prg x2=x2+1 DO z2 x1=x1+1 RETURN 子程序:z2.prg x3=x3+1RETURN TO MASTER執(zhí)行結(jié)果: 9 (5)SET TALK OFFx=15y=7DO sub WITH x,(y)?x,yRETURNPROCECURE subPARAMETERS a,ba=

20、a+bb=a-bRETURN執(zhí)行結(jié)果: 22 7 (6)SET TALK OFFx=9y=13z=fu(x,y) ? z RETURN FUNCTION fu PARAMETERS a,b a=a*b RETURN(a)執(zhí)行結(jié)果: 117 3.輸入學(xué)生成績,若成績大雨80分,則輸出”優(yōu)良”,成績小于60分,則輸出”不及格”,否則輸出”中等”. 參考答案: * CJ.prg SET TALK OFF USE STUDENTS.dbfname=space(10) 10,5 SAY”請輸入學(xué)生姓名并查看其成績:” GET name READ LOCATE FOR 學(xué)生姓名=name IF .NOT.

21、EOF() DO CASE CASE 成績>=80 ? “該生成績?yōu)閮?yōu)秀” CASE 成績>=60 AND 成績<80 ? “該生成績?yōu)橹械取?OTHERWISE ? “該生成績?yōu)椴患案瘛?ENDCASE ELSE ? ”無此學(xué)生”ENDIFSET TALK ONRETURN4.在學(xué)生表中,分別統(tǒng)計漢族學(xué)生和少數(shù)民族學(xué)生的人數(shù). 參考答案: * TJ.prg CLEARSTORE 0 TO x,yUSE STUDENTS.dbfSCAN IF 少數(shù)民族否=”是” x=x+1 ELSE y=y+1 ENDIFENDSCAN? “少數(shù)民族的學(xué)生有”+STR(x,3)+”人”? “

22、漢族的學(xué)生有”+STR(y,3)+”人”USERETURN2003-2004學(xué)年第2學(xué)期期末考試試題（A卷）foxpro程序設(shè)計基礎(chǔ)試題使用班級：03級非計算機專業(yè)本科fox班總分得分一、單項選擇題（共20分）每小題2分1.FOXPRO是一種( C )數(shù)據(jù)庫管理系統(tǒng)。A)層次型B)網(wǎng)狀型C)關(guān)系型D)面向?qū)ο笮?.將數(shù)據(jù)庫文件的某一字段變量改名，以下命令正確的是（ D ）A）Modify B）UseC）Create D）Modify structure3. 在無索引的情況下打開數(shù)據(jù)庫文件，立即使用Display 命令，其功能是（A ）；A）顯示第一條記錄 B）顯示全部記錄 C）顯示最后一條記錄

23、 D）顯示從當(dāng)前記錄開始到表尾的所有記錄 4. 以下表達(dá)式的結(jié)果為數(shù)值型的是（ D ）；A)"牛"$ "牛群"B) "wish you" "success" C) 98/6/14+15 D) 98/06/14-98/11/125. 關(guān)于索引，下列說法正確的是（ B ）。A) 通過建立索引可以改變記錄在庫中的實際存儲順序 B) 可以對多個字段的表達(dá)式建立索引 C) 一個數(shù)據(jù)庫只能建立一個索引D) 建立索引以后，庫中的記錄就會按照索引規(guī)定的順序重新排列 6. 關(guān)于刪除記錄的說法，不正確的是（ B ）。A) 在BROWS

24、E窗口中，對于要刪除的記錄，可以單擊每個記錄左邊的框來標(biāo)記該記錄要被刪除B) 對于添加了刪除標(biāo)記的紀(jì)錄，它們?nèi)匀淮嬖谟诖疟P上，但是不能再恢復(fù)原來的狀態(tài)C) 為了避免錯誤刪除有用信息，foxpro把庫中刪除記錄的操作分為兩步：先對記錄作刪除標(biāo)記，然后再移去要刪除的記錄。D) 刪除當(dāng)前庫文件中所有記錄時，通常需要用戶進(jìn)一步確認(rèn)7.下述程序段的運行結(jié)果為（ C ）。 ch="abcdef"do while len(ch)>0 ? right(ch,2) ch=left(ch,len(ch)-2) enddoA) abcdef B) fedcba C) efcdab D) b

25、adcfe 8.設(shè)職工數(shù)據(jù)庫文件已經(jīng)打開，其中有工資字段，要把指針定位在第一個工資大于1000元的記錄上，應(yīng)使用命令（ C ）。A)FIND FOR 工資>1000 B)SEEK 工資>1000C)LOCATE FOR 工資>1000 D)FIND 工資>10009.以下程序段共執(zhí)行( D)次循環(huán)k=2.5DO WHILE k<=4 ? kk=k+0.5ENDDOA) 1 B) 2 C) 3 D) 410. 要為當(dāng)前表所有職工增加100元工資應(yīng)該使用( D )命令 。A) CHANGE 工資 WITH 工資+100B) REPLACE 工資 WITH 工資+100

26、C) CHANGE ALL 工資 WITH 工資+100D) REPLACE ALL 工資 WITH 工資+100得分二、填空題（共20分）每空2分1.計算機的中央處理器由運算器和 控制器 構(gòu)成。2.計算機網(wǎng)絡(luò)按通信距離來劃分,通常可分為_ _廣域 網(wǎng)和_ 局域_網(wǎng)。3.結(jié)構(gòu)化程序設(shè)計中的三種基本結(jié)構(gòu)單元是順序結(jié)構(gòu)、_選擇_結(jié)構(gòu)和_循環(huán)_結(jié)構(gòu) 。4.FoxPro系統(tǒng)的三種工作方式有_菜單操作方式_、_命令操作方式_和選單操作方式。5.十進(jìn)制數(shù)23，對應(yīng)的二進(jìn)制數(shù)是： 10110 。十六進(jìn)制數(shù)F6對應(yīng)的十進(jìn)制數(shù)是： 262 。6.foxpro庫文件的備注信息集中存放在一個與庫文件同名但擴展名為：

27、 .dct 的備注文件中。7.表達(dá)式"ab">"bb"OR"ac"<"ad" 的運算結(jié)果為： .T. 。8.執(zhí)行命令： ？AT（"成績","平時成績"）顯示的結(jié)果是_ 5 _。9.能隨著庫文件的打開而自動打開的索引為： 結(jié)構(gòu)復(fù)合索引文件 。10.按照不同庫文件的兩個字段表達(dá)式值相等來關(guān)聯(lián)的原則，父文件多條記錄對應(yīng)子文件中一條記錄的關(guān)聯(lián)稱為 多對一 關(guān)系，父文件一條記錄對應(yīng)子文件中多條記錄的關(guān)聯(lián)稱為 一對多 關(guān)系。得分三、程序理解題（共20分）1讀程序，寫出運行結(jié)果

28、（8分）主程序main.prg 子程序 proc.prgpublic m public nset talk off private xm=1 m=m+1x=5 n=2y=2 x=3do proc y=4?"main中:",m,n,x,y ?"proc中: ",m,n,x,yset talk on returnreturn 運行結(jié)果為：proc中: 2 2 3 4 main中: 2 2 5 4 2程序填空（每空2分，共12分）（1）*本程序用來求組合modify command cmnset talk offinput "輸入m" to

29、 minput "輸入n" to nc= jc(m)/ (jc(n)* jc(m-n) ) ?cset talk onreturnfunction jc PARAMETER jcn f=1 for k=1 to jcn _f=f*k_endfor returnf（2）*本程序用來統(tǒng)計學(xué)生數(shù)據(jù)庫stud.dbf中成績score大于80分的學(xué)生人數(shù)SET TALK OFFCLEARSELECT 0 USE stud.dbf S= 0DO WHILE .NOT.EOF() IF SCORE >=80S=S+1ENDIF CONTINUE ENDDOUSE?"成績大

30、于等于80分的學(xué)生共有"+STR(S)+"人"USESET TALK ON得分四、編程題（每小題10分，共20分）1. （10分）輸入一個數(shù)，判斷它能否被3，5整除，并輸出一下信息之一：（1） 能同時被3，5整除；（2） 只能被3整除;（3） 只能被5整除;（4） 既不能被3整除也不被5整除參考答案:*1.prgCLEARINPUT 請輸入數(shù): TO num1IF num1<>0DO CASE CASE MOD(num1,15)=0 ? "該數(shù)能同時被3和5整除" CASE MOD(num1,3)=0 AND MOD(num1,5)

31、<>0 ? "該數(shù)只能被3整除" CASE MOD(num1,5)=0 AND MOD(num1,3)<>0 ? "該數(shù)只能被5整除" OTHERWISE ?"該數(shù)既不能被3整除也不能被5整除"ENDCASEENDIF 2. (10分)編程序求100到1000之間的所有奇數(shù)之和。參考答案:* 求和.prgSET TALK OFFSTORE 100 TO xSTORE 0 TO yDO WHILE .T.x=x+1DO CASE CASE INT(x/2)=x/2LOOPCASE x>=1000EXITOT

32、HERWISEy=y+xENDCASEENDDO? "100到1000之間的奇數(shù)和為:",ySET TALK ONRETURN&&執(zhí)行結(jié)果為: 100到1000之間的奇數(shù)和為:247500得分五、應(yīng)用題（20分）數(shù)據(jù)庫文件ZGMC.DBF，包含6個字段，分別為SNO（編號）、SNAME（姓名）、SSEX（性別）、ZC（職稱）、GZ（工資）、CSRQ（出生日期）。如下二維表所示： SNOSNAMESSEXZCGZCSRQ9201宋玲剛.F.技術(shù)員801.5078/07/119205郭小勇.T.工程師1133.0070/12/159215王佳鵬.F.高工1560

33、.5065/09/239208張一凡.T.工人1015.0060/08/089206李春媛.F.工程師1008.0073/01/01根據(jù)下列要求寫出命令或程序：1） 顯示第2條記錄（2分）參考答案:USE ZGMC.DBFGO 2DISP2）顯示工資高于1000元全部女職工的姓名、職稱與出生日期（2分）參考答案:LIST SNAME,ZC,CSRQ FOR GZ>=1000 AND SSEX=.F.3)在第1條記錄前插入新記錄9209 李玉 .F. 技術(shù)員 1003.80 73/05/30并顯示結(jié)果；（3分）參考答案: GO 1 INSERT BLANK BEFORE REPLACE S

34、NO WITH "9209" UPDATE ZGMC SET SNAME="李玉",SSEX=.F.,ZC="技術(shù)員",GZ=1003.80; CSQR=1973/05/30 WHERE SNO="9209" LIST4)刪除1965年以前出生的職稱為工人的記錄，并顯示結(jié)果；（2分）參考答案:DELETE FOR YEAR(DATE()-YEAR(CSRQ)>42 &&以07年為當(dāng)前時間進(jìn)行計算 PACK LIST5)統(tǒng)計工程師的平均工資，并顯示統(tǒng)計結(jié)果；（2分）參考答案:CALCULATE

35、AVG(GZ) TO x ? x6)將1970年1月1日及以后出生的工程師復(fù)制為庫文件gcs.dbf (2分)參考答案: COPY TO gcs.dbf FOR YEAR(DATE()-YEAR(CSRQ)>37 &&以07年為當(dāng);前時間進(jìn)行計算 7）對所有工資超過1000元的男職工按出生日期降序排序，并要求新文件中只包含編號、姓名、性別、工資字段；（2分）參考答案: SORT ON CSRQ/D TO new FIELDS SNO,SNAME,SSEX,GZ FOR GZ>10008）為ZGMC.DBF建立索引文件，記錄以職稱降序排序，職稱相同時按出生日期降序排列

36、（3分）參考答案: INDEX ON -ZC-CSRQ TAG sy1 9）按索引查詢方式查詢1970年出生的女職工（2分）參考答案: SET EXACT OFF &&關(guān)閉精確查詢,進(jìn)行模糊查找INDEX ON CSRQ TAG sy2D=1970-*-*SEEK DDISPSKIP2003-2004學(xué)年第2學(xué)期期末考試試題（B卷）foxpro程序設(shè)計基礎(chǔ)試題使用班級：03級非計算機專業(yè)本科fox班總分得分一、單項選擇題（共20分）每小題2分1FOXPRO是一種(C )數(shù)據(jù)庫管理系統(tǒng)。A. 層次型B .網(wǎng)狀型C .關(guān)系型D. 面向?qū)ο笮?在學(xué)生基本情況表STU.DBF中，&qu

37、ot;性別"字段為邏輯型，用.T.代表女同學(xué)。為了找到第一位姓李的男同學(xué)，以下命令正確的是（ C ）；      ASeek 李and 性別      BFind 李.and. 男同學(xué)     C. Locate for 李 $ 姓名and not 性別     D. Locate for 李$ 姓名.and. 男同學(xué)3. 對已經(jīng)打開的學(xué)生成績表文件STUCDBF先按字符型字段"性別"升

38、序索引，再按數(shù)值型字段"總分"的降序索引，應(yīng)當(dāng)使用的命令是（ B ）AINDEX ON 性別+總分BINDEX ON 性別-總分CINDEX ON 性別+STR(-總分，3)DINDEX ON 性別+STR(100-總分)4以下表達(dá)式的結(jié)果為數(shù)值型的是（ D ）；A."牛"$ "牛群"B. "wish you" "success" C. 98/6/14+15 D. 98/06/14-98/11/125. 在語句ACCEPT "姓名: " TO XM中，XM的類型應(yīng)該是（ C

39、）；      A. 邏輯內(nèi)存變量           B. 數(shù)值型字段變量      C. 字符型字段變量         D. 字符型內(nèi)存變量6. 下面關(guān)于FoxPro數(shù)組的敘述中，錯誤的是 （ ）A. 用DIMENSION和DECLARE都可以定義數(shù)組B. FoxPro只支持一維數(shù)組和二維數(shù)組

40、C. 一個數(shù)組中各個數(shù)組元素必須是同一種數(shù)據(jù)類型D. 新定義數(shù)組的各個數(shù)組元素初值為.F.7. 只顯示當(dāng)前記錄的命令是_C_。A. LISTB. LIST ALLC. DISPLAYD. DISPLAY ALL8. 有如下命令序列X=1Y=2Z=3?Z=X+Y執(zhí)行最后一條命令后，顯示的結(jié)果應(yīng)該是_A_。A. .T. B. .F.C. 3D. X+Y9. 設(shè)有數(shù)據(jù)庫FILE.DBF，執(zhí)行如下命令序列SET DELETED OFFUSE FILELISTRecoed# 商品名金額1 洗衣機3100.002 電冰箱2300.003 21彩電1800.004 空調(diào)機4100.00GO 3DELETEG

41、O BOTTOMINSERT BLANKREPLACE 商品名WITH "34寸彩電", 金額WITH 6000SUM金額TO S當(dāng)前S的值應(yīng)該是_B_。A. 11300B. 17300C. 11400D. 1550010. 在FoxBASE中,命令X=Y=3的功能是_D_。A. 判斷Y是否等于3,并將判斷結(jié)果保存到X中B. 判斷X是否等于Y,如果等,將3賦值給Y,否則Y保持原來的值不變C. 判斷X和Y是否都等于3D. 將3賦值給Y,然后再賦值給X,使X和Y的值都為3得分二、填空題（共20分）每空2分1. 數(shù)據(jù)庫的英文縮寫為 DB ，數(shù)據(jù)庫系統(tǒng)的英文縮寫為 DBS ，數(shù)據(jù)庫

42、管理的系統(tǒng)英文縮寫為 DBMS 。2. 數(shù)據(jù)庫有三種類型分別為 層次型 、 網(wǎng)狀型 、 關(guān)系型 。3. 表達(dá)式"103">"7"的值為 .F. ，"abc"+"abc"的值為 abcabc 。4. 命令？TYPE("12/27/95")的輸出值是_ N _。5. 在數(shù)據(jù)庫文件中，要在某記錄打上刪除標(biāo)記，應(yīng)使用命令_DELETE _。6. 在數(shù)據(jù)表中，用于存放圖像、聲音等多媒體對象的數(shù)據(jù)類型是。7. 程序設(shè)計的三種基本結(jié)構(gòu)是 順序結(jié)構(gòu) 、 選擇結(jié)構(gòu) 、 循環(huán)結(jié)構(gòu) 。8. 執(zhí)行以下命令序列m=

43、len("119")?m=m+1 的顯示結(jié)果是 .F. 。9. 在Foxpro 系統(tǒng)中有兩條語句可以改變循環(huán)體的執(zhí)行控制, 在DO WHILE 循環(huán)體內(nèi), 語句 LOOP 使控制轉(zhuǎn)移到循環(huán)的開始, 語句EXIT使控制轉(zhuǎn)移到循環(huán)體外, 跳轉(zhuǎn)到該循環(huán)結(jié)構(gòu)后的第一個可執(zhí)行語句。10. 表達(dá)式"ST"$"STRING"和表達(dá)式"SR"$"STRING"的值分別是 .T. 、 .F. 。得分三、程序理解題（共20分）1讀程序，寫出運行結(jié)果（8分）clear i=1 stra="" do

44、 while i<=5 stra=stra+"*" i=i+1 enddo ?stra strb= "Wish you success!" stra=stra+strb ?strb ?stra return 運行結(jié)果為：* Wish you success! *Wish you success! 2程序填空（每空2分，共12分）（1）下面程序的功能是完成查詢，系統(tǒng)要求用戶輸入書名，然后從圖書管理表（TSB.DBF）中查詢給定書目的信息，要求：若用戶沒有輸入書名，系統(tǒng)要求用戶重新輸入，用戶輸入字符串"000"，則結(jié)束查詢。 USE

45、 TSB DO WHILE .T. ACCEPT "請輸入書名：" TO SM IF LEN(ALLTRIM(SM)=0LOOP ENDIF IF ALLTRIM(SM)="000"EXIT ENDIF LOCATE ALL FOR 書名ALLTRIM(SM) IF FOUND() DO WHILE .NOT. EOF() DISPLAYSKIP ENDDO ELSE ? "查無此書" ENDIF ENDDO RETURN（2）輸入10個分?jǐn)?shù)（0-100以內(nèi)）的值，輸出其所屬等級(>90:優(yōu),80-90：良,70-80：中,60-70：及,<60：不及