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

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

admin2016-08-24  79
问题 窗体上有1个名称为Command1的命令按钮，事件过程如下：
    Private Sub Command1_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/T4Lp777K
本试题收录于： 二级VB题库NCRE全国计算机二级分类
0

二级VB

NCRE全国计算机二级

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