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中显示的内容是:( )
下列各句中,没有语病的一项是( )