为计算1+2+22+23+24+…+210的值，并把结果显示在文本框Text1中，若
题型：单项选择题
问题：
为计算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）两种修改