在窗体上有一个命令按钮，然后编写如下事件过程： 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．黄白色灰暗斑块