题库 高中信息
题干
某 VB 的事件过程如下：
Private Sub Command1_Click()
Dim a As Integer
a = Val(Text1.Text)
a = 3 * a + 1
Text1.Text = Str(a)
End Sub
程序运行时，在文本框 Text1 中输入 1，连续两次单击命令按钮 Command1 后，文本框 Text1中显示的内容是（ ）
Private Sub Command1_Click()
Dim a As Integer
a = Val(Text1.Text)
a = 3 * a + 1
Text1.Text = Str(a)
End Sub
程序运行时，在文本框 Text1 中输入 1，连续两次单击命令按钮 Command1 后，文本框 Text1中显示的内容是（ ）
| A．13 | B．9 | C．4 | D．1 |
答案(点此获取答案解析）
相关知识点