在窗体上有一个命令按钮，然后编写如下事件过程。
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 h a
Print b；
Next
End Sub
程序运行后，单击命令按钮，输出结果是

A．ABCDE

B．1 2 3 4 5

C．abcde

D．出错信息

如何识别和消减现场井控风险？