第五章結(jié)構(gòu)化程序設(shè)計(jì)

1、第五章 結(jié)構(gòu)化程序設(shè)計(jì)一、選擇題1、WAIT命令用于讓用戶輸入一個(gè) 。A)數(shù)字 B)字符 C)字符串 D)以上都是2、在交互式輸入命令中，可以接受邏輯型數(shù)據(jù)的命令包括_。 A)INPUT和ACCEPT B)WAIT和INPUT C)INPUT和GET D)INPUT和SAY3、執(zhí)行命令 ACCEPT請(qǐng)輸入數(shù)據(jù):TO XYZ 時(shí),可以通過鍵盤輸入的內(nèi)容包括_。 A)字符串 B)數(shù)值和字符串C)數(shù)值,字符串和邏輯值 D)數(shù)值,字符串,邏輯值和表達(dá)式4、執(zhí)行命令I(lǐng)NPUT請(qǐng)輸入數(shù)據(jù):TO AAA時(shí),如果要通過鍵盤輸入字符串,應(yīng)當(dāng)使用的定界符包括_。A)單引號(hào) B)單引號(hào)或雙引號(hào)C)單引號(hào)、雙引號(hào)或方

2、括弧 D)單引號(hào)、雙引號(hào)、方括弧或圓點(diǎn)5、在VFP中,可以通過鍵盤接受數(shù)值的命令有_。 A)ACCEPT B)ACCEPT和WAITC)INPUT和ACCEPT D)INPUT和 5,10 SAY.GET.6、比較WAIT、ACCEPT和INPUT三條命令，需要以回車鍵表示輸入結(jié)束的命令是_。 A)WAIT、ACCEPT、INPUT B)WAIT、ACCEPTC)ACCEPT、INPUT D)INPUT、WAIT7、以下關(guān)于ACCEPT命令的說明，正確的是_。 A)將輸入作為字符接收 B)將輸入作為數(shù)值接收C)將輸入作為邏輯型數(shù)據(jù)接收 D)將輸入作為備注型接收8、結(jié)構(gòu)化程序設(shè)計(jì)所規(guī)定的三種基本

3、控制結(jié)構(gòu)是_。 A)輸入,處理,輸出 B)樹型,網(wǎng)型,環(huán)型C)順序,選擇,循環(huán) D)主程序,子程序,函數(shù)9、能將高級(jí)語(yǔ)言編寫的源程序轉(zhuǎn)換成目標(biāo)程序的是_。 A)編程程序 B)編譯程序 C)解釋程序 D)鏈接程序10、VFP中的DO CASE-ENDCASE語(yǔ)句屬于_。 A)順序結(jié)構(gòu) B)選擇結(jié)構(gòu) C)循環(huán)結(jié)構(gòu) D)模塊結(jié)構(gòu)11、當(dāng)前數(shù)據(jù)庫(kù)中有五個(gè)字段:學(xué)號(hào)(C,4)、姓名(C，6)、政治(N，3.0)、英語(yǔ)(N，3.0)、數(shù)學(xué)(N,3.0),記錄指針指向一個(gè)非空的記錄。要使用SCATTER TO X命令把當(dāng)前記錄的字段值存到數(shù)組X中,數(shù)組X _。A)不必事先定義 B)必須用DIMENSION

4、X 事先定義C)必須用DIMENSION X(5)事先定義 D)必須用DIMENSION X(1),X(2),X(3),X(4),X(5)事先定義12、要判斷數(shù)值型變量Y是否能夠被7整除,錯(cuò)誤的條件表達(dá)式為_。 A)MOD(Y,7)=0 B)INT(Y/7)=Y/7 C)0=MOD(Y,7) D)INT(Y/7)=MOD(Y,7)13、在VFP中,命令文件的擴(kuò)展名是_。 A)TXT B)PRG C)DBT D)FMT14、以下有關(guān)VFP中過程文件的敘述,其中正確的是_。 A)先用SET PROCEDURE TO 命令關(guān)閉原來已打開的過程文件,然后用DO 執(zhí)行B)可直接用DO 執(zhí)行C)先用SET

