为计算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 　　s2 s+a 　　 Next k 　　Text1．Text=s 　　End Sub 　　执行此事件过程后发现结果是错误的，为能够得到正确结果，应做的修改是()。

A．把s=1改为s=0

B．把For k=2 T0 10改为For k=1 T0 10

C．交换语句s=s+a和a=a*2的顺序

D．同时进行B、C两种修改