单项选择题
为计算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．两种修改