某VB的事件过程如下：
Private Sub Command1_Click()
Dim a As Integer
a = Val(Text1.Text)
a =" 2" * a + 1
Text1.Text = StrA.
End Sub
程序运行时，在文本框Text1中输入2，连续三次单击命令按钮Command1后，Text1中显示的内容是（   ）
A.47     B.5     C. 11     D. 23