湘潭大學(xué)visual foxpro課程考試備考習(xí)題28

1、試卷編號：8264所屬語言：Visual Foxpro試卷方案：VF_1004261709試卷總分：100分共有題型：8種一、填空 共5題 （共計(jì)10分）第1題 （2.0分） 題號:1495一個(gè)ComboBox下拉列表對象中,屬性Enable的值為【1】時(shí),對象才能響應(yīng)用戶引發(fā)的事件.答案：=(答案1)=.T.第2題 （2.0分） 題號:1499已知當(dāng)前表中有15條記錄,當(dāng)前記錄為第12條記錄,執(zhí)行SKIP -2命令后當(dāng)前記錄變?yōu)榈凇?】條記錄.答案：=(答案1)=10=或=十第3題 （2.0分） 題號:1440要將系統(tǒng)菜單恢復(fù)成VFP系統(tǒng)菜單,可執(zhí)行【1】.答案：=(答案1)=SET SYS

2、MENU TO DEFAULT第4題 （2.0分） 題號:1523在SQL中,建立唯一索引要用到保留字【1】.答案：=(答案1)=UNIQUE第5題 （2.0分） 題號:1260若要使命令按鈕在運(yùn)行時(shí)不響應(yīng)用戶事件,應(yīng)將其【1】屬性設(shè)置為.f.(無效).答案：=(答案1)=Enabled二、判斷 共9題 （共計(jì)9分）第1題 （1.0分） 題號:1061在Visual FoxPro中,打開有記錄的數(shù)據(jù)庫后,執(zhí)行命令:go bottom和? eof()后,顯示結(jié)果會是.T.答案：N第2題 （1.0分） 題號:1092執(zhí)行下面的命令 dimention aa(15) asort(aa,1,15,1)

3、是對AA數(shù)組中的元素進(jìn)行降序排序.答案：Y第3題 （1.0分） 題號:597Visual FoxPro中,表達(dá)式1999/02/11-1999/01/30結(jié)果是12.答案：Y第4題 （1.0分） 題號:1054在代碼窗口中,只能編寫對象的事件和方法程序代碼,不能查詢對象的事件和方法程序代碼.答案：N第5題 （1.0分） 題號:1050用EDIT命令打開的是表的瀏覽窗口,用BROWS命令打開的是表的編輯窗口.答案：N第6題 （1.0分） 題號:1141在命令窗口中執(zhí)行EXIT命令可結(jié)束Visual FoxPro.答案：N第7題 （1.0分） 題號:1072在Visual FoxPro中，repl

4、ace ALL 工資 with 工資+150時(shí),表示數(shù)據(jù)庫中所有記錄的工資增加150.答案：Y第8題 （1.0分） 題號:1084在Visual FoxPro中數(shù)組的最小下標(biāo)是0 . 答案：N第9題 （1.0分） 題號:1044新建數(shù)據(jù)庫的命令為CREAT DATA.答案：Y三、單項(xiàng)選擇 共10題 （共計(jì)10分）第1題 （1.0分） 題號:3077SET ESCAPE OFF的作用是().A:使鍵生效B:使鍵失效C:打開人機(jī)交互開關(guān)D:關(guān)閉人機(jī)交互開關(guān)答案：B第2題 （1.0分） 題號:3719在Visual FoxPro中,邏輯型數(shù)據(jù)在表中占用()個(gè)字節(jié).A:1B:2C:4D:10答案：A第

5、3題 （1.0分） 題號:3065DBAS指的是().A:數(shù)據(jù)庫管理系統(tǒng)B:數(shù)據(jù)庫系統(tǒng)C:數(shù)據(jù)庫應(yīng)用系統(tǒng)D:數(shù)據(jù)庫服務(wù)系統(tǒng)答案：C第4題 （1.0分） 題號:3064?CTOD(03/14/08) 的值應(yīng)為().A:2008年3月14日B:03/14/08C:03/14/08D:08-03-14答案：B第5題 （1.0分） 題號:3902在當(dāng)前表中,查找第2個(gè)女同學(xué)的記錄,應(yīng)使用命令(),A:LOCATE FOR 性別=女 NEXT2B:LOCATE FOR 性別=女C:LOCATE FOR 性別=女CONTINUED:LIST FOR 性別=女 NEXT2答案：C第6題 （1.0分） 題號:

