[单项选择题] 在窗体上画一个名称为command1的命令按钮，然后编写如下程序； Option Base 1 Private Sub Command1

[单项选择题] 在窗体上画一个名称为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

A

语句Chr(Asc("A")+(i-1))的作用是将字符A的ASCII码值加上循环变量的值减1，求出此ASCII码对应的字符。将计算出的字符赋值给数组arr的第i个元素。循环结束后，arr的4个元素分别为字符A、B、C、D。Print方法输出项的最后用分号结束，使得输出不换行。