题目内容

运行下列程序：
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()
a = 100
b = 24
a = a Mod b
b = b \ a
a = b - a
Debug.Print a
End Sub
单击Command1命令按钮后，则在立即窗口上输出结果是()。

A. 2
B. 24
C. 50
D. 100

运行下列程序：
Private Sub Form_Click()
Dim sum As Integer
Dim i As Integer
sum = 0
For i =12.4 To3.1 Step -3.8
sum = sum + i
Next i
Debug.Print sum
End Sub
单击窗体后，则在立即窗口上输出结果是()。

A. 15
B. - 0.7
C. 24
D. 0

在接触轨式中，()利于防止下雪和冰冻造成集电困难，且对人员安全性高。

A. 上接触式
B. 下接触式
C. 侧面接触式
D. 内接触式

测量电容器绝缘电阻读数完毕后，正确做法是()。

A. 停止摇动摇把→取下测试线取
B. 下测试线→继续摇动摇把
C. 取下测试线→停止摇动摇把