在窗体上画一个命令按钮,然后编写如下事件过程:Private Sub Command1_Click()Dim a(5) As StringFor i = 1 To 5a(i) = Chr(Asc("A") + (i - 1))Next iFor Each b In aPrint b;NextEnd Sub程序运行后,单击命令按钮,输出结果是( )。A.ABCDEB.1 2 3 4 5C.abcdeD.出错信息

题目

在窗体上画一个命令按钮,然后编写如下事件过程:

Private Sub Command1_Click()

Dim a(5) As String

For i = 1 To 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.abcde

D.出错信息


相似考题
更多“在窗体上画一个命令按钮,然后编写如下事件过程: PrivateSubCommand1_Click() Dima(5)AsS ”相关问题
  • 第1题:

    在窗体上画一个命令按钮,名称为Command1,然后编写如下事件过程:

    Private Sub Command1_Click()

    Dim a()

    a=Array("机床","车床","钻床","轴承")

    Print a(2)

    End Sub

    程序运行后,如果单击命令按钮,则在窗体上显示的内容是( )。

    A.机床

    B.车床

    C.钻床

    D.轴承


    正确答案:C
    解析:本题考查VBA中数组的知识。数组变量由变量名和数组下标构成,我们通常使用Dim语句来定义数组,其中下标下限缺省值为0。本题中的a(2)就是数组的第三个元素即“钻床”。

  • 第2题:

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

    A.ABCDE

    B.1 2 3 4 5

    C.abcde

    D.出错信息


    正确答案:A

  • 第3题:

    在窗体上画一个命令按钮,然后编写如下事件过程: 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中元素的值。

  • 第4题:

    在窗体上画一个命令按钮,然后编写如下事件过程: Private Sub Command1_Click( ) Dim a( ) a = Array( 1, 3, 5, 7) s=0 For i = 1 To 3 s=s*10+a(i) Next i Print s End Sub程序运行后,输出结果为( )。

    A.135

    B.357

    C.531

    D.753


    正确答案:B
    解析:程序中的Array是给一维数组赋初值的函数。需要注意,它只能给一维数组赋初值,数组只能是变体类型;赋值号只需写上数组名,不要写上括号。程序中For循环控制的初值从1开始,可见a(i)的取值依次是3、5、7,而不是1、3、5,所以程序运行的结果是选项B。

  • 第5题:

    在窗体上画一个命令按钮,名称为Command1,然后编写如下事件过程: Private Sub Command1_Click() Dim a() a=Array("机床","车床","钻床","轴承")Print a(2) End Sub 程序运行后,如果单击命令按钮,则在窗体上显示的内容是( )。

    A.机床

    B.车床

    C.钻床

    D.轴承


    正确答案:C
    解析: 本题考查VBA中数组的知识。数组变量由变量名和数组下标构成,我们通常使用Dim语句来定义数组,其中下标下限缺省为0。本题中的a(2)就是数组的第三个元素即“钻床”。