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

VF程序設(shè)計(jì)復(fù)習(xí)資料內(nèi)容：VF程序設(shè)計(jì)課后習(xí)題答案歷年考試題(帶答案)使用說(shuō)明：在資料中，所有答案均為直接在題目中給出，“&&”符號(hào)后的內(nèi)容為說(shuō)明，“*”后的內(nèi)容，為建立的文件。課后題答案主要給出考試重點(diǎn)內(nèi)容。另外，請(qǐng)同學(xué)們上機(jī)實(shí)踐以增強(qiáng)記憶。VisualFoxPro程序設(shè)計(jì)教程課后題答案說(shuō)明：僅重點(diǎn)部分設(shè)置答案第一章數(shù)據(jù)庫(kù)系統(tǒng)基礎(chǔ)知識(shí)(P17)2.什么是數(shù)據(jù)庫(kù)、數(shù)據(jù)庫(kù)管理系統(tǒng)和數(shù)據(jù)庫(kù)系統(tǒng)?答:①數(shù)據(jù)庫(kù)是在數(shù)據(jù)管理系統(tǒng)的集中控制下,按一定的組織方式儲(chǔ)存起來(lái)的、相互關(guān)聯(lián)的數(shù)據(jù)集合.數(shù)據(jù)庫(kù)(Datebase,DB)是數(shù)據(jù)庫(kù)系統(tǒng)中按一定法則儲(chǔ)存在外存儲(chǔ)器中的大批數(shù)據(jù).②數(shù)據(jù)庫(kù)管理系統(tǒng)(DatebaseManagementSystem,DBMS)是系統(tǒng)軟件,用來(lái)對(duì)數(shù)據(jù)進(jìn)行同意的的控制和管理,從而有效減少數(shù)據(jù)冗余,實(shí)現(xiàn)數(shù)據(jù)共享,解決數(shù)據(jù)獨(dú)立性問(wèn)題,并提供統(tǒng)一的安全性和并發(fā)控制功能.③數(shù)據(jù)庫(kù)系統(tǒng)其實(shí)就是數(shù)據(jù)庫(kù)應(yīng)用為基礎(chǔ)的計(jì)算機(jī)系統(tǒng),是把有關(guān)計(jì)算機(jī)硬件、軟件、數(shù)據(jù)和人員組合起來(lái)的擁護(hù)提供信息服務(wù)的系統(tǒng).5.實(shí)體之間的聯(lián)系有哪幾種,分別舉例說(shuō)明.答:①1對(duì)1聯(lián)系,例:一個(gè)人有一個(gè)身份證,一個(gè)身份證也只有一個(gè)人可以使用.②1對(duì)多聯(lián)系,例:一個(gè)班主任可以帶很多學(xué)生,一個(gè)學(xué)生只能有一個(gè)班主任.③多對(duì)多聯(lián)系,例:一個(gè)人可以去任何酒吧中的任意一個(gè),任意一個(gè)酒吧可以為任意多的人提供娛樂(lè)場(chǎng)地.6.數(shù)據(jù)庫(kù)有哪幾種常用的數(shù)據(jù)模型?VisualFoxPro屬于哪一類(lèi)?答:①層次模型,網(wǎng)絡(luò)模型,關(guān)系模型.②VisualFoxPro屬于關(guān)系模型.8.關(guān)系數(shù)據(jù)庫(kù)管理系統(tǒng)的3種基本關(guān)系運(yùn)算是什么?答:關(guān)系運(yùn)算有3種方式:選擇、投影、聯(lián)接.第二章操作基礎(chǔ)(P33)3.VisualFoxPro有幾種操作凡是?各有什么特點(diǎn)?答:①菜單操作方式特點(diǎn):優(yōu)點(diǎn)是直觀(guān)易懂,擊鍵簡(jiǎn)單(主要是鼠標(biāo)單、雙擊),對(duì)于不熟悉VisualFoxPro命令、又沒(méi)有或不想花時(shí)間去學(xué)習(xí)它的最終用戶(hù)十分適合.不足是操作環(huán)節(jié)多,步驟繁瑣,因此速度慢,效率低.②命令操作方式特點(diǎn):輸入命令完成操作比使用菜單和對(duì)話(huà)框速度更快,效率高,系統(tǒng)菜單不可能包含所有的功能,有些操作只能通過(guò)命令窗口輸入;必須熟練掌握VisualFoxPro命令,才能談的上開(kāi)發(fā)應(yīng)用程序.③程序工作方式特點(diǎn):為用戶(hù)提供更簡(jiǎn)潔的界面,達(dá)到操作目的.第三章數(shù)據(jù)及其運(yùn)算(P55)2.字段變量與內(nèi)存變量有何區(qū)別?答:字段變量是隨表存取而存取,定義在表中的變量.內(nèi)存變量是擁護(hù)在內(nèi)存中定義的,用來(lái)存放程序運(yùn)行中的中間結(jié)果和最終結(jié)果的變量,是進(jìn)行數(shù)據(jù)的傳遞和運(yùn)算的變量.4.求下列表達(dá)式的值.(1)LEN(DTOC(DATE()))輸出結(jié)果:8(2)STUFF("現(xiàn)代教育中心",5,0,LEFT("技術(shù)中心",4))輸出結(jié)果:現(xiàn)代技術(shù)教育中心(3)VARTYPE(08/23/03)輸出結(jié)果:N(4)SPCACE(5)-SPACE(5)輸出結(jié)果:空白(5)"PRO"$"FoxPro"AND"100">"90"輸出結(jié)果:.F.5.針對(duì)學(xué)生表,寫(xiě)出下列條件:先制作學(xué)生表:學(xué)號(hào)姓名性別年齡是否少數(shù)民族出生日期入學(xué)成績(jī)001王**男20否1986/09/20560002李**女19否1987/06/30590003張**男20是1986/02/03610004趙**女22是1985/12/17620…(1)入學(xué)成績(jī)大于600分的學(xué)生;LISTFOR入學(xué)成績(jī)>600(2)年齡大于18歲但是小于25歲的學(xué)生;LISTFOR年齡>18AND年齡<25(3)少數(shù)民族的男生LISTFOR是否少數(shù)民族="是"AND性別="男"(4)在1985年1月1日至1983年12月31日之間出生的學(xué)生;LISTFORYEAR(DATE())-YEAR(出生日期)>20ANDYEAR(DATE())-YEAR(出生;日期)<23&&以2007年為例(5)入學(xué)成績(jī)?cè)?80分以上的漢族女生.LISTFOR入學(xué)成績(jī)>580AND是否少數(shù)民族="否"AND性別="女"6.寫(xiě)出下列表達(dá)式.(1)求實(shí)數(shù)x的小數(shù)部分;x=3.1415926535897932384626?x-INT(x)(2)求自然數(shù)m的十位數(shù)字;m=125n=INT(m)x=STR(&n)?RIGHT(&x,2)(3)將實(shí)數(shù)x保留兩位小數(shù),第三位小數(shù)進(jìn)行四舍五入處理;x=3.1415926535897932384626?ROUND(x*3,2)(4)將c中的小寫(xiě)字母轉(zhuǎn)換成相應(yīng)的大寫(xiě)字母;CH2="c"CH1=CHR(ASC(ch2)-ASC("a")-ASC("A"))?CH1(5)判斷n是否偶數(shù).?MOD(n,2),"如果結(jié)果為1,則n是奇數(shù),如果為0,則n是偶數(shù)"第四章表的基本操作(P86)13.就學(xué)生表,寫(xiě)出實(shí)現(xiàn)下列操作的命令.(1)顯示第5號(hào)記錄;USESTUDENTS.DBFGO5DISPLAY(2)顯示第5號(hào)至10號(hào)之間的全部記錄;USESTUDENTS.DBFGO5LISTNEXT6(3)連續(xù)列出1980年以后出生的學(xué)生的姓名與出生年月;USESTUDENTS.DBFLIST姓名,出生年月FORYEAR(DATE()-YEAR(出生年月))<27&&以07年為當(dāng)前時(shí)間.(4)顯示在1985年1月1日至1983年12月31日之間出生的學(xué)生記錄;USESTUDENTS.DBFLIST姓名,出生年月FORYEAR(DATE())-YEAR(出生年月)>22AND;YEAR(DATE())-YEAR(出生年月)<24&&以07年為當(dāng)前時(shí)間(5)在表的頂部增加一個(gè)新記錄USESTUDENTS.DBFGOTOPINSERTBLANKBEFORE(6)修改最后一個(gè)記錄USESTUDENTS.DBFGOBOTTBROW(7)將16歲以下的少數(shù)民族學(xué)生成績(jī)提高20分;USESTUDENTS.DBFREPLACEALL入學(xué)成績(jī)WITH入學(xué)成績(jī)+20FOR是否少數(shù)民族="是"ANDYEAR(DATE())-YEAR(出生年月)<16(8)將學(xué)生表原樣復(fù)制為xsda.dbf,并物理刪除xsda.dbf中記錄號(hào)為偶數(shù)的記錄;USESTUDENTS.DBFCOPYTOxsda.dbfUSExsdaDELETEFORMOD(RECNO(),2)=0PACK(9)顯示入學(xué)成績(jī)前5名的記錄;USESTUDENTS.DBFSORTON入學(xué)成績(jī)/DTOCJ.dbfUSECJ.dbfLISTNEXT5(10)統(tǒng)計(jì)1985年出生學(xué)生的人數(shù),并把它存在變量number中;USESTUDENTS.DBFCOUNTFORYEAR(DATE())-YEAR(出生年月)=22TOnumber(11)分別求男女學(xué)生的平均年齡;USESTUDENTS.DBFAVERYEAR(DATE())-YEAR(出生年月)FOR性別="男"TOxAVERYEAR(DATE())-YEAR(出生年月)FOR性別="女"TOy?"男生的平均年齡為:"+STR(x,3)+"歲","女生的平均年齡為:"+STR(y,3)+;"歲"(12)查找并顯示第一位少數(shù)民族學(xué)生;USESTUDENTS.DBFINDEXON少數(shù)民族否TOsy1FOR少數(shù)民族否="是"GO1DISPLAY(13)建立一個(gè)結(jié)構(gòu)符合索引文件,其中包括兩個(gè)索引:記錄以學(xué)號(hào)降序排列;記錄按出生年月升序排列;USESTUDENTS.DBFINDEXON-學(xué)號(hào)+出生年月TAGsy2(14)查詢(xún)年齡最小和最大的學(xué)生;USESTUDENTS.DBFLISTFORMIN(出生年月)LISTFORMAX(出生年月)(15)按性別對(duì)入學(xué)成績(jī)進(jìn)行匯總.USESTUDENTS.DBFINDEXON性別TAGsy3TOTALON性別TOHZFIELDS入學(xué)成績(jī)第六章SQL語(yǔ)言的應(yīng)用（P114）2．利用第5章習(xí)題中給出的訂貨管理數(shù)據(jù)庫(kù)和記錄實(shí)例，用SQL語(yǔ)句完成下列操作：(1)列出在北京的供應(yīng)商名稱(chēng);USE供應(yīng)商.dbfLISTFOR地址=”北京”(2)列出發(fā)給供應(yīng)商S6的訂購(gòu)單號(hào);USE訂購(gòu)單.dbfLIST訂購(gòu)單號(hào)FOR供應(yīng)商號(hào)=”S6(3)列出職工E6發(fā)給供應(yīng)商S6的供應(yīng)商信息;USE訂購(gòu)單.dbfLIST訂購(gòu)單號(hào),訂購(gòu)日期FOR職工號(hào)=”E6”AND供應(yīng)商號(hào)=”S(4)列出向供應(yīng)商S3發(fā)過(guò)訂購(gòu)單的職工的職工號(hào)和倉(cāng)庫(kù)號(hào);SELECTa.職工號(hào),b.倉(cāng)庫(kù)號(hào)FROM職工b,訂購(gòu)單aWHERE;a.職工號(hào)=b.職工號(hào)ANDb.供應(yīng)商號(hào)=”S3(5)列出和職工E1、E3都有聯(lián)系的北京的供應(yīng)商信息;SELECTa.供應(yīng)商號(hào),b.供應(yīng)商名,地址FROM訂購(gòu)單a,供應(yīng)商bWHERE;a.供應(yīng)商號(hào)=b.供應(yīng)商號(hào)ANDa.職工號(hào)=”E1”,a.職工號(hào)=”E(6)列出與工資在1220元以下的職工沒(méi)有聯(lián)系的供應(yīng)商的名稱(chēng);SELECTa.供應(yīng)商名FROM供應(yīng)商a,職工b,訂購(gòu)單cWHERE;b.職工號(hào)=c.職工號(hào),c.供應(yīng)商號(hào)=a.供應(yīng)商號(hào)ANDb.工資<1220(7)列出向供應(yīng)商S4發(fā)出訂購(gòu)單的倉(cāng)庫(kù)所在的城市;SELECTa.城市FROM倉(cāng)庫(kù)a,職工b,訂購(gòu)單cWHEREa.倉(cāng)庫(kù)號(hào)=b.倉(cāng)庫(kù)號(hào),;b.職工號(hào)=c.職工號(hào)ANDc.供應(yīng)商號(hào)=”S4(8)列出在上海工作并且向供應(yīng)商S6發(fā)出了訂購(gòu)單的職工號(hào);SELECTa.職工號(hào)FROM職工a,倉(cāng)庫(kù)b,訂購(gòu)單cWHEREa.倉(cāng)庫(kù)號(hào)=b.倉(cāng)庫(kù)號(hào),;a.職工號(hào)=c.職工號(hào)ANDb.城市=”上?！?c.供應(yīng)商號(hào)=”S6(9)列出由工資多于1230元的職工向北京的供應(yīng)商發(fā)出的訂購(gòu)單號(hào);SELECTa.訂購(gòu)單號(hào)FROM訂購(gòu)單a,職工b,供應(yīng)商cWHERE;a.職工號(hào)=b.職工號(hào),a.供應(yīng)商號(hào)=c.供應(yīng)商號(hào)ANDb.工資>1230,;c.地址=”北京”(10)列出倉(cāng)庫(kù)的個(gè)數(shù);SELECT倉(cāng)庫(kù)號(hào),COUNT(倉(cāng)庫(kù)號(hào))FROM倉(cāng)庫(kù).dbf(11)列出有最大面積的倉(cāng)庫(kù)信息;SELECTa.倉(cāng)庫(kù)號(hào),城市,面積FROM倉(cāng)庫(kù)aORDERBY面積GO1DISPLAY(12)列出所有倉(cāng)庫(kù)的平均面積;SELECTAVG(面積)AS“所有倉(cāng)庫(kù)的平均面積”FROM倉(cāng)庫(kù).dbf(13)列出每個(gè)倉(cāng)庫(kù)中工資多于1220元的職工個(gè)數(shù);SELECT職工號(hào),COUNT(職工號(hào))FROM職工.dbfGROUPBY倉(cāng)庫(kù)號(hào)WHERE;工資>1220(14)列出和面積最小的倉(cāng)庫(kù)有聯(lián)系的供應(yīng)商的個(gè)數(shù);SELECTa.職工號(hào),COUNT(a.供應(yīng)商號(hào))FROM訂購(gòu)單a,職工b,倉(cāng)庫(kù)cWHERE;a.職工號(hào)=b.職工號(hào),b.倉(cāng)庫(kù)號(hào)=c.倉(cāng)庫(kù)號(hào)ANDMIN(c.面積)(15)列出工資低于本倉(cāng)庫(kù)平均工資的職工信息.SELECTa.職工號(hào),b.倉(cāng)庫(kù)號(hào),城市,c.供應(yīng)商號(hào),訂購(gòu)單號(hào),訂購(gòu)日期FROM;職工a,倉(cāng)庫(kù)b,訂購(gòu)單cWHEREa.倉(cāng)庫(kù)號(hào)=b.倉(cāng)庫(kù)號(hào),a.職工號(hào)=c.職工號(hào);ANDa.工資<AVG(a.工資)第九章結(jié)構(gòu)化程序設(shè)計(jì)1.寫(xiě)出下列程序的執(zhí)行結(jié)果.(1)CLEARSETTALKOFFx=10y=-3FORn=29+xTOxSTEPyENDFOR?nRETURN執(zhí)行結(jié)果:9(2)主程序:t1.prgSETTALKOFFSTORE‘AB’TOk1,k2DOt2?k1+k2RETURN子程序t2.prgPRIVATEk1k1=k2+”250?k1RETURN執(zhí)行結(jié)果:AB250ABAB(3)SETTALKOFFCLEARSTORE1TOxSTORE20TOyDOWHILEx<=yIFINT(x/2)<>x/2x=1+x^2y=y+1LOOPELSEx=x+1ENDIFENDDO?x,ySETTALKONRETURN執(zhí)行結(jié)果:122.0023(4)主程序:z.prgSETTALKOFFSTORE2TOx1,x2,x3x1=x1+1DOz1?x1+x2+x3RETURN子程序:z1.prgx2=x2+1DOz2x1=x1+1RETURN子程序:z2.prgx3=x3+1RETURNTOMASTER執(zhí)行結(jié)果:9(5)SETTALKOFFx=15y=7DOsubWITHx,(y)?x,yRETURNPROCECUREsubPARAMETERSa,ba=a+bb=a-bRETURN執(zhí)行結(jié)果:227(6)SETTALKOFFx=9y=13z=fu(x,y)?zRETURNFUNCTIONfuPARAMETERSa,ba=a*bRETURN(a)執(zhí)行結(jié)果:1173.輸入學(xué)生成績(jī),若成績(jī)大雨80分,則輸出”優(yōu)良”,成績(jī)小于60分,則輸出”不及格”,否則輸出”中等”.參考答案:*CJ.prgSETTALKOFFUSESTUDENTS.dbfname=space(10)@10,5SAY”請(qǐng)輸入學(xué)生姓名并查看其成績(jī):”GETnameREADLOCATEFOR學(xué)生姓名=nameIF.NOT.EOF()DOCASECASE成績(jī)>=80?“該生成績(jī)?yōu)閮?yōu)秀”CASE成績(jī)>=60AND成績(jī)<80?“該生成績(jī)?yōu)橹械取監(jiān)THERWISE?“該生成績(jī)?yōu)椴患案瘛盓NDCASEELSE?”無(wú)此學(xué)生”ENDIFSETTALKONRETURN4.在學(xué)生表中,分別統(tǒng)計(jì)漢族學(xué)生和少數(shù)民族學(xué)生的人數(shù).參考答案:*TJ.prgCLEARSTORE0TOx,yUSESTUDENTS.dbfSCANIF少數(shù)民族否=”是”x=x+1ELSEy=y+1ENDIFENDSCAN?“少數(shù)民族的學(xué)生有”+STR(x,3)+”人”?“漢族的學(xué)生有”+STR(y,3)+”人”USERETURN2003-2004學(xué)年第2學(xué)期期末考試試題（A卷）foxpro程序設(shè)計(jì)基礎(chǔ)試題使用班級(jí)：03級(jí)非計(jì)算機(jī)專(zhuān)業(yè)本科fox班總分得分一、單項(xiàng)選擇題（共20分）[每小題2分]1.FOXPRO是一種(C)數(shù)據(jù)庫(kù)管理系統(tǒng)。

