为计算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) 把For k = 2 To 10改为For k = 1 To 10、交换语句s=s+a和a=a*2的顺序