5、 PROCEDURE TO 命令打開過程文件,然后用USE 執(zhí)行D)先用SET PROCEDURE TO 命令打開過程文件,然后用DO 執(zhí)行15、執(zhí)行 SET DEVICE TO PRINT 命令之后，能在打印機(jī)上實(shí)現(xiàn)輸出的命令是_。 A)?姓名 B) 10,10 SAY 姓名 C)LIST 姓名 D) 10,10 GET 姓名16、一個(gè)過程文件最多可以包含128個(gè)過程，每個(gè)過程的第一條語(yǔ)句是_。 A)PARAMETER B)DO C) D)PROCEDURE 17、在下列命令組合中，不能配對(duì)使用的是_。A) PROMPT 和 MENU TO B)DO WITH和 PARAMETERSC)IF

6、和 ENDIF D)DO CASE和 ENDDO18、在VFP中，用于建立或修改過程文件的命令是_。 A)MODIFY B)MODIFY COMMAND C)MODIFY PROCEDURE D)CREATE COMMAND 19、在VFP中，可以在同種類型的數(shù)據(jù)之間進(jìn)行“-”(減號(hào))運(yùn)算的數(shù)據(jù)類型是_。 A)數(shù)值型、字符型、邏輯型 B)數(shù)值型、字符型、日期型C)數(shù)值型、日期型、邏輯型 D)邏輯型、字符型、日期型20、要在屏幕的第二行第二列開始顯示姓名(C,8),存款數(shù)額(N,6,2)和存入日期(D)三個(gè)字段的值,應(yīng)該使用命令_。 A) 2,2 SAY 姓名,存款數(shù)額,存入日期B) 2,2 S

7、AY 姓名+存款數(shù)額+存入日期C) 2,2 SAY 姓名+STR(存款數(shù)額,6,2)+DTOC(存入日期)D) 2,2 SAY 姓名+STR(存款數(shù)額,6,2)+CTOD(存入日期)21、在DO WHILE/ENDDO循環(huán)中，若循環(huán)條件設(shè)置為.T.，則下列說法中正確的是 。A)程序無法跳出循環(huán) B)程序不會(huì)出現(xiàn)死循環(huán)C)用EXIT可以跳出循環(huán) D)用LOOP可以跳出循環(huán)22、用戶自定義函數(shù)或過程中接受參數(shù)，應(yīng)使用 命令。A) PROCEDURE B) FUNCTION C)WHILE D)PARAMETERS 23、用戶自定義函數(shù)或過程可以定義在 。A)獨(dú)立的程序文件 B)對(duì)象的事件代碼、方法

8、代碼中C)數(shù)據(jù)庫(kù)的存儲(chǔ)過程中 D)過程文件 24、在命令窗口賦值的變量默認(rèn)的作用域是 。A)全局 B)局部 C)私有 D)不一定25、使用命令DECLARE mm(2,3)定義的數(shù)組，包含的數(shù)組元素(下標(biāo)變量)的個(gè)數(shù)為 。 A)2個(gè) B)3個(gè) C)5個(gè) D)6個(gè) 26、下列 語(yǔ)句可以將變量A、B的值互換。A)A=B B)A= (A+B)/2 C)A=A+B D)A=CB=A B= (A-B)/2 B=A-B C=B A=A-B B=C27、結(jié)構(gòu)化程序設(shè)計(jì)的三種基本邏輯結(jié)構(gòu)是_。 A)選擇結(jié)構(gòu)、循環(huán)結(jié)構(gòu)和嵌套結(jié)構(gòu) B)順序結(jié)構(gòu)、選擇結(jié)構(gòu)和循環(huán)結(jié)構(gòu) C)選擇結(jié)構(gòu)、循環(huán)結(jié)構(gòu)和模塊結(jié)構(gòu) D)順序結(jié)構(gòu)、

