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

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

admin2018-01-25  79
问题 在窗体中有命令按钮Command1和三个文本框Text0、Text1、Text2，命令按钮对应的代码过程如下：
    Private Sub Command1_Click()
    Dim i，f1，f2 As Integer
    Dim flag As Boolean
    f1＝Val(Me!Text0)
    t2＝Val(Me!Text1)
    If f1＞f2 Then
    i＝f2
    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中显示的结果是(    )。
选项 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/QXMp777K
本试题收录于： 二级Access题库NCRE全国计算机二级分类
0

二级Access

NCRE全国计算机二级

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