为计算1+2+22+23+24+…+210的值,并把结果显示在文本框Text1中,若编写如下事件过程: Privme Sub CommandL_Click() Dim ao/0,b%,i% s=1:a=2 For i=2 To 10

admin2018-09-19  27

问题 为计算1+2+22+23+24+…+210的值,并把结果显示在文本框Text1中,若编写如下事件过程:
Privme Sub CommandL_Click()
    Dim ao/0,b%,i%
    s=1:a=2
    For i=2 To 10
     a=a*2:b=b+a
    Next i
Text1.Text=b
    End Sub
    执行此事件过程后发现结果是错误的,为能够得到正确结果,应做的修改是(    )。

选项 A、把b=1改为b=0
B、把For k=2 To 10改为For i=1 To 10
C、交换语句b=b+a和a=a*2的顺序
D、同时进行
E、B)

答案D

解析 本题事件过程原代码计算的是:1+22+23+24+…+210共10个数的值,其中缺少一项,即数2。为此应将循环次数由9次修改为10次,即For i=1 To 10,但同时需交换语句b=b+a和a=a*2的顺序,否则将计算表达式:1+22+23+24+…+210+211的值。
转载请注明原文地址:https://kaotiyun.com/show/hmFp777K
0

最新回复(0)