单项选择题
下列程序运行后，信息框显示的内容是()。
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()a = 100b = 24a = a Mod bb = b / aa = b - aDebug.Print aEnd Sub单击Command1命令按钮后，则在立即窗口上输出结果是()。A.2B.24C.50D.100
A.Print
B.2
B.24
C.50
D.100 -
单项选择题
运行下列程序：Private Sub Form_Click()Dim sum As IntegerDim i As Integersum = 0For i =12.4 To3.1 Step -3.8sum = sum + iNext iDebug.Print sumEnd Sub单击窗体后，则在立即窗口上输出结果是()。A.15B.- 0.7C.24D.0
A.4
B.1
C.8
sum
D.Print
E.15
B.-
F.7
C.24
D.0 -
单项选择题
Datetime是Data类型的变量，以下赋值语句中错误的是()。A.Datetime=#5/8/03#B.Datetime=#September l,2003#C.Datetime=#10:21:00AM#D.Datetime='5/6/03'
A.Datetime=#5/8/03#
B.Datetime=#September
B.Datetime=#10:21:00AM#
D.Datetime='5/6/03'
