为计算1+2+22+23+24+…+210的值，并把结果显示在文本框Text1中，若编写如下事件过程： Private Sub Command1 Click（ ） Dim a％，s％，k％ s=1 a=2 For k=2 To 10 a=a*2 s2 s+a Next k Text1．Text=s End Sub 执行此事件过程后发现结果是错误的，为能够得到正确结果，应做的修改是（ ）。A.把s=1改为s=0B.把For k=2 T0 10改为For k=1 T0 10C.交换语句s=s+a和a=a*2的

题目

为计算1+2+22+23+24+…+210的值，并把结果显示在文本框Text1中，若编写如下事件过程： Private Sub Command1 Click（ ） Dim a％，s％，k％ s=1 a=2 For k=2 To 10 a=a*2 s2 s+a Next k Text1．Text=s End Sub 执行此事件过程后发现结果是错误的，为能够得到正确结果，应做的修改是（ ）。

A.把s=1改为s=0

B.把For k=2 T0 10改为For k=1 T0 10

C.交换语句s=s+a和a=a*2的顺序

D.同时进行B、C两种修改

相似考题

1.在窗体上画一个文本框(其Name属性为Text1)，然后编写如下事件过程：Private Sub Form_Load()Text1.Text=""Text1.SetFocusFor i=1 To 9Sum=Sum=iNext iText1.Text=SumEnd Sub上述程序的运行结果是A．在文本框Text1中输出45B．在文本框Text1中输出0C． 出错D． 在文本框Text1中输出不定值

2.为计算10+21+22+23+24+…+210的值，并把结果显示在文本框Textl中，若编写如下事件过程：Private Sub Commandl_Click()Dim a％，s％，k％S=1a=2FOr k=2 To 10a=a*2S=S+aNext kText1，Text=sEnd Sub执行此事件过程后发现结果是错误的，为能够得到正确结果，应做的修改是A．把s=1改为s=0B．把For k=2 TO 10改为For k=1 To 10C．交换语句S=s+a和a=a*2的顺序D．同时进行B.C两种修改

3.在窗体上画一个文本框(其NAME属性为TExT1)，然后编写如下事件过程： PRIVATE SUB FORM_LOAD( ) DIM SUM TEXT1="" FOR I=1 TO 10 SUM=SUM+I NEXT I TEXT1=SUM END SUB上述程序的运行结果是( )。A．在文本框TEXT1中输出55B．在文本框TEXT1中输出0C．出错D．在文本框TEXT1中输出不定值

4.（ 27 ）为计算 1+2+22+23+24+ … +210 的值，并把结果显示在文本框 Text1 中，若编写如下事件过程 ：Private Sub Command1_Click()Dim a%,s%,k%s=1a=2For k=2 To 10a=a*2s=s+aNext kText1.Text=sEnd Sub执行此事件过程后发现结果是错误的，为能够得到正确结果，应做的修改是A ）把 s=1 改为 s=0B ）把 For k=2 To 10 改为 For k=1 To 10C ） 交换 语句 s=s+a 和 a=a*2 的顺序D ）同时进行 B ） 、 C ）两种修改

更多“为计算1＋2＋22＋23＋24＋…＋210的值,并把结果显示在文本框Text1中,若编写如下事件过程: Private Sub C ”相关问题

  • 第1题：

    在窗体上添加一个文本框Text 1，然后编写如下的Load事件过程，则程序运行结果为( )。 Private Sub Form_Load0 Text1. Text="" Text1. SetFocus For k = 1 To 5 t=t*k Next k Text1.Text = tEnd Sub

    A．在文本框中显示120

    B．文本框中仍为空

    C．在文本框中显示1

    D．出错


    正确答案：D
    解析：本题中“Text1.SetFocus”语句运行时会出现错误。因为焦点只能移到可视的窗体或控件，而在窗体的Load事件完成前窗体或窗体上的控件是不可视的，所以编译出错。如果不是在Form.Load事件过程完成之前首先使用Show方法显示窗体的话，是不能使用SetFocus方法将然点移至正在自己的Load事件中加载的窗体的。

  • 第2题：

    在窗体上画一个文本框(其Name属性为Text1),然后编写如下事件过程:

    Private Sub Form_load()

    Text1.Text=″″

    Text1.SetFocus

    For i=1 To 9

    Sum=Sum+i

    Next i

    Text1.Text=Sum

    End Sub

    上述程序的运行结果是

    A．在文本框Text1中输出45

    B．在文本框Text1中输出0

    C．出错

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


    正确答案：C
    解析：由于Form_load事件是在窗体加载时发生，所以此时窗体还没有显示，不能用"Tex1.SetFocus"语句获得焦点，故出错。如要改正，需要在此语句前加入"Me.Show"，显示窗体，则可以看到文本框已获得焦点，并执行循环语句，输出"45"。

  • 第3题：

    在窗体上添加一个文本框Text1，然后编写如下的Load事件过程，则程序运行结果为( )。 Private sub Form_Load() Text1.Text="" Text1.SetFocus For k=1 To 5 t=t*k Next k Text1.Text=t End Sub

    A．在文本框中显示120

    B．文本框中仍为空

    C．在文本框中显示1

    D．出错


    正确答案：D
    解析：本题中“Text1.SetFocus”语句运行时会出现错误。因为焦点只能移到可视的窗体或控件，而在窗体的Load事件完成前窗体或窗体上的控件是不可视的，所以编译出错。如果不是在Form.Load事件过程完成之前首先使用Show方法显示窗体的话，是不能使用SetFocus方法将焦点移至正在自己的Load事件中加载的窗体的。

  • 第4题：

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

    A．在文本框Text1中输出55

    B．在文本框Text1中输出0

    C．出错

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


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

  • 第5题：

    在窗体上画一个文本框(其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事件中加载的控件上的。

相关内容