[单选题]

窗体上有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
运行程序,单击命令按钮,并输入两个整数169和39,则在窗体上显示的内容为(  )。

A.11

B.13

C.23

D.39

参考答案与解析:

相关试题

在窗体上画一个命令按钮(名称为Command1),然后编写如下代码:<br />Private Sub Command1_Click()<br />Dim a <br /

[单选题]在窗体上画一个命令按钮(名称为Command1),然后编写如下代码:Private Sub Command1_Click()Dim a a=Array

  • 查看答案
  • 在窗体上画一个名称为Command1的命令按钮,单击命令按钮时执行如下事件过程:<br />Private Sub Command1_Click( )<br />a$=&quo

    [单选题]在窗体上画一个名称为Command1的命令按钮,单击命令按钮时执行如下事件过程:Private Sub Command1_Click( )a$="so

  • 查看答案
  • 在窗体上画一个名称为Command1的命令按钮,然后编写如下事件过程:Private Sub Command1_Click(  )。<br /><img border="0

    [单选题]在窗体上画一个名称为Command1的命令按钮,然后编写如下事件过程:Private Sub Command1_Click(  )。程序运行时,单击C

  • 查看答案
  • 窗体上有一个名为List1的列表框和一个名为Command1的命令按钮,并有下面的事件过程:<br />Private Sub Command1_Click( )<br />n

    [单选题]窗体上有一个名为List1的列表框和一个名为Command1的命令按钮,并有下面的事件过程:Private Sub Command1_Click( )

  • 查看答案
  • 在窗体上画一个名称为Text1的文本框和一个名称为Command1的命令按钮,然后编写如下事件过程:Private Sub Command1_Click(  )<br /><img

    [单选题]在窗体上画一个名称为Text1的文本框和一个名称为Command1的命令按钮,然后编写如下事件过程:Private Sub Command1_Clic

  • 查看答案
  • 窗体上有一个名称为Label1的标签和一个名称为Command1的命令按钮。命令按钮的单击事件过程如下:<br />事件过程如下:<br /><img border=&q

    [单选题]窗体上有一个名称为Label1的标签和一个名称为Command1的命令按钮。命令按钮的单击事件过程如下:事件过程如下:运行程序,单击命令按钮,在输入对

  • 查看答案
  • 在窗体上画一个名为Command1的命令按钮,其Command1_Click事件过程如下:<br /><img border="0" style="wi

    [单选题]在窗体上画一个名为Command1的命令按钮,其Command1_Click事件过程如下:要求在C:的随机文件student.dat写入一条记录。应在

  • 查看答案
  • 窗体上有一个命令按钮Command1,编写如下事件过程:Private Sub

    [单选题]窗体上有一个命令按钮Command1,编写如下事件过程:Private Sub Command1_Click()Sum = 0F.or m = 1 To 3Select Case mC.ase 1a = 1C.ase 2a = 2C.ase 3a = 3E.nd SelectPrint a,Sum = Sum + aNext mPrint SumE.nd Sub运行时,单击按钮,输出结果是( )。A. 3 3 3 9B. 3 2 1 6C. 1 1 1 3D. 1 2 3 6

  • 查看答案
  • 窗体上有一个命令按钮Command1,编写如下事件过程:Private Sub

    [单选题]窗体上有一个命令按钮Command1,编写如下事件过程:Private Sub Command1_Click()a = 80: b = 50: c = 30If ac Then b = cIf b = c And ac Then c = a + bPrint a, b, cE.nd Sub运行时,单击按钮,窗体输出的结果是( )。A. 80 50 30B. 80 30 30C. 50 30 80D. 50 30 30

  • 查看答案
  • 窗体上有一个命令按钮Command1,编写如下事件过程:Private Sub

    [单选题]窗体上有一个命令按钮Command1,编写如下事件过程:Private Sub Command1_Click()x = InputBox("x=")y = InputBox("y=")Print x + yE.nd Sub运行后,单击命令按钮,先后在两个输入对话框中输入123和321,窗体显示的内容是( )。A. 444B. 123321C. 123+321D. 出错信息

  • 查看答案