问题
填空题
在窗体上画一个命令按钮,然后编写如下事件过程: Private Sub Command1_Click()X=0Do While X<>-1 X=Val(InputBox("请输入数据X:")) Y=Val(InputBox("请输入数据Y:")) If X*Y<X+Y Then Print X,YLoop End Sub程序运行后,依次输入7,2,-3,8,-5,-10,18,-1,-1,则输出结果是 【13】 。
答案
参考答案:-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”。