问题 单项选择题

运行下列程序,结果是( )。
Private Sub Command32_Click()
f0=1:f1=1:k=1
Do While k<=5
f=f0+f1
f0=f1
f1=f
k=k+1
Loop
MsgBox "f=" &f
End Sub

A) f=5
B) f=7
C) f=8
D) f=13

答案

参考答案:D

解析: 本题中的循环是一个典型的“Do…While…Loop”语句,Do…Whlle…Loop语句使用格式如下。
Do While 条件式
循环体
Loop
变量k的初值为1,根据循环的条件式可知,在“k<=5”的情况下,循环将执行,直到条件不满足,循环终止,整个循环过程如下所示。
当k=1,符合条件式,执行循环体:f=f0+f1=2,f0=1,f1=2,k=2。
当k=2,符合条件式,执行循环体:f=f0+f1=3,f0=2,f1=3,k=3。
当k=3,符合条件式,执行循环体:f=f0+f1=5,f0=3,f1=5,k=4。
当k=4,符合条件式,执行循环体:f=f0+f1=8,f0=5,f1=8,k=5。
当k=5,符合条件式,执行循环体:f=f0+f1=13,f0=8,f1=8,k=6。
当k=6,此时k>5,不符合条件式,不执行循环体,退出循环。
所以本题答案为D)。

单项选择题
问答题 简答题