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

上消化道出血可见（）

A.黏液、脓血便

B.水样便

C.米泔样便

D.白陶土样便

E.柏油样便