2015年7月29日，非洲东部法属留尼汪岛发现一飞机残骸，媒体分析其为去年失事的马航MH370客机残骸。下图为MH370最后搜索地点和残骸发现地点及留尼汪岛图。下列关于留尼汪岛说法正确的是（      ）

Private Sub Command1_Click()

Dim a as Integer

a=Val(Text1.text) ‘将文本框中的数字文本转换成数值

a=2*a+1

Text1.text = StrA.

End Sub

程序运行时在文本框Text1中输入1，连续两次单击命令按钮Command1后，Text1中显示的内容是：（   ）