在窗体上画一个命令按钮，然后编写如下事件过程：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，则输出结果是 1
  • 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”。