单选题为计算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
执行此事件过程后发现结果是错误的，为能够得到正确结果，应做的修改是{{U}} {{/U}}

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两种修改。