问题
单项选择题
运行下列程序，结果是（ ）。 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循环语句： k=1时，f=1+1=2，f0=1，f1=2，k=1+1=2； k=2时，f=3，f0=2，f1=3，k=2+1=3； k=3时，f=5，f0=3，f1=5，k=3+1=4； k=4时，f=8，f0=5，f1=8，k=4+1=5； k=5时，f=13，f0=8，f1=13，k=6，不再满足循环条件跳出循环，此时f=13。
]↑