在窗体上画一个命令按钮,然后编写如下事件过程: Private Sub Command1_Click() Dim a(5)As String For i=1 T0 5 a(i)=Chr(Asc("A"

admin2013-01-23  33

问题 在窗体上画一个命令按钮,然后编写如下事件过程:    Private Sub Command1_Click()        Dim a(5)As String        For i=1 T0 5            a(i)=Chr(Asc("A")+(i-1))        Next i        For Each b In a            Print b;        Next    End Sub    程序运行后,单击命令按钮,输出结果是______。

选项 A、ABCDE
B、1 2 3 4 5
C、abode
D、出错信息

答案A

解析 本程序段首先定义了一维数组a,然后用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中元素的值。
转载请注明原文地址:https://jikaoti.com/ti/nwO0FFFM
0

最新回复(0)