单选题 在窗体中有命令按钮Command1和3个文本框Text0、Text1、Text2,命令按钮对应的代码过程如下:
Private Sub Command1_Chck()
Dim i, fl, f2 As Integer
Dim flag As Boolean
f1=Val(Me!Text0)
t2=Val(Me!Text1)
If f1>f2 Then
i=t2
Else
i=f1
End If
flag=True
Do While i>1 And flag
If f1 Mod i=0 And f2 Mod i=0 Then
flag=False
Else
i=i-1
End If
Loop
Me!Text2=i
End Sub
运行程序,在文本框Text0和Text1中分别输入15和20,则文本框Text2中显示的结果是______。
【正确答案】 B
【答案解析】[解析] 本题中程序的功能是对输入的两个数,找出二者的最大公约数。第一个If语句将输入的两个数的较小者保存到变量i中,然后使用Do While循环语句找到能同时整除输入的两个数(15和20)的最大值,最后输出最大公约数,即5,故本题B选项正确。