题库 高中信息
题干
观察如下VB程序段：
Function fx(n As Integer) As Long
If n＝1 Then
fx＝1
Else
fx＝2*fx(n－1)
End If
End Function
Private Sub Command1_Click()
Dim n As Integer，x As Long
n＝Val(Text1.Text)
x＝fx(n)
Text2.Text＝Str(x)
End Sub
若在文本框Text1中输入数字5，单击命令按钮Command1后，在文本框Text2显示的内容为( )
Function fx(n As Integer) As Long
If n＝1 Then
fx＝1
Else
fx＝2*fx(n－1)
End If
End Function
Private Sub Command1_Click()
Dim n As Integer，x As Long
n＝Val(Text1.Text)
x＝fx(n)
Text2.Text＝Str(x)
End Sub
若在文本框Text1中输入数字5，单击命令按钮Command1后，在文本框Text2显示的内容为( )
| A．2 | B．8 | C．16 | D．32 |
答案(点此获取答案解析）
相关知识点