9、遞歸結(jié)構(gòu)和循環(huán)結(jié)構(gòu) 28、如果一個(gè)過程不包含RETURN語(yǔ)句，或RETURN語(yǔ)句中沒有指定表達(dá)式，那么該過程_。A)沒有返回值 B)返回0 C)返回.T. D)返回.F.29、作為整個(gè)應(yīng)用程序入口點(diǎn)的主程序至少應(yīng)具有以下功能_。A)初始化環(huán)境 B)初始化環(huán)境、顯示初始的用戶界面、控制事件循環(huán)，退出時(shí)恢復(fù)環(huán)境 C)初始化環(huán)境、顯示初始用戶界面 D)初始化環(huán)境、顯示初始用戶界面、控制事件循環(huán)30、下面關(guān)于過程調(diào)用的陳述中，_是正確的。A)實(shí)參與形參的數(shù)量必須相等 B)當(dāng)實(shí)參的數(shù)量多于形參的數(shù)量時(shí)，出現(xiàn)運(yùn)行時(shí)錯(cuò)誤。C)當(dāng)形參的數(shù)量多于實(shí)參的數(shù)量時(shí)，多余的實(shí)參為邏輯假 D)上面B和C都對(duì) 31、將內(nèi)存

10、變量定義為全局變量的Visual FoxPro命令是_。A)LOCAL B)PRIVATE C)PUBLIC D)GLOBAL32、下列說法中正確的是_。 A)若函數(shù)不帶參數(shù)，則調(diào)用時(shí)函數(shù)名后面的圓括號(hào)可以省略B)函數(shù)若有多個(gè)參數(shù)，則參數(shù)名間應(yīng)用空格隔開C)調(diào)用函數(shù)時(shí)，參數(shù)的類型、個(gè)數(shù)和順序不一定要一致D)調(diào)用函數(shù)時(shí)，函數(shù)名后的圓括號(hào)不論有無參數(shù)都不能省略33、在VFP中,已經(jīng)建立了一個(gè)過程文件ABC.PRG,打開此過程文件的命令是 。A) OPEN PROCEDURE TO ABC B) DO PROCEDURE ABCC) SET PROCEDURE TO ABC D) RUN PROCE

11、DURE ABC34、順序鍵入以下命令： STORE 21.47TO A B=INT(&A+4) ? B 屏幕上顯示的結(jié)果為 。A)24 B)25 C)25.47 D)21.47435、設(shè)數(shù)據(jù)庫(kù)文件STD.DBF中包含8個(gè)字段，并有以下命令序列： DIMENSION DATA(10) USE STD SCATTER TO DATA ? DATA(10) 執(zhí)行以上命令序列后，屏幕顯示的結(jié)果是 。A)空 B).T. C).F. D)036、有以下命令序列： STORE 123.456 TO A STORE STR(A+A,5) TO B ? LEN(B),B 執(zhí)行以上命令序列,最后一條命令顯示的結(jié)

12、果是 。A)3 123 B)3 264 C)5 246 D)5 24737、給出以下程序的運(yùn)行結(jié)果： SET TALK OFFX=0Y=0 DO WHILE X100?1CASE X200?2OTHERWISE?3ENDCASE若在X=300的情況下執(zhí)行這個(gè)程序段，屏幕上將顯示_。A)1B)2C)12D)341、有如下命令序列: X=AY=XA=黃河長(zhǎng)江？ X+&X-Y-&Y執(zhí)行以上命令序列后，屏幕顯示表達(dá)式X+&X-Y-&Y的結(jié)果是_。A)黃河長(zhǎng)江 B)A黃河長(zhǎng)江A黃河長(zhǎng)江 C)A黃河長(zhǎng)江A D)A黃河長(zhǎng)江黃河長(zhǎng)江42、有如下命令序列： SET DELETED ON USE ABC GO 3