A)層次型B)網(wǎng)狀型C)關(guān)系型D)面向?qū)ο笮?.將數(shù)據(jù)庫(kù)文件的某一字段變量改名，以下命令正確的是（D）

A）ModifyB）UseC）CreateD）Modifystructure3.在無(wú)索引的情況下打開(kāi)數(shù)據(jù)庫(kù)文件，立即使用Display命令，其功能是（A）；A）顯示第一條記錄B）顯示全部記錄C）顯示最后一條記錄D）顯示從當(dāng)前記錄開(kāi)始到表尾的所有記錄4.以下表達(dá)式的結(jié)果為數(shù)值型的是（D）；A)"牛"$"牛群"B)"wishyou"＋"success"C){98/6/14}+15D){98/06/14}-{98/11/12}5.關(guān)于索引，下列說(shuō)法正確的是（B）。通過(guò)建立索引可以改變記錄在庫(kù)中的實(shí)際存儲(chǔ)順序可以對(duì)多個(gè)字段的表達(dá)式建立索引一個(gè)數(shù)據(jù)庫(kù)只能建立一個(gè)索引建立索引以后，庫(kù)中的記錄就會(huì)按照索引規(guī)定的順序重新排列6.關(guān)于刪除記錄的說(shuō)法，不正確的是（B）。A)在BROWSE窗口中，對(duì)于要?jiǎng)h除的記錄，可以單擊每個(gè)記錄左邊的框來(lái)標(biāo)記該記錄要被刪除B)對(duì)于添加了刪除標(biāo)記的紀(jì)錄，它們?nèi)匀淮嬖谟诖疟P(pán)上，但是不能再恢復(fù)原來(lái)的狀態(tài)C)為了避免錯(cuò)誤刪除有用信息，foxpro把庫(kù)中刪除記錄的操作分為兩步：先對(duì)記錄作刪除標(biāo)記，然后再移去要?jiǎng)h除的記錄。D)刪除當(dāng)前庫(kù)文件中所有記錄時(shí)，通常需要用戶(hù)進(jìn)一步確認(rèn)7.下述程序段的運(yùn)行結(jié)果為（C）。ch="abcdef"dowhilelen(ch)>0??right(ch,2)ch=left(ch,len(ch)-2)enddoA)abcdefB)fedcbaC)efcdabD)badcfe8.設(shè)職工數(shù)據(jù)庫(kù)文件已經(jīng)打開(kāi)，其中有工資字段，要把指針定位在第一個(gè)工資大于1000元的記錄上，應(yīng)使用命令（C）。A)FINDFOR工資>1000B)SEEK工資>1000C)LOCATEFOR工資>1000D)FIND工資>10009.以下程序段共執(zhí)行(D)次循環(huán)

