在窗体上有一个命令按钮,然后编写如下事件过程: 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

admin2010-11-20  56

问题 在窗体上有一个命令按钮,然后编写如下事件过程:
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、1  2  3  4  5
C、abcde
D、出错信息

答案A

解析 本题考查数组的赋值操作及For Each…In循环语句。本程序段首先定义了一个一维数组变量,然后用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…In用于输出a中元素的值,所以正确答案是选项A。
转载请注明原文地址:https://jikaoti.com/ti/TeO0FFFM
0

随机试题
最新回复(0)