13、 DELETE NEXT 2 GO 4 RECALL USE 執(zhí)行最后一條RECALL命令時(shí)，去掉刪除標(biāo)記的記錄個(gè)數(shù)是_。A)0 B)1 C)2 D)343、已知proc.prg程序清單如下： proc_1.prg程序清單如下： SET TALK OFF PARAMETERS a,b n=20 b=a*b t=1 IF a=2 DO proc_1 WITH n,t RETURN ?t ENDIF SET TALK ON DO proc_1 WITH a-2,b RETURN RETURN程序proc.prg的功能是_。A)輸出20以內(nèi)偶數(shù)的乘積 B)輸出20以內(nèi)奇數(shù)的乘積 C)輸出結(jié)果為1 D

14、)輸出結(jié)果為044、有如下命令序列: SELECT 1USE F1SELECT 2USE F2SELECT 1SET RELATION TO RECNO()-2 INTO BGOTO 5?RECNO(2)最后一條命令的輸出結(jié)果是 。A)5 B)4 C)3 D)145、清除屏幕從10行,17列到14行,52列的正確語(yǔ)句是 。 A)10,17 TO CLEAR 14,52 B)10,17 CLEAR 14,52C)10,17 TO 14,52 CLEAR D)CLEAR FROM 10,17 TO 14,5246、有如下命令序列 SELECT 1USE FILE1SELECT 2USE FILE2

15、SELECT 3USE FILE 3執(zhí)行以上命令序列后,要想向FILE2.DBF中追加記錄,同時(shí)保持?jǐn)?shù)據(jù)庫(kù)打開的狀態(tài)不變,應(yīng)當(dāng)使用命令 。A) USE FILE2 B) GO FILE2 C) SELECT 2 D) SELECT 4 APPEND APPEND APPEND USE FILE2 APPEND47、有如下命令DISPLAY 姓名,出生日期 FOR 性別=女執(zhí)行這個(gè)命令后,屏幕顯示的是所有性別字段值為“女”的記錄,這時(shí)文件指針_。A)指向最后一個(gè)性別為女的記錄B)指向最后一個(gè)性別為女的記錄的下一個(gè)記錄C)指向文件尾D)狀態(tài)視庫(kù)文件中數(shù)據(jù)記錄的實(shí)際情況而定48、有如下命令序列 CL

16、EAR MEMORYDIMENSION ARRAY(10)LIST MEMORY最后一條命令顯示定義的內(nèi)存變量的數(shù)是 。A)10 B)1 C)0 D)1149、在命令文件中,調(diào)用另一個(gè)命令文件用命令 。 A) CALL B) LOAD C) PROCEDURE D) DO 50、執(zhí)行下列語(yǔ)句序列 A=2200DO CASE CASE A1000 B=10/100CASE A2000 B=15/1000CASE A3000 B=20/100ENDCASE變量B的值是 。A)0.05 B)0.10 C)0.15 D)0.2051、有以下程序段:DO CASECASE 計(jì)算機(jī)=60 ?計(jì)算機(jī)成績(jī)是:

17、+及格CASE 計(jì)算機(jī)=70 ?計(jì)算機(jī)成績(jī)是:+中CASE 計(jì)算機(jī)=80 ?計(jì)算機(jī)成績(jī)是:+良CASE 計(jì)算機(jī)=90 ?計(jì)算機(jī)成績(jī)是:+優(yōu)ENDCASE 設(shè)學(xué)生數(shù)據(jù)庫(kù)當(dāng)前記錄的“計(jì)算機(jī)”字段的值是89,執(zhí)行上面程序段之后,屏幕輸出 。A)計(jì)算機(jī)成績(jī)是:不及格 B)計(jì)算機(jī)成績(jī)是:及格 C)計(jì)算機(jī)成績(jī)是:良 D)計(jì)算機(jī)成績(jī)是:優(yōu)52、執(zhí)行以下命令序列: USE ZGGZ SUM 工資 FOR 工資=500 TO QWE COPY TO QAZ FIELDS 職工號(hào),姓名 FOR 工資=500 USE QAZ NUM=RECCOUNT() AVER=QWE/NUM ? AVER最后顯示的值是 。A)

