问题详情

运行下列程序：

Private Sub Command1_Click()

Dim x As Integer, n As Integer

n = 0

Do

n = n + 2

x = x + n

Loop While n< 10

Debug.Print x

End Sub

单击Command1命令按钮后，则在立即窗口上输出结果是是()。

A.2

B.10

C.12

D.30