问题
单项选择题
在窗体上有一个命令按钮，然后编写如下事件过程：
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
Printb：
Next
End Sub
程序运行后，单击命令按钮，输出结果是( )。
A) ABCDE
B) 12345
C) abcde
D)出错信息
答案
参考答案：A
解析： 本题考查数组的赋值操作及For Each…In循环语句。本程序段首先定义了一个一维数组变量，然后用For循环为其赋值，Asc()函数的作用是返回字符的ASCⅡ码，字符“A”的ASCⅡ码为65，Chr()函数的作用是将ASCⅡ码值变为相应的字符，而a(i)= Chr(Asc(“A”)+(i-1))的作用是将每次比原来大1的ASCⅡ码值变为字符赋给a，所以a的元素是“A，B，C，D，E”。For Each…In用于输出a中元素的值，所以正确答案是选项A)。