[单项选择题] 为计算1+2+22+23+24+…+210的值，并把结果显示在文本框Text1中，若编写如下事件过程： Private Sub Command1

[单项选择题] 为计算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

s=s+a

Next k

Text1.Text=S

End Sub

执行此事件过程后发现结果是错误的，为能够得到正确结果，应做的修改是( )

A．把s=1改为s=0

B．把For k=2 To 10改为For k=1 To 10

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

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

D

本题程序利用了"1+2+22+…+2n"=2*(1+2+22+…+2n-1)+1，所以应同时进行B和C两种修改。