[单项选择题] 在窗体上有一个命令按钮，然后编写如下事件过程： 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 　　　　Print b；　　Next End Sub 程序运行后，单击命令按钮，输出结果是

A．ABCDE
B．12345
C．abcde
D．出错信息

参考答案： A

● 参考解析

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

当前位置：IT认证＞BASIC题库

[单项选择题] 在窗体上有一个命令按钮，然后编写如下事件过程： Private Sub Command1_Click() Dim a(5)As String FOR i=1 To 5 a(i)=Chr(Asc(&quot;A&quot;)+(i-1)) Next For Each b In a Print b； Next End Sub 程序运行后，单击命令按钮，输出结果是

相关题目: