ABCDE
1 2 3 4 5
abcde
出错信息
第1题:
在窗体上有一个命令按钮,然后编写如下事件过程:
Private Sub Command1_Click()
Dim a(5) As String
FOR i=1 To 5
a(i) =Chr(Asc("A") +(i-1))
Next
For Each b In a
Print b;
Next
End Sub
程序运行后,单击命令按钮,输出结果是
A.ABCDE
B.1 2 3 4 5
C.abcde
D.出错信息
第2题:
在窗体上画一个命令按钮,然后编写如下事件过程:
Private Sub Command1_Click()
Dim a(5) As String
For i = 1 To 5
a(i) = Chr(Asc("A") + (i - 1))
Next i
For Each b In a
Print b;
Next
End Sub
程序运行后,单击命令按钮,输出结果是( )。
A.ABCDE
B.1 2 3 4 5
C.abcde
D.出错信息
第3题:
在窗体上画一个名称为 \"Command1\" 的命令按钮,然后编写如下事件过程:
Private Sub Command1_Click()
Dim a As String
A="123456789"
For i=1 To 5
Print Space(6-i);Mid $ (a,______ ,2*i-1)
Next i
End Sub
程序运行后,单击命令按钮,窗体上的输出结果是
5
456
34567
2345678
123456789
请填空。
第4题:
在窗体上画一个命令按钮,其名称为Commandl,然后编写如下事件过程:
程序运行后,单击命令按钮,其输出结果为__________。
第5题:
在窗体上画一个命令按钮,然后编写如下事件过程:
Private Sub Command1_Click()
a=0
For i=1 To 3
For j=1 To 4
If j Mod 2<>0 Then
a=a+1
End If
a=a+1
Next j
Next i
Print a
End Sub
程序执行后,单击命令按钮,输出结果是【 】。
第6题:
在窗体上画一个命令按钮,然后编写如下事件过程: Private Sub Command1_Click() A="12" B="34" C="56" Print A+B+C End Sub 程序运行后,单击命令按钮,输出结果是( )。
A."123456"
B.123456
C.102
D.显示出错信息
第7题:
在窗体上画一个命令按钮,然后编写如下事件过程:
Private Sub Command1_Click()
For i=1 To 4
x=4
For j=1 To 2
x=x+6
Next
Next
Print x
End Sub
程序运行后,单击命令按钮,输出结果是
A.12
B.13
C.16
D.17
第8题:
在窗体上画1个名称为Command1的命令按钮,然后编写如下事件过程: Private Sub Command1 Click() a=0 For i=1 To 2 For j=1 To 4 If j Mod 2<>0 Then a=a-1 End If a=a+1 Next j Next i Print a EndSub 程序运行后,单击命令按钮,输出结果是______。
A.0
B.2
C.3
D.4
第9题:
在窗体上画一个命令按钮,然后编写如下事件过程:
Private Sub Command1_Click()
Do Whileb>=0
c=a+b
Loop
End Sub
程序运行后,依次输入3,2,1,0,-1,-2,则输出结果是( )。
第10题:
在窗体上画一个命令按钮,其名称为Commandl,然后编写如下事件过程:
程序运行后,单击命令按钮,消息框输出的是系统当前日期和当前时间。