为计算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）两种修改