运行下列程序，结果是( )。
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

单项选择题窗体中有命令按钮Command1和文本框Text1，事件过程如下。 Function result(ByVal x As Integer)As Boolean If x Mod 2=0 Then result=True Else result=False End If End Function Private Sub Command1_Click() x=Val(InputBox( 请输入一个整数 )) If Then Text1=Str(x)＆ 是偶数. Else Text1=Str(x)＆ 是奇数. End If End Sub 运行程序，单击命令按钮，输入19，在Text1中会显示“19是奇数.”。那么在程序的空白处应填写( )。

单项选择题若变量i的初值为8，则下列循环语句中循环体的执行次数为( )。 Do While i＜=17 i=i+2 Loop