VFP试题解答

来源：百度知道 编辑：UC知道 时间：2024/06/18 14:35:38
三、阅读程序题
1、执行下列程序，当输入A时，写出显示的结果。 ____________
Clear
Wait "请输入一个字符：" to A
Do Case
Case Islower(A) && 判别字串A是否以小写开头
?"Lower"
Case Isupper(A) && 判别字串A是否以大写开头
?"Upper"
Case A>='0' And A<="9"
?"Digit"
OtherWise
?"Other"
EndCase
2、执行下列程序，写出显示的结果。 ______________
Dimension A(20)
Store 1 To A(1), A(2)
For I=3 To 20
A(I)=A(I-1)+A(I-2)
Endfor
? A(10)
3、执行下列程序，写出显示的结果。
Store 10 To X, Y
Do While .T.
X=X+1
Do Case
Case Int(X/3)=X/3
Loop
Case X>=20
Exit
Otherwise
Y=Y+X
EndCase
Enddo
?X，Y
4、执行下列程序，写出显示的结果。
Store 0 to X,Y
Do Sub1
? X,Y,Z
Procedure Sub1
Private X
Local Y
Public Z
X=1<

我的解释在你原句的〔 && Fox_Layman 解释：〕之后。
我的答案在每题的后面，原因又在答案的后面。

三、阅读程序题

1、执行下列程序，当输入A时，写出显示的结果。 ____________
Clear && Fox_Layman 解释：清屏
Wait "请输入一个字符：" to A && Fox_Layman 解释：Wait，为VFP命令，其作用是：显示信息并暂停 Visual FoxPro 的执行，按任意键或单击鼠标后继续执行。在这里的作用是等待输入，再将键盘输入或鼠标点击后的结果赋值给变量 A。
Do Case && Fox_Layman 解释：Do Case ... Endcase 是多路分支语句，是命令集合。作用是若条件满足其中的某一项（某一Case，且排名分先后），即执行该项（Case）下的表达式。
Case Islower(A) && 判别字串A是否以小写开头 && Fox_Layman 解释：有解释了．．．（Case 1）
?"Lower" && Fox_Layman 解释：输出结果〔Lower〕在屏幕上。
Case Isupper(A) && 判别字串A是否以大写开头 && Fox_Layman 解释：有解释了．．．（Case 2）
?"Upper" && Fox_Layman 解释：输出结果〔Upper〕在屏幕上。
Case A>='0' And A<="9" && Fox_Layman 解释：判断是否是数字零到九。（Case 3）
?"Digit" && Fox_Layman 解释：输出结果〔Digit〕在屏幕上。
OtherWise && Fox_Layman 解释：若以上条件都不能满号时，或曰以上各种条件以外的情况时，则．．．（Case 4）
?"Other" && Fox_Layman 解释：输出结果〔Other〕