【单选题】

在窗体上画一个名称为Command1的命令按钮，然后编写如下事件过程：

Private SubCommand1_Click()
Dim xAs Integer, yAs 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．死笔循环