在窗体画一个命令按钮,然后编写如下事件过程:Private Sub Commandl Click()Dim a(5)As StringFor

在窗体画一个命令按钮，然后编写如下事件过程： Private Sub Commandl 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．出错信息

A解析：语句Chr(Asc("A")+(i-1))的作用是将字符A的ASCII码值加上循环变量的值减1，求出此ASCII码对应的字符。将计算出的字符赋值给数组arr的第i个元素。循环结束后，arr的5个元素分别为字符ABCDE。Print方法输出项的最后用分号结束，使得输出不换行。