在窗体上有一个命令按钮,然后编写如下事件过程。 Private Sub Command1_Click()Dim a(5)As String

15 查阅

在窗体上有一个命令按钮,然后编写如下事件过程。

Private Sub Command1_Click()

Dim a(5)As String

FOR i=1 To 5

a(i)=Chr(Asc("A")+ (i-1))

For Each b In a

Print b;

End Sub

程序运行后,单击命令按钮,输出结果是

A．ABCDE

B．1 2 3 4 5

C．abcde

D．出错信息

参考答案:

A解析：本题考查数组的赋值操作及For Each匢n循环语句。本程序段首先定义了一个一维数组变量,然后用For循环为其赋值,Asc()函数的作用是返回字符的ASCII码,字符"A"的ASCII码为65,Chr()函数的作用是将ASCII码值变为相应的字符,而"a(i) = Chr(Asc("A") + (i - 1))"的作用是将每次比原来大1的ASCII码值变为字符赋给 a,所以 a的元素是"A,B,C,D,E"。For Each匢n用于输出 a中元素的值,所以正确答案是选项A)。

计算机二级