铸坯冷却到＞900℃进行矫直是（)。

A、0-12V
B、0-24V
C、0-36V
D、12-24V

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