单项选择题

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

<上一题目录下一题>

热门试题

单项选择题

窗体中有命令按钮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是奇数.”。那么在程序的空白处应填写( )。

A) result(x)="偶数"
B) result(x)
C) result(x)="奇数"
D) NOT result(x)

单项选择题

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

A) 3次
B) 4次
C) 5次
D) 6次

相关试题