[单项选择题] 在窗体上画一个名称为Command1的命令按钮，然后编写如下事件过程： Private Sub Command1

[单项选择题] 在窗体上画一个名称为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。