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

突出煤层突出危险区不呈条带分布。