单项选择题

为计算1⁰+2¹+2²+2³+2⁴+…+2¹⁰的值，并把结果显示在文本框Text1中，若编写如下事件过程：
Private Sub Command1_Click()
Dim a%，s%，k%
s=1
a=2
For k=2 To 10
a=a*2
Next k
Text1.Text=s
End Sub
执行此事件过程后发现结果是错误的，为能够得到正确结果，应做的修改是（）

点击查看答案&解析