在窗体上画一个命令按钮，然后编写如下事件过程：Private Sub Command1_Click()X=0Do While X＜＞-1X=Val(InputBox("请输入数据X:"))Y=Val(InputBox("请输入数据Y:"))If X*Y＜X+Y Then Print X，YLoopEnd Sub程序运行后，依次输入7，2，-3，8，-5，-10，18，-1，-1，则输出结果是【 】
题目
在窗体上画一个命令按钮，然后编写如下事件过程：
Private Sub Command1_Click()
X=0
Do While X＜＞-1
X=Val(InputBox("请输入数据X:"))
Y=Val(InputBox("请输入数据Y:"))
If X*Y＜X+Y Then Print X，Y
Loop
End Sub
程序运行后，依次输入7，2，-3，8，-5，-10，18，-1，-1，则输出结果是【 】
相似考题
更多“在窗体上画一个命令按钮,然后编写如下事件过程:Private Sub Command1_Click()X=0Do While X<>－1X ”相关问题
-
第1题：
在窗体上画一个命令按钮，然后编写如下事件过程：
Private Sub Command1_Click()
For i=1 To 4
x=4
For j=1 To 3
X=3
For k=1 To 2
x=x+6
Next
Next
Next
Print x
End Sub 程序运行后，单击命令按钮，输出的结果是
A．7
B．15
C．157
D．538
正确答案：B
解析：本题的难点在于循环体外的变量初值问题。虽然该段程序中有3重循环，但仔细观察发现，x=3将前面的内容替代了，只剩下最后的结果，即3+6+6=15。 -
第2题：
在窗体上画一个命令按钮，然后编写如下事件过程： Private Sub Command1_Click( ) For i =1 To 4 x=4 For j = 1 To 3 x=3 For k = 1 To 2 x=x+6 Next Next Next Print x End Sub 程序运行后，单击命令按钮，输出的结果是
A．7
B．15
C．157
D．538
正确答案：B
解析：本题的难点在于循环体外的变量初值问题。虽然该段程序中有3重循环，但仔细观测发现，x=3将前面的内容替代了，只剩下最内的结果，即3+6+6=15。 -
第3题：
在窗体上画一个名称为Command1的命令按钮，然后编写如下事件过程：
Private Sub Command1_Click（）
x = -5
If Sgn（x） Then
y = Sgn（x ^ 2）
Else
y = Sgn（x）
End If
Print y
End Sub
程序运行后，单击命令按钮，窗体上显示的是（ ）。
A．-5
B．25
C．1
D．-1
正确答案：C
-
第4题：
在窗体上画一个命令按钮，然后编写如下事件过程: Private Sub CommAnd1_Click() For i=1 To 4 x=0 For j=1 To 3 x=j For k=1 To 2 x=x+6 Next k Next j Next i Print x End Sub 程序运行后，单击命令按钮,输出结果是______ 。
A．7
B．15
C．157
D．538
正确答案：B
-
第5题：
在窗体上画一个命令按钮，然后编写如下事件过程： Private Sub Command1_Click() For i=1 To 4 X=4 For j=1 To 2 X=x+6 Next Next Print x End Sub 程序运行后，单击命令按钮，输出结果是
A．12
B．13
C．16
D．17
正确答案：C
解析：观察程序，由于每次执行外层循环时x都被重新赋值，因此只要看当i=4时，执行内循环所得到的结果就可以。