18、所有工資在500元以上的職工人數(shù) B)所有工資在500元以上的職工平均工資數(shù)C)所有職工的平均工資數(shù) D)出錯(cuò)53、有以下程序段: 5，10 SAY 請(qǐng)輸入14 GET ANS READ CX=PG+ANS+.PRG DO &CX 其功能是根據(jù)用戶輸入的數(shù)字,轉(zhuǎn)去執(zhí)行子程序PG1、PG2、PG3、PG4之一。但該程序段有一個(gè)明顯的錯(cuò)誤,為此應(yīng)當(dāng)做以下修改 。A)增加STORE TO ANS 作為第一條命令B)把 5,10 SAY 請(qǐng)輸入14 TO ANS 命令改為 ACCEPT 請(qǐng)輸入14 TO ANSC)把 CX=PG+ANS+.PRG 命令中的+.PRG 部分去掉 D)把DO &CX 命令

19、的&去掉54、執(zhí)行如下程序 SET TALK OFF S0 I1 INPUT N? TO N DO WHILE SN SSI II1 ENDDO ? S SET TALK ON 如果輸入N值為5,則最后S的顯示值是 。A)1 B)3 C)5 D)655、某程序中有如下程序段: STORE TO PT 5,10 SAY 是否開始打印?(Y/N): 3,10 GET PT VALID PT $YN PICTURE! READ IF PT=Y DO PT.PRG & 打印 ENDIF 如果希望程序執(zhí)行后能夠?qū)崿F(xiàn)打印輸出，則對(duì)于程序的提問 。 A)只能輸入 Y B)只能輸入y C)輸入Y或y D)可以

20、直接敲回車鍵56、執(zhí)行如下程序: STORE TO ANS DO WHILE .T. CLEAR 3,10 SAY 1.添加2.刪除 3.修改 4.退出 5,15 SAY 請(qǐng)輸入選擇: GET ANS READ IF TYPE(ANS)=C.AND.VAL(ANS)=3.AND.VAL(ANS)0 PROG= PROG +ANS+ .PRG DO & PROG ENDIF QUIT ENDDO 如果在請(qǐng)輸入選擇:時(shí)，鍵入4，則系統(tǒng) 。A)調(diào)用子程序PROG4.PRG B)調(diào)用子程序&PROG.PRGC)返回FOXBASE提示狀態(tài) D)返回操作系統(tǒng)狀態(tài)以下5762題的操作均基于下面條件：已建立學(xué)

21、生數(shù)據(jù)庫(kù)STD.DBF，數(shù)據(jù)庫(kù)結(jié)構(gòu)為：學(xué)號(hào)(C,6)，姓名(C,8)，性別(C,2)，出生日期(D)，平均成績(jī)(N,6,2)。用LIST命令顯示記錄如下：記錄號(hào)#學(xué)號(hào) 姓名 性別 出生日期 平均成績(jī)1 021501劉淑敏女10/05/8488.22 021502楊立宏男03/12/8570.63 021503馬燕 女09/23/8467.24 021504趙雅潔女12/10/8480.85 021505王力軍男11/21/8490.557、依次執(zhí)行以下命令： USE STD姓名=鄭小洋SKIP 2?姓名是:+姓名最后一條命令的輸出結(jié)果是 。A)姓名是：鄭小洋 B)姓名是：馬燕 C)姓名是：楊立

22、宏D)姓名是：趙雅潔58、使用INDEX ON 性別+DTOC(出生日期,1) TO RQ建立索引之后，接著執(zhí)行LIST命令，所顯示記錄的姓名順序是 。 A)王力軍、楊立宏、馬燕、劉淑敏、趙雅潔B)馬燕、劉淑敏、趙雅潔、王力軍、楊立宏C)楊立宏、王力軍、趙雅潔、劉淑敏、馬燕D)劉淑敏、楊立宏、馬燕、趙雅潔、王力軍59、索引文件打開后，下列命令操作中不受索引文件影響的是 。 A) SKIPB) DISPLAY ALL C) FINDD) GO 560、有如下程序段: USE STDINDEX ON 性別 TO XBTOTAL ON性別 TO STD_1執(zhí)行以上程序段之后，數(shù)據(jù)庫(kù)STD_1.DBF

