发布时间 : 星期三 文章vf复习指导更新完毕开始阅读
（3）建立索引，将表中的所有记录按总分从高到低的顺序显示出来。
习题 5 参考解答
一、选择题
1~5：ADABC 6~10：DABAB 11~15：CCCAC 16~20：BDAAD 21~25：ADAAB
二、阅读下列程序，写出运行结果
1．15
2．102 3．5、15 4．S,I= 10 5 5．15 4 3 6．求输入的 2 个数的最小公倍数 7．删除 stb 中与 sta 中相同的字母 8．主程序中 X=同学们 主程序中 Y=你们好！ 返回主程序后的 X=同学们 返回主程序后的 Y= 2 返回主程序后的 Z= 5 子程序中的 X=同学们 子程序中的 Y= 2 子程序中的 Z= 300 9．X=30 10． 6
12
6 12
9 36
三、在横线处填上适当的内容，使程序完整 1．MOD(I,3)=0、P=I 2．EXIT、I=N
3．NOT FOUND() 或 EOF()、CONTINUE 4．INDEX ON 姓名 TAG XM
5．&KNAME、FOR 姓名=NAME、EOF()、DELETE 6．AND 物理>=85 AND 英语>=85、REPLACE 等级 WITH \优秀\ 7．SKIP、XM=姓名、ZY=专业、ZF=总分
8．数学>=90、数学>=80、数学>=70、数学>=60 9．PARAMETERS X,Y 、S1 10．skip、Sc=成绩
第二部分 《Visual FoxPro 程序设计（第二版）》复习提要与学习指导、习题及参考解答 131
132 Visual FoxPro 程序设计实训与考试指导（第二版）
四、编程题 1．
CLEAR
INPUT TO A INPUT TO B DO CASE
CASE A=B
?ALLTRIM(STR(A))+\CASE A>B
?ALLTRIM(STR(A))+\CASE A
?ALLTRIM(STR(A))+\ENDCASE RETURN
2．
*使用 FOR 循环 JG=0
FOR I=1 TO 100
IF MOD(I,2)<>0 &&奇数 JG=JG+1/I ELSE
JG=JG-1/I ENDIF ENDFOR ?JG
CANCEL *使用 DO WHILE 循环 JG=0 I=1
DO WHILE I<=100
IF MOD(I,2)<>0 &&奇数 JG=JG+1/I ELSE
JG=JG-1/I
ENDIF I=I+1 ENDDO ?JG
CANCEL
3．
S=0
INPUT \请输入一个数：\ DO SUB WITH N ?S