k=2.5

DOWHILEk<=4?kk=k+0.5ENDDOA)1B)2C)3D)410.要為當(dāng)前表所有職工增加100元工資應(yīng)該使用(D)命令。

A)CHANGE工資WITH工資+100

B)REPLACE工資WITH工資+100

C)CHANGEALL工資WITH工資+100

D)REPLACEALL工資WITH工資+100得分二、填空題（共20分）[每空2分]1.計(jì)算機(jī)的中央處理器由運(yùn)算器和控制器構(gòu)成。

2.計(jì)算機(jī)網(wǎng)絡(luò)按通信距離來(lái)劃分,通?？煞譃開(kāi)__廣域網(wǎng)和_局域___網(wǎng)。3.結(jié)構(gòu)化程序設(shè)計(jì)中的三種基本結(jié)構(gòu)單元是順序結(jié)構(gòu)、__選擇__結(jié)構(gòu)和_循環(huán)__結(jié)構(gòu)。4.FoxPro系統(tǒng)的三種工作方式有_菜單操作方式__、_命令操作方式__和選單操作方式。5.十進(jìn)制數(shù)23，對(duì)應(yīng)的二進(jìn)制數(shù)是：10110。十六進(jìn)制數(shù)F6對(duì)應(yīng)的十進(jìn)制數(shù)是：262。6.foxpro庫(kù)文件的備注信息集中存放在一個(gè)與庫(kù)文件同名但擴(kuò)展名為：.dct的備注文件中。7.表達(dá)式"ab">"bb"OR"ac"<"ad"的運(yùn)算結(jié)果為：.T.。8.執(zhí)行命令：？AT（"成績(jī)","平時(shí)成績(jī)"）顯示的結(jié)果是__5_____。9.能隨著庫(kù)文件的打開(kāi)而自動(dòng)打開(kāi)的索引為：結(jié)構(gòu)復(fù)合索引文件。10.按照不同庫(kù)文件的兩個(gè)字段表達(dá)式值相等來(lái)關(guān)聯(lián)的原則，父文件多條記錄對(duì)應(yīng)子文件中一條記錄的關(guān)聯(lián)稱(chēng)為多對(duì)一關(guān)系，父文件一條記錄對(duì)應(yīng)子文件中多條記錄的關(guān)聯(lián)稱(chēng)為一對(duì)多關(guān)系。得分三、程序理解題（共20分）1．讀程序，寫(xiě)出運(yùn)行結(jié)果（8分）主程序main.prg子程序proc.prgpublicmpublicnsettalkoffprivatexm=1mx=5n=2y=2x=3doprocy=4?"main中:",m,n,x,y?"proc中:",m,n,x,ysettalkonreturnreturn運(yùn)行結(jié)果為：proc中:2234main中:22542．程序填空（每空2分，共12分）（1）*本程序用來(lái)求組合modifycommandcmnsettalkoffinput"輸入m"tominput"輸入n"tonc=jc(m)/(jc(n)*jc(m-n))?csettalkonreturnfunctionjcPARAMETERjcnf=1fork=1tojcn_f=f*k__endforreturnf（2）*本程序用來(lái)統(tǒng)計(jì)學(xué)生數(shù)據(jù)庫(kù)stud.dbf中成績(jī)score大于80分的學(xué)生人數(shù)SETTALKOFFCLEARSELECT0USEstud.dbfS=0DOWHILE.NOT.EOF()IFSCORE>=80S=S+1ENDIFCONTINUEENDDOUSE?"成績(jī)大于等于80分的學(xué)生共有"+STR(S)+"人"USESETTALKON得分四、編程題（每小題10分，共20分）（10分）輸入一個(gè)數(shù)，判斷它能否被3，5整除，并輸出一下信息之一：能同時(shí)被3，5整除；只能被3整除;只能被5整除;既不能被3整除也不被5整除參考答案:*1.prgCLEARINPUT’請(qǐng)輸入數(shù):’TOnum1IFnum1<>0DOCASECASEMOD(num1,15)=0?"該數(shù)能同時(shí)被3和5整除"CASEMOD(num1,3)=0ANDMOD(num1,5)<>0?"該數(shù)只能被3整除"CASEMOD(num1,5)=0ANDMOD(num1,3)<>0?"該數(shù)只能被5整除"OTHERWISE?"該數(shù)既不能被3整除也不能被5整除"ENDCASEENDIF2.(10分)

