题目内容

下列程序运行后，信息框显示的内容是()。
Private Sub Command1_Click()
Dim s1 As String
Dim s2 As Integer
s1 = "Hello-World,2004"
s2 = Len(s1) + InStr(1, s1, "2")
MsgBox s2
End Sub

A. Hello-World
B. 2003
C. 16
D. 29

查看答案

搜索结果不匹配？点我反馈

更多问题

运行下列程序：
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. 内接触式