在窗体上画一个名称为Command1的命令按钮,然后编写如下程序: Option Base 1 Private Sub Command1_Click() Dim arr(5)As String For i=1 To 5

admin2009-01-15  38

问题 在窗体上画一个名称为Command1的命令按钮,然后编写如下程序:    Option Base 1    Private Sub Command1_Click()       Dim arr(5)As String     For i=1 To 5         art(i)=Chr(Asc("A")+(i-1))     Next i     For Each b1 In arr         Print b1;     Next    End Sub    程序运行后,如果单击命令按钮,则在窗体上输出的内容为 ______。

选项 A、ABCDE
B、abcde
C、出错信息
D、1 2 34 5

答案1

解析 语句Chr(Asc("A")+(i-1))的作用是将字符A的ASCII码值加上循环变量的值减1,求出此ASCII码对应的字符。将计算出的字符赋值给数组arr的第i个元素。循环结束后,arr的5个元素分别为字符A、B、 C、D、E。Print方法输出项的最后用分号结束,使得输出不换行。
转载请注明原文地址:https://jikaoti.com/ti/3280FFFM
0

最新回复(0)