[单项选择题] 在窗体上画一个命令按钮,然后编写如下事件过程:
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.出错信息
[单项选择题] 在窗体上画一个命令按钮,然后编写如下事件过程:
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中元素的值。
VIP截止日期:2025-01-02 13:32:56
←请使用支付宝扫码支付VIP截止日期:2025-01-02 13:32:56
←请使用微信扫码支付