填空题
执行下列程序,单击Command1按钮后,窗体上显示的第一行内容是
1,第三行内容是
2,最后一行内容是
3。
Option Explicit
Private Sub Command1_Click()
Dim n As Integer
n=6
Print n; f(n)
End Sub
Private Function f(n As Integer) As single
If n=0 Then
f=0
Else
f=f(n-2)*3+10
End If
Print n; f
End Function