編程序求100到1000之間的所有奇數(shù)之和。參考答案:*求和.prgSETTALKOFFSTORE100TOxSTORE0TOyDOWHILE.T.x=x+1DOCASECASEINT(x/2)=x/2LOOPCASEx>=1000EXITOTHERWISEy=y+xENDCASEENDDO?"100到1000之間的奇數(shù)和為:",ySETTALKONRETURN&&執(zhí)行結(jié)果為:100到1000之間的奇數(shù)和為:247500得分五、應(yīng)用題（20分）數(shù)據(jù)庫(kù)文件ZGMC.DBF，包含6個(gè)字段，分別為SNO（編號(hào)）、SNAME（姓名）、SSEX（性別）、ZC（職稱(chēng)）、GZ（工資）、CSRQ（出生日期）。如下二維表所示：SNOSNAMESSEXZCGZCSRQ9201宋玲剛.F.技術(shù)員801.5078/07/119205郭小勇.T.工程師1133.0070/12/159215王佳鵬.F.高工1560.5065/09/239208張一凡.T.工人1015.0060/08/089206李春媛.F.工程師1008.0073/01/01………………根據(jù)下列要求寫(xiě)出命令或程序：顯示第2條記錄（2分）參考答案:USEZGMC.DBFGO2DISP2）顯示工資高于1000元全部女職工的姓名、職稱(chēng)與出生日期（2分）參考答案:LISTSNAME,ZC,CSRQFORGZ>=1000ANDSSEX=.F.3)在第1條記錄前插入新記錄9209李玉.F.技術(shù)員1003.8073/05/30并顯示結(jié)果；（3分）參考答案:GO1INSERTBLANKBEFOREREPLACESNOWITH"9209"UPDATEZGMCSETSNAME="李玉",SSEX=.F.,ZC="技術(shù)員",GZ=1003.80;CSQR={1973/05/30}WHERESNO="9209"LIST4)刪除1965年以前出生的職稱(chēng)為工人的記錄，并顯示結(jié)果；（2分）參考答案:DELETEFORYEAR(DATE()-YEAR(CSRQ))>42&&以07年為當(dāng)前時(shí)間進(jìn)行計(jì)算PACKLIST5)統(tǒng)計(jì)工程師的平均工資，并顯示統(tǒng)計(jì)結(jié)果；（2分）參考答案:CALCULATEAVG(GZ)TOx?x6)將1970年1月1日及以后出生的工程師復(fù)制為庫(kù)文件gcs.dbf(2分)參考答案:COPYTOgcs.dbfFORYEAR(DATE()-YEAR(CSRQ))>37&&以07年為當(dāng);前時(shí)間進(jìn)行計(jì)算7）對(duì)所有工資超過(guò)1000元的男職工按出生日期降序排序，并要求新文件中只包含編號(hào)、姓名、性別、工資字段；（2分）參考答案:SORTONCSRQ/DTOnewFIELDSSNO,SNAME,SSEX,GZFORGZ>10008）為ZGMC.DBF建立索引文件，記錄以職稱(chēng)降序排序，職稱(chēng)相同時(shí)按出生日期降序排列（3分）參考答案:INDEXON-ZC-CSRQTAGsy19）按索引查詢(xún)方式查詢(xún)1970年出生的女職工（2分）參考答案:

