解释一下代码

[「已注销」]

Function F(n As Integer) As Single
  If n > 1 And n <= 30 Then
    F = n * F(n - 1)
  Else
    F = 1
  End If
End Function
Private Sub Command1_Click()
  Text2.Text = F(Val(Text1.Text))
End Sub

谁能帮我解释一下这代码什么意思，，，有点看不懂

[threenewbee]

递归方式计算30以内的阶乘

[「已注销」]

引用 2 楼 caozhy的回复:

递归方式计算30以内的阶乘

能不能帮忙解释下什么是递归

[threenewbee]

引用 3 楼 ndm ° 的回复:

[quote=引用 2 楼 caozhy的回复:]递归方式计算30以内的阶乘

能不能帮忙解释下什么是递归[/quote] 自己调用自己。你在f这个函数内调用了f就是递归。