2. 计算机
  3. 窗体上有1个名称为Commandl的命令按钮，事件过程如下： Private Sub Commandl_Click() Dim x％，y％，z％ x=InputBox(”请输入第1个整数”) y=InputBox("请输入第

窗体上有1个名称为Commandl的命令按钮，事件过程如下： Private Sub Commandl_Click() Dim x％，y％，z％ x=InputBox(”请输入第1个整数”) y=InputBox("请输入第

admin2016-06-30  58
问题 窗体上有1个名称为Commandl的命令按钮，事件过程如下：
    Private Sub Commandl_Click()
    Dim x％，y％，z％
    x=InputBox(”请输入第1个整数”)
    y=InputBox("请输入第2个整数")
    Do Until x=y
    If X＞Y Then X=X—Y Else y=y—x
    Loop
    Print x
    End Sub
    运行程序，单击命令按钮，并输入2个整数169和39，则在窗体上显示的内容为(    )。
选项 A、11
B、13
C、23
D、39
答案B
解析 程序中Do循环比较输入的两个数的大小，把较大的数值减去较小的数值后再与较小的值比较，直到两个数值相等。程序中输入169和39，则x=169—39=130，130＞y即130＞39，因此x=130一39=91，如此循环x=91一39=52—39=13，此时13＞39为假，执行y=y—x=39—13=26，循环y=26—13=13，此时x、y都为13，循环结束，因此窗体上显示为13。
转载请注明原文地址:https://kaotiyun.com/show/OlLp777K
本试题收录于： 二级VB题库NCRE全国计算机二级分类
0

二级VB

NCRE全国计算机二级

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