SETEXACTOFF&&關(guān)閉精確查詢(xún),進(jìn)行模糊查找INDEXONCSRQTAGsy2D={1970-**-**}SEEKDDISPSKIP2003-2004學(xué)年第2學(xué)期期末考試試題（B卷）foxpro程序設(shè)計(jì)基礎(chǔ)試題使用班級(jí)：03級(jí)非計(jì)算機(jī)專(zhuān)業(yè)本科fox班總分得分一、單項(xiàng)選擇題（共20分）[每小題2分]1．FOXPRO是一種(C)數(shù)據(jù)庫(kù)管理系統(tǒng)。

A.層次型B.網(wǎng)狀型C.關(guān)系型D.面向?qū)ο笮?．在學(xué)生基本情況表STU.DBF中，"性別"字段為邏輯型，用.T.代表女同學(xué)。為了找到第一位姓李的男同學(xué)，以下命令正確的是（C）；

A．Seek[李]and性別

B．Find[李].and.男同學(xué)

C.Locatefor[李]$姓名andnot性別

D.Locatefor[李]$姓名.and.男同學(xué)3.對(duì)已經(jīng)打開(kāi)的學(xué)生成績(jī)表文件STUC．DBF先按字符型字段"性別"升序索引，再按數(shù)值型字段"總分"的降序索引，應(yīng)當(dāng)使用的命令是（B）A．INDEXON性別+總分B．INDEXON性別-總分C．INDEXON性別+STR(-總分，3)D．INDEXON性別+STR(100-總分)4．以下表達(dá)式的結(jié)果為數(shù)值型的是（D）；A."牛"$"牛群"B."wishyou"＋"success"C.{98/6/14}+15D.{98/06/14}-{98/11/12}5.在語(yǔ)句ACCEPT"姓名:"TOXM中，XM的類(lèi)型應(yīng)該是（C）；

