单选题运行下列程序，结果是______。
Private Sub Command32_C1iCk()
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

【正确答案】 D

【答案解析】[解析] 本题考查VBA中Do While…Loop循环语句的相关知识。当Do While后的条件表达式为真时，重复执行循环体，只有当条件表达式为假时才退出循环。该循环语句执行5次循环后，最终变量f的值为13。