运行下列程序:
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
运行下列程序:
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
D
VIP截止日期:2025-01-02 12:00:25
←请使用支付宝扫码支付VIP截止日期:2025-01-02 12:00:25
←请使用微信扫码支付