A.邏輯內(nèi)存變量

B.數(shù)值型字段變量

C.字符型字段變量

D.字符型內(nèi)存變量6.下面關(guān)于FoxPro數(shù)組的敘述中，錯(cuò)誤的是（）A.用DIMENSION和DECLARE都可以定義數(shù)組B.FoxPro只支持一維數(shù)組和二維數(shù)組C.一個(gè)數(shù)組中各個(gè)數(shù)組元素必須是同一種數(shù)據(jù)類(lèi)型D.新定義數(shù)組的各個(gè)數(shù)組元素初值為.F.只顯示當(dāng)前記錄的命令是___C___。LISTLISTALLDISPLAYDISPLAYALL有如下命令序列

X=1

Y=2

Z=3

?Z=X+Y

執(zhí)行最后一條命令后，顯示的結(jié)果應(yīng)該是____A____。.T..F.3X+Y設(shè)有數(shù)據(jù)庫(kù)FILE.DBF，執(zhí)行如下命令序列

SETDELETEDOFF

USEFILE

LIST

Recoed#商品名金額

1洗衣機(jī)3100.00

2電冰箱2300.00

321彩電1800.00

4空調(diào)機(jī)4100.00

GO3

DELETE

GOBOTTOM

INSERTBLANK

REPLACE商品名WITH"34寸彩電",金額WITH6000

