在窗体上画一个命令按钮,然后编写如下事件过程: Private Sub Command1_Click() X=0 Do While X<>-1 X=Val(InputBox("请输入数据X:")) Y=Val(InputBox("请输入数据Y:")) If

admin2013-03-30  29

问题 在窗体上画一个命令按钮,然后编写如下事件过程:
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,则输出结果是【  】

选项

答案-3 8 18 -15

解析 本题程序运行后,共输入5组数据,x依次取值为7、-3、-5、18、-1,Y依次取值为 2、8、-10、-15、-1。只有满足X * Y<X+Y时,才输出X、Y的值。循环的结束条件是“X= -1,Y=-1”。
转载请注明原文地址:https://jikaoti.com/ti/U7w0FFFM
0

最新回复(0)