6、3721在Visual FoxPro中,刪除數(shù)據(jù)庫的命令是().A:QUIT DATABASEB:CREATE DATABASEC:DELETE DATABASED:CLEAR DATABASE答案：C第7題 （1.0分） 題號:3951建立事件循環(huán)的命令是().A:Begin EventsB:Read EventsC:Clear EventsD:End Events答案：B第8題 （1.0分） 題號:3841下列打開查詢設(shè)計(jì)器的命令是().A:OPEN QUERYB:OPEN VIEWC:CREATE QUERYD:MODIFY QUERY答案：D第9題 （1.0分） 題號:3767在現(xiàn)實(shí)世

7、界中,某種商品的名稱對應(yīng)于計(jì)算機(jī)世界中的().A:個(gè)體B:屬性值C:數(shù)據(jù)項(xiàng)D:性質(zhì)答案：B第10題 （1.0分） 題號:3966下列關(guān)于表單控件基本操作的敘述中,不正確的一項(xiàng)是().A:在表單設(shè)計(jì)器中,雙擊表單中的控件可進(jìn)入編寫代碼環(huán)境B:要在表單中復(fù)制新控件,可以按住Ctrl鍵并拖放該控件C:當(dāng)表單運(yùn)行時(shí),用戶可以按Tab鍵選擇表單中的控件,控件的Tab次序決定了選擇控件的次序D:要使表單中所有控件具有相同的大小,可單擊布局工具欄中的相同大小按鈕答案：B四、多項(xiàng)選擇 共5題 （共計(jì)10分）第1題 （2.0分） 題號:252Visual Foxpro中的表達(dá)式有().A:算術(shù)表達(dá)式B:字符表達(dá)

8、式C:關(guān)系表達(dá)式D:邏輯表達(dá)式答案：ABCD第2題 （2.0分） 題號:350在Visual Foxpro系統(tǒng)中,能移動記錄指針的命令有().A:LISTB:CONTC:GOD:SKIP答案：ABCD第3題 （2.0分） 題號:349以下屬于結(jié)構(gòu)復(fù)合索引文件特點(diǎn)的有().A:在打開表時(shí)自動打開B:在同一索引文件中能包含多個(gè)排序方案C:在同一索引文件中能包含多索引關(guān)鍵字D:在添加、更改或刪除記錄時(shí)自動維護(hù)答案：ABCD第4題 （2.0分） 題號:342命令文件中可以實(shí)現(xiàn)單擊一鍵輸入一個(gè)字符的命令或函數(shù)有().A:waitB:inputC:inkey()D:x,x get VER pict x答案

9、：ACD第5題 （2.0分） 題號:343內(nèi)存變量根據(jù)其作用的范圍可分為().A:字符變量B:局部變量C:私有變量D:全局變量答案：BCD五、程序填空 共3題 （共計(jì)15分）第1題 （5.0分） 題號:788*- *【程序填空】*-*功能:在XSDB.DBF數(shù)據(jù)表中查找學(xué)生王迪，如果找到，則顯示：* 學(xué)號、姓名、英語，生年月日，否則提示查無此人！。* 請?jiān)凇尽刻幪砩线m當(dāng)?shù)膬?nèi)容，使程序完整。*-SET TALK OFF*SPACE*【?】XM=王迪*SPACE*【?】姓名=XMIF FOUN() *SPACE* 【?】學(xué)號, 姓名, 英語, 生年月日ELSE ? 查無此人！ENDIFUSESET

10、 TALK ONRETURN答案：=(答案1)=USE XSDB=或=USE XSDB .DBF=(答案2)=loca for=或=loca All for=(答案3)=display=或=?=或=display off=或=disp第2題 （5.0分） 題號:810*- *【程序填空】*-*功能：從鍵盤輸入一個(gè)表名“XSDA”，查找姓名為劉洪的記錄。* 如果有該記錄，則將該表結(jié)構(gòu)及姓名為劉洪的記錄一* 起復(fù)制成一個(gè)新表（表名為A1）；否則，僅復(fù)制表結(jié)構(gòu)。* (設(shè)，表中有固定字段姓名)。* 請?jiān)凇尽刻幪砩线m當(dāng)?shù)膬?nèi)容，使程序完整。*- SET TALK OFFACCEPT TO AUSE &A*

