2. 计算机
  3. 在窗体中有命令按钮Command1和三个文本框Text0、Text1、Text2，命令按钮对应的代码过程如下： Private Sub Command1_Click() Dim i，f1，f2 As Integer Dim flag As Boolean

在窗体中有命令按钮Command1和三个文本框Text0、Text1、Text2，命令按钮对应的代码过程如下： Private Sub Command1_Click() Dim i，f1，f2 As Integer Dim flag As Boolean

admin2020-07-25  53
问题 在窗体中有命令按钮Command1和三个文本框Text0、Text1、Text2，命令按钮对应的代码过程如下：
Private Sub Command1_Click()
Dim i，f1，f2 As Integer
Dim flag As Boolean
f1=Val(Me!Text0)
f2=val(Me!Text1)
If f1＞f2 Then
i=f2
Else
i=f1
End If
flag=True
Do While i＞1And flag
If f1 Mod i=0And12Mod i=0Then
flag=False
Else
i=i-1
End If
Loop
Me!Text2=i
End Sub
运行程序，在文本框Text0和Text1中分别输入15和20，单击命令按钮，则文本框Text2中显示的结果是(    )。
选项 A、5
B、15
C、20
D、10
答案A
解析 f1=15，f2=20，i=15，Do While循环中，f1和f2不能同时整除i，一直循环执行i=i-1，直到i=5，满足f1和f2不能同时整除i，执行flag=False，则退出循环，Me!Text2=i，即为5。
转载请注明原文地址:https://kaotiyun.com/show/MAcp777K
本试题收录于： 二级Access题库NCRE全国计算机二级分类
0

二级Access

NCRE全国计算机二级

相关试题推荐
随机试题
最新回复(0)