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

在窗体中有命令按钮Commandl和3个文本框Text()、Text1、Text2，命令按钮对应的代码过程如下： Private Sub Commandl_Click() Dim i，f1，f2 As Integer Dim fla

admin2016-08-22  76
问题 在窗体中有命令按钮Commandl和3个文本框Text()、Text1、Text2，命令按钮对应的代码过程如下：
    Private Sub Commandl_Click()
    Dim i，f1，f2 As Integer
    Dim flag As Boolean
    f1＝Val(Me!Text0)
    f2＝Val(Me!Text1)
    If1＞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、15
B、5
C、20
D、10
答案B
解析 本题中程序的功能是对输入的两个数，找出二者的最大公约数。第一个If语句将输入的两个数的较小者保存到变量i中，然后使用Do while循环语句找到能同时整除输入的两个数(15和20)的最大值，最后输出最大公约数，即5，故本题B选项正确。
转载请注明原文地址:https://www.kaotiyun.com/show/v8BD777K
本试题收录于： 二级Access题库NCRE全国计算机二级分类
0

二级Access

NCRE全国计算机二级

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