11、SPACE*【?】 FOR 姓名=劉洪IF NOT EOF( )*SPACE* 【?】 TO A1 FOR 姓名=劉洪ELSE*SPACE* 【?】TO A1ENDIFUSESET TALK ONRETURN答案：=(答案1)=LOCATE=或=LOCA=(答案2)=COPY=(答案3)=COPY STRUCTURE=或=COPY STRU第3題 （5.0分） 題號:807*- *【程序填空】*-*功能：通過循環(huán)程序輸出圖形：* * * * * * * * * * * * * * * * * 請?jiān)凇尽刻幪砩线m當(dāng)?shù)膬?nèi)容，使程序完整。*- SET TALK OFFCLEARFOR N=1 TO 9

12、 IF N=5*SPACE* M1=【?】 ELSE*SPACE* M1=【?】 ENDIF ?*SPACE* FOR M=1 TO ABS(【?】) ? ENDFOR FOR M=1 TO ABS(M1-2*N+1) IF M=1 OR M=ABS(M1-2*N+1) ? * ELSE ? ENDIF ENDFORENDFORSET TALK OFFRETURN答案：=(答案1)=0=或=2+(n-1)*4=或=2+4*(n-1)=或=(n-1)*4+2=或=4*(n-1)+2=(答案2)=18=或=4* (n-5)=或=(n-5) *4=(答案3)=5-N=或=-N+5六、程序改錯(cuò) 共3題

13、 （共計(jì)15分）第1題 （5.0分） 題號:793*-*【程序改錯(cuò)】*-*題目：輸入工資（以元為單位如：1568），計(jì)算出百元、伍十元、* 貳十元、拾元、伍元、貳元、壹元各多少張（要求張數(shù)最少），* 循環(huán)計(jì)算，當(dāng)輸入0時(shí)結(jié)束程序。*-*注意：不可以增加或刪除程序行，也不可以更改程序的結(jié)構(gòu)。*-SET TALK OFFGZ=1*FOUND*DO WHILE GZ=1 INPUT 輸入工資： TO GZ Y100=INT(GZ/100) Y50=INT(GZ-Y100*100)/50) Y20=INT(GZ-Y100*100-Y50*50)/20) Y10=INT(GZ-Y100*100-Y50*

14、50-Y20*20)/10) Y5=INT(GZ-Y100*100-Y50*50-Y20*20-Y10*10)/5) Y2=INT(GZ-Y100*100-Y50*50-Y20*20-Y10*10-Y5*5)/2)*FOUND* Y1=GZ-Y100-Y50-Y20-Y10-Y5-Y2 ?Y100,Y50,Y20,Y10,Y5,Y2,Y1ENDDOSET TALK ONRETU答案：=(答案1)=DO WHILE GZ0=或=DO WHILE GZ0=或=DO WHILE GZ#0=(答案2)=Y1=GZ-Y100 * 100-Y50 * 50-Y20 * 20-Y10 * 10-Y5 * 5

15、-Y2 * 2第2題 （5.0分） 題號:800*- *【程序改錯(cuò)】*-*題目:ZHG.DBF是一個(gè)職工信息文件，其中包含編號(C 5)、姓名* (C 8)、性別(C 1)、基本工資(N 8.2)等字段。其中的性* 別用代碼M表示男、F表示女，此文件已按基本工資建* 立了索引，索引文件名是ZHG_GZ.IDX。* 程序MODI1.PRG功能是：按基本工資由高到低的順序顯示輸 * 出所有職工的姓名、性別和基本工資，每行輸出一個(gè)職工* 的信息，其中性別須輸出漢字男或女。*-*注意：不可以增加或刪除程序行，也不可以更改程序的結(jié)構(gòu)。*-Set talk offclearUSE ZHG INDEX ZH

