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

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

admin2017-10-24  76
问题 在窗体中有一个命令按钮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!Textl)
    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和Textl中分别输入15和25，单击按钮后文本框Text2中显示的结果是
选项 A、5
B、10
C、15
D、25
答案A
解析 程序开始时，f1和f2的值分别是从文本框。Text0和Textl中输入的值15和25，然后利用if语句判断f1和f2两个数的大小，变量i中存放f1和f2中较小者的值，-flag初始值为true，程序进入Do While循环语句，首先判断循环条件“i>1 And flag”，结果为true，循环体中的if语句，只有当f1和f2同时能被i整除，flag才会被赋值为false，否则将变量i减1，继续进行Do While循环的条件判断，一旦f1和f2同时能被i整除，变量flag被赋值为false，则整个循环结束，将变量i的值输出到文本框Text2中，所以只有当变量i为5时，才能同时被住(15)和f2(25)整除，本题程序的功能是求两个数的最大公约数，故选项A正确。
转载请注明原文地址:https://kaotiyun.com/show/YhMp777K
本试题收录于： 二级Access题库NCRE全国计算机二级分类
0

二级Access

NCRE全国计算机二级

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