23、中的記錄個(gè)數(shù)為 。A)1B)2C)3D)461、上題所生成的數(shù)據(jù)庫(kù)STD_1.DBF中被匯總的字段是 。 A)記錄個(gè)數(shù) B)平均成績(jī) C)平均成績(jī)、出生日期 D)平均成績(jī)、出生日期、記錄個(gè)數(shù)62、要顯示當(dāng)前記錄的學(xué)號(hào)，姓名，性別，以下命令錯(cuò)誤的是 。 A) ? 學(xué)號(hào),姓名,性別 B) DISPLAY學(xué)號(hào),姓名,性別C) 5,10 SAY學(xué)號(hào),姓名,性別 D) 5,10 SAY學(xué)號(hào)+姓名+性別二、填空題1、PUBLIC用于定義 。在本次Visual FoxPro運(yùn)行期間，所有過程都可以使用這些變量。2、VFP根據(jù)表達(dá)式的 來確定表達(dá)式的類型。3、命題“n是小于正整數(shù)k的偶數(shù)”用邏輯表達(dá)式表示是

24、。4、PRIVATE用于定義 ，它用于定義當(dāng)前過程的變量，并將以前過程定義的同名變量保存起來，在當(dāng)前過程中使用該變量而不影響這些同名變量的原始值。 5、有程序段如下: STORE 0 TO X,Y DO WHILE.T. X=X+1 Y=Y+X IF X=100 EXIT ENDIF ENDDO ? Y=+STR(Y,3) 這個(gè)程序是計(jì)算 1 的,執(zhí)行后的結(jié)果是 2 。6、請(qǐng)閱讀下列判斷一個(gè)自然數(shù)是否為質(zhì)數(shù)的程序，并將程序填寫完整。SET TALK OFFINPUT請(qǐng)輸入一個(gè)大于1的自然數(shù):TO NK=0 &K的值為0表示所輸入的自然數(shù)是質(zhì)數(shù),為1表示不是質(zhì)數(shù)J=2DO WHILE JN IF