SUM金額TOS

當(dāng)前S的值應(yīng)該是____B____。11300173001140015500在FoxBASE中,命令X=Y=3的功能是____D____。

A.判斷Y是否等于3,并將判斷結(jié)果保存到X中

B.判斷X是否等于Y,如果等,將3賦值給Y,否則Y保持原來(lái)的值不變

C.判斷X和Y是否都等于3

D.將3賦值給Y,然后再賦值給X,使X和Y的值都為3得分二、填空題（共20分）[每空2分]1.數(shù)據(jù)庫(kù)的英文縮寫(xiě)為DB，數(shù)據(jù)庫(kù)系統(tǒng)的英文縮寫(xiě)為DBS，數(shù)據(jù)庫(kù)管理的系統(tǒng)英文縮寫(xiě)為DBMS。數(shù)據(jù)庫(kù)有三種類(lèi)型分別為層次型、網(wǎng)狀型、關(guān)系型。表達(dá)式"103">"7"的值為.F.，"abc"+"abc"的值為abcabc。命令？TYPE("12/27/95")的輸出值是___N___。在數(shù)據(jù)庫(kù)文件中，要在某記錄打上刪除標(biāo)記，應(yīng)使用命令__DELETE___。在數(shù)據(jù)表中，用于存放圖像、聲音等多媒體對(duì)象的數(shù)據(jù)類(lèi)型是。程序設(shè)計(jì)的三種基本結(jié)構(gòu)是順序結(jié)構(gòu)、選擇結(jié)構(gòu)、循環(huán)結(jié)構(gòu)。執(zhí)行以下命令序列

