问题
单项选择题
在窗体上画一个名称为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方法输出项的最后用分号结束，使得输出不换行。