25、 MOD(N,J) 1 2 LOOP ELSE K=1 EXIT ENDIFENDDOIF K=0 ? 3 + 是質(zhì)數(shù) ENDIF ? 再見！SET TALK ONRETURN7、下面的函數(shù)通過參數(shù)a、b、c接收一元二次方程ax2+bx+c=0的三個(gè)系數(shù)，并求解這個(gè)方程:如果有實(shí)根,通過參數(shù)x1和x2返回它的兩個(gè)根，函數(shù)的返回值為.T.；如果沒有實(shí)根或出現(xiàn)其他異常情況，函數(shù)的返回值為.F.，請(qǐng)?zhí)羁铡ARAMETERS a,b,c,x1,x2 IF a =0 RETURN .F. ENDIF Delta=b*b-4*a*c IF deltaPMAXPMAX= TEMP(I)CASE TEMP(

26、I)PMINPMIN= TEMP(I) 3 ENDDOSELECT GSREPLACE 最后得分 WITH 4 5 6 ENDDO2)將GS.DBF按“最后得分”字段由高到低排序，“最后得分”相同時(shí)，按歌手編號(hào)升序建立排序文件GSPX.DBF的命令是 。3)計(jì)算GS.DBF中所有歌手“最后得分”的平均值，并將結(jié)果保存在變量PJ中的命令是 。4)以下程序是根據(jù)GS.DBF中“選送地區(qū)”字段的前兩個(gè)漢字是否為“北京”而使用PROG1.PRG和PROG2.PRG進(jìn)行不同的處理：IF LEFT(選送地區(qū),4)=北京DO PROG1ELSEDO PROG2ENDIF以上程序段中的判斷條件LEFT(選送地

27、區(qū)，4)=北京，也可以用函數(shù)SUBSTR或AT描述。使用SUB函數(shù)描述時(shí)，判斷條件可改寫為 1 ；使用AT函數(shù)描述時(shí)，判斷條件可改寫為 2 。11、有如下售書數(shù)據(jù)庫(kù)BOOK.DBF，BOOK.DBF中的記錄如下：書號(hào) 單價(jià) 數(shù)量 總計(jì)B0168 19.8 3B6915 12.6 36B9023 40.0 100B4682 18.0 40B6329 28.0 56B8127 2.0 20要逐條計(jì)算總計(jì)并填入“總計(jì)”字段之中,計(jì)算按照如下規(guī)則:若數(shù)量小于等于10,總計(jì)等于“單價(jià)*數(shù)量”若數(shù)量大于50, 總計(jì)等于“單價(jià)*數(shù)量*(1-5/100)”若數(shù)量在11與50之間,總計(jì)等于“單價(jià)*數(shù)量(1-10

28、/100)”請(qǐng)?zhí)羁?SET TALK OFFUSE BOOKGO TOPDO WHILE 1 DO CASECASE 數(shù)量50REPLACE 總計(jì) WITH 單價(jià)*數(shù)量*(1-5/100) ENDCASE 3 ENDDOLISTUSESET TALK ONRETURN12、售書數(shù)據(jù)庫(kù)BOOK.DBF(如上題所示),現(xiàn)需要調(diào)整一些書的單價(jià),然后用調(diào)整后的“單價(jià)*數(shù)量”的值填入“總計(jì)”字段，下邊程序的功能是根據(jù)用戶輸入的書號(hào)查找到記錄,并由用戶決定是否對(duì)該記錄進(jìn)行修改，請(qǐng)?zhí)羁眨篠ET TALK OFFUSE BOOKINDEX ON 書號(hào) TO BOOKIDO WHILE .T.CLEARDISP

29、 ALL FIELDS 書號(hào)ACCEPT請(qǐng)輸入書號(hào)TO BNO 1 IF FOUND()DISPLAYACCEPT修改/不修改繼續(xù)/終止程序(Y/N/E) TO SRELSEACCEPT書號(hào)不存在!繼續(xù)/終止程序(N/E) TO SRENDIFDO CASECASE UPPER(SR)=YINPUT請(qǐng)輸入新單價(jià): TO XDJREPLACE 2 ,總計(jì) WITH 單價(jià)*數(shù)量 CASE UPPER(SR)=N 3 CASE UPPER(SR)=E 4 ENDCASEENDDOUSESET TALK ONRETURN13、下面程序的功能是修改P2.DBF中記錄內(nèi)容，為了避免破壞數(shù)據(jù)庫(kù)數(shù)據(jù),先把記錄

30、內(nèi)容存入數(shù)組BUFFER中,用戶先對(duì)數(shù)組進(jìn)行修改,確定修改后,再把數(shù)組中的數(shù)據(jù)存入數(shù)據(jù)庫(kù)中，請(qǐng)?zhí)羁眨篠ET TALK OFFDIMENSION BUFFER(3)STOREYTO ANS, CONUSE P2DO WHILE UPPER(CON)=YCLEAR 2,5 SAY修改第幾條記錄? 1 GO RNOSCATTER TO BUFFER 4,10 SAY學(xué)號(hào)GET BUFFER(1) 6,10 SAY姓名GET BUFFER(2) 8,10 SAY所屬系GET BUFFER(3) 2 ACCEPT確實(shí)修改記錄嗎?(Y/N)TO ANSIF UPPER(ANS)=Y 3 ENDIFACCEPT繼續(xù)嗎?(Y/N)TO CONENDDOUSESET TALK ONRETURN14、設(shè)有Student.DBF(學(xué)號(hào)，姓名，民族)和scor