在窗体上画四个文本框(如下图所示)，并用这四个文本框建立一个控件数组，名称为 Text1(下标从0开始，自左至右顺序增大)，然后编写如下事件过程 Private Sub Commandl_Click() For Each TextBoxinTextl Text1(i)=Text1(i).Index i=i+1 Next End Sub 程序运行后，单击命令按钮，四个文本框中显示的内容分别为( )。A．0 1 2 3B．1 2 3 4C．0 1 3 2D．出错信息

题目

在窗体上画四个文本框(如下图所示)，并用这四个文本框建立一个控件数组，名称为 Text1(下标从0开始，自左至右顺序增大)，然后编写如下事件过程 Private Sub Commandl_Click() For Each TextBoxinTextl Text1(i)=Text1(i).Index i=i+1 Next End Sub 程序运行后，单击命令按钮，四个文本框中显示的内容分别为( )。

A．0 1 2 3

B．1 2 3 4

C．0 1 3 2

D．出错信息

相似考题

1.（28）在窗体上画4个文本框，并用这4个文本框建立一个控件组，名称为Text1(下标从0开始，自左至右顺序增大)，然后编写下列事件过程：Private Sub Command1_Click() For Each TextBox In Text1 Text1(i)=Text1(i).Index i=i+1 Next End Sub程序运行后，单击命令按钮，4个文本框中显示的内容分别为A.0 1 2 3 B.1 2 3 4 C.0 1 3 2 D.出错信息

2.在窗体上画4个文本框(如图16-8所示)，并用这4个文本框建立一个控件数组，名称为Text1(下标从0开始，自左至右顺序增大)，然后编写如下事件过程： Private Sub Command1_Click() For Each TextBox In Text1 Text1(i)=Text1(i). Index i=i+1 Next End Sub 程序运行后，单击命令按钮，4个文本框中显示的内容分别为______。A．0 1 2 3B．1 2 3 4C．0 1 3 2D．出错信息

3.在窗体上画4个标签(如图所示)，并用这四个标签建立一个控件数组，名称为Label1(下标从0开始．自左至右顺序增大)，然后编写如下事件过程：程序运行后，单击命令按钮，四个标签框中显示的内容分别为 A．0 1 2 3B．0 2 4 6C．2 4 6 8D．出错信息

4.在窗体上画四个文本框，并用这四个文本框建立一个控件数组，名称为Text1(下标从0开始，依次增大)，然后编写如下事件过程： Private Sub Command1_Click() For Each TextBox In TeXt1 Text1(i)=Text1(i).Index i=i+1 Next End Sub 程序运行后，单击命令按钮，四个文本框中显示的内容分别为 ______。A．0 1 2 3B．1 2 3 4C．0 1 3 2D．出错信息

更多“ 在窗体上画四个文本框(如下图所示)，并用这四个文本框建立一个控件数组，名称为 Text1(下标从0开始，自左至右顺序增大)，然后编写如下事件过程 Private Sub Commandl_Click() For ”相关问题

  • 第1题：

    在窗体上画二个名称为Text1的文本框和一个名称为Command1的命令按钮，然后编写如下事件过程：

    程序运行后，单击命令按钮，在文本框中显示的值是

    A．2

    B．3

    C．4

    D．5


    正确答案：B
    题只能计算当i>1所循环的次数。注意i在循环体内被强行加3，到For循环时．还要再加步长1，这相当于因此，n=3。选择B。

  • 第2题：

    在窗体上画4个文本框，并用这4个文本框建立一个控件数组，名称为Text1 (下标从0开始，自左至右顺序增大)，然后编者按写如下事件过程： Private Sub Command1_Cliek() For Each TextBox In Text1 Text1(i)=Text1(i).Index i=i+1 Next End Sub 程序运行后，单击命令按钮，4个文本框中显示的内容分别为( )。

    A．0 1 2 3

    B．1 2 3 4

    C．0 1 3 2

    D．出错信息


    正确答案：A
    解析：数组控件的Index属性默认从。开始，因此这4个文本框的Index值分别为0、1、2、3。题中通过For Each循环，依次将每个文本框的Index属性值赋给它自己的Text属性，因此，运行程序后，文本框显示的内容为0、1、2、3。

  • 第3题：

    在窗体上画一个文本框(其Name属性为Text1)，然后编写如下事件过程： Private Sub Form_Load() TextText= " " TextSetFocus For i=1 To 10 Sum=Sum+i Next i TextText=Sum End Sub 上述程序的运行结果是 ______。

    A．在文本框Text1中输出55

    B．在文本框Text1中输出0

    C．出错

    D．在文本框Text1中输出不定值


    正确答案：C
    解析：焦点只能移到可视的窗体或控件。因为在窗体的Load事件完成前窗体或窗体上的控件是不可视的，所以如果不是在Form_Load事件过程完成之前首先使用Show方法显示窗体的话，是不能使用SetFocus方法将焦点移至正在自己的Load事件中加载的控件上的。

  • 第4题：

    在窗体上画4个文本框，并用这4个文本框建立一个控件数组，名称为Text1(下标从0开始，自左至右顺序增大)，然后编写下列事件过程：

    Private Sub Command1_Click()

    For Each TextBox In Text1

    Text1(i)=Text1(i).Index

    i=i+1

    Next

    End Sub

    程序运行后，单击命令按钮，4个文本框中显示的内容分别为( )。

    A．0 1 2 3

    B．1 2 3 4

    C．0 1 3 2

    D．出错信息


    正确答案：A
    解析：数组控件的Index属性默认从0开始，因此这4个文本框的Index值分别为0、1、2、3。题中通过 For Each循环，依次将每个文本框的Index属性值赋给它自己的Text属性，因此，运行程序后，文本框显示的内容为0、1、2、3。

  • 第5题：

    在窗体上画四个文本框（如图所示），并用这四个文本框建立一个控件数组，名称为Text1（下标从0开始，自左至右顺序增大），然后编写如下事件过程： Private Sub Command1_Click() For Each TextBox In Text1 Text1(i) = Text1(i).Index i = i + 1 Next End Sub 程序运行后，单击命令按钮，四个文本框中显示的内容分别为

    A．0 1 2 3

    B．1 2 3 4

    C．0 1 3 2

    D．出错信息


    正确答案：A
    解析：每个文本框里放的都是它自己的在控件数组里的下标，i=i+1只是起个步长变化的作用。

相关内容