16、G_GZSET ORDE TO jbgz*FOUND*GO TOP DO WHILE .NOT.BOF() ? 姓名+ *FOUND* ? IF 性別M THEN 女 ? ,基本工資*FOUND* SKIP ENDDOUSESET TALK ONRETU答案：=(答案1)=GO BOTTOM=或=GO BOTT=(答案2)=? IIF(性別M, 女,男)=(答案3)=SKIP -1第3題 （5.0分） 題號:841*- *【程序改錯(cuò)】*-*題目:有如下數(shù)據(jù)庫文件：* ZY.DBF：職員號N(3,0)，姓名C(6)，性別C(2)，職務(wù)C(10)；* DD.DBF：訂單號N(3,0)，客戶號N(3

17、,0)，職員號N(3,0)，* 簽訂日期D(8)，金額N(6,2)。* 給定程序MODI1.PRG的功能是：根據(jù)客戶號查詢該客戶的有關(guān)* 訂單信息，結(jié)果按訂單金額降序排序，并顯示這些定單的總金額。* 修改并調(diào)試該程序，使之正確運(yùn)行。*-*注意：不可以增加或刪除程序行，也不可以更改程序的結(jié)構(gòu)。*-SET TALK OFFSET SAFETY OFFSELECT 1USE zyINDEX ON 職員號 TO zyiSELECT 2USE ddINDEX ON -金額 TO ddi*FOUND*SET RELATION ON -金額 TO ADO WHILE .T. CLEAR KH=202 ? 請

18、輸入客戶號： , kh ? LOCATE FOR 客戶號=kh*FOUND* IF .NOT.EOF() ? 沒有該客戶! ELSE ? 訂單號+ 職 員+SPACE(5)+簽訂日期+ 金 額 ? s=0 DO WHILE !EOF() ? STR(訂單號,3)+SPACE(5)+A-姓名+SPACE(5)+DTOC(簽訂日期)+ +STR(金額,6,2)*FOUND* s=金額 CONTINUE ENDDO ? ? 總金額為:+STR(s,8,2) ENDIF ? WAIT 繼續(xù)查詢嗎(Y/N)? TO p IF !UPPER(p)=Y EXIT ENDIFENDDOCLOSE DATASE

19、T SAFETY ONSET TALK ONRETU答案：=(答案1)=SET RELA TO 職員號 INTO A=或=SET RELA TO 職員號 INTO zy=(答案2)=IF EOF()=或=IF .NOT .FOUND()=或=IF .NOT .FOUN()=(答案3)=s= s+金額=或=s=金額 +s=或=STOR s+金額 TO s=或=STOR 金額+s TO s七、程序設(shè)計(jì) 共2題 （共計(jì)10分）第1題 （5.0分） 題號:700*-*【程序設(shè)計(jì)】*-*題目：編程判斷一個(gè)整數(shù)w的各位數(shù)字平方之和能否* 被5整除, 可以被5整除則返回1,否則返回0。* 將結(jié)果存入變量OU

20、T中。* 請按照題目要求，在下面編寫程序代碼。 *-SET TALK ONSET LOGERRORS ON? 輸入一個(gè)整數(shù)：w=39 OUT=-1w=39*Program* End *DO YZJ WITH OUTSET LOGERRORS OFFSET TALK OFF答案：-s=0 do while w0 s=s+(w%10)*(w%10) w=int(w/10) enddo if s%5=0 out=1 else out=0endif ? out-第2題 （5.0分） 題號:725*-*【程序設(shè)計(jì)】*-*題目：編程求對某個(gè)正數(shù)的值保留3位小數(shù)，并對第4位* 進(jìn)行四舍五入。* 將結(jié)果存入變

21、量OUT中。* 請按照題目要求，在下面編寫程序代碼。 *-SET TALK ONSET LOGERRORS ONh=234.5367OUT=-1*Program* End *DO YZJ WITH OUTSET LOGERRORS OFFSET TALK OFF答案：-i=0i=int(h*10000)%10)if i=5 out=int(h*1000+1)/1000else out=int(h*1000)/1000endif? out-八、VF窗體設(shè)計(jì) 共2題 （共計(jì)21分）第1題 （11.0分） 題號:107一、基本操作題1、將數(shù)據(jù)庫“Stu”添加到工程“Project1”中。2、為“order_list”表創(chuàng)建一個(gè)主索引，索引名和索引表達(dá)式均是“訂單號”。3、根據(jù)表“customer”、“o