m=len("119")?m=m+1的顯示結(jié)果是.F.。在Foxpro系統(tǒng)中有兩條語(yǔ)句可以改變循環(huán)體的執(zhí)行控制,在DOWHILE循環(huán)體內(nèi),語(yǔ)句LOOP使控制轉(zhuǎn)移到循環(huán)的開(kāi)始,語(yǔ)句EXIT使控制轉(zhuǎn)移到循環(huán)體外,跳轉(zhuǎn)到該循環(huán)結(jié)構(gòu)后的第一個(gè)可執(zhí)行語(yǔ)句。表達(dá)式"ST"$"STRING"和表達(dá)式"SR"$"STRING"的值分別是.T.、.F.。得分三、程序理解題（共20分）1．讀程序，寫(xiě)出運(yùn)行結(jié)果（8分）cleari=1stra=""dowhilei<=5stra=stra+"*"i=i+1enddo?strastrb="Wishyousuccess!"stra=stra+strb?strb?strareturn運(yùn)行結(jié)果為：*****Wishyousuccess!*****Wishyousuccess!2．程序填空（每空2分，共12分）（1）下面程序的功能是完成查詢(xún)，系統(tǒng)要求用戶(hù)輸入書(shū)名，然后從圖書(shū)管理表（TSB.DBF）中查詢(xún)給定書(shū)目的信息，要求：若用戶(hù)沒(méi)有輸入書(shū)名，系統(tǒng)要求用戶(hù)重新輸入，用戶(hù)輸入字符串"000"，則結(jié)束查詢(xún)。USETSBDOWHILE.T.ACCEPT"請(qǐng)輸入書(shū)名："TOSMIFLEN(ALLTRIM(SM))=0LOOPENDIFIFALLTRIM(SM)="000"EXITENDIFLOCATEALLFOR書(shū)名＝ALLTRIM(SM)IFFOUND()DOWHILE.NOT.EOF()DISPLAYSKIPENDDOELSE?"查無(wú)此書(shū)"ENDIFENDDORETURN（2）輸入10個(gè)分?jǐn)?shù)（0-100以?xún)?nèi)）的值，輸出其所屬