在窗体上画一个名称为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