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中显示的内容是：（ ）
A：7
B：5
C：3
D：1
阅读下列材料:材料一 “凡未经议会同意，以国王权威停止法律或停止法律实施，为非法行为”材料二 拿破仑说：“我真正的光荣并非打了40次胜仗，滑铁卢之战抹去了这一切的记忆。但有一样东西是不会被人忘却的，它将永垂不朽…”
临近考试，李明出现了焦虑情绪。在老师的指点下他选择了上QQ向好朋友倾诉的方式来排解自己的不良情绪。这种调控情绪的方法是（ ）
当北印度洋的季风洋流呈顺时针流动时 ( )
下列关于生命起源和生物进化的叙述中，不正确的是（ ）
①废除哈里发制度 ②进行军事改革 ③建立近代工业 ④实行教育改革
