问题
单项选择题
在窗体上画一个名称为Command1的命令按钮,然后编写如下事件过程:
Private Sub Command1_Click()
Dim x As Integer, y As Integer
x = 6: y = 7
Do
y = y - x
Debug. Print y;
x=x+1
Loop While x<= 0
Print y; x
End Sub
程序运行后,单击命令按钮,则窗体上显示的内容是
A.7 9
B.34 0
C.1 7
D.死笔循环
答案
参考答案:C
解析:
[分析]: 当第一次进入循环体后,y=7-6=1, x=6+1=7,由于“7<=0”的条件为假,所以只执行了一次循环就退出循环体。最后打印出1和7。