单项选择题

在窗体上画一个名称为command1的命令按钮,然后编写如下程序;
Option Base 1
Private Sub Command1_Click()
Dim arr(4)As String
For i=1 To 4
arr(i) = Chr(Asc("A")+(i-1))
Next i
For Each b1 In arr
Print b1;
Next
End Sub
程序运行后,如果单击命令按钮,则在窗体上输出的内容为 ______。

A.ABCD
B.abcd
C.出错信息
D.1 2 3 4