单项选择题

在窗体上画一个命令按钮，然后编写如下事件过程：
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．出错信息
<上一题 目录 下一题>
热门 试题

单项选择题
在窗体上画一个名称为Command1的命令按钮，然后编写如下事件过程： Private Sub Command1_Click() Dim num As Integer num=1 Do Until num＞6 Print num； num=num+2.4 Loop End Sub 程序运行后，单击命令按钮，则窗体上显示的内容是
A．1 3.4 5.8
B．1 3 5
C．1 4 7
D．无数据输出
单项选择题
阅读程序： Option Base 1 Private Sub Form Click() Dim arr，Sum Sum= 0 arr=Array(1，3，5，7，9，11，13，15，17，19) For i=1 To 10 If arr(i) 3=arr(i) 3 Then Sum=Sum+arr(i) End If Next i Print Sum End Sub 程序运行后，单击窗体，输出结果为
A．13
B．14
C．27
D．15
相关试题