利用递归思想解决问题

研究问题：求0-100的和
Private Sub Command1_Click()

Print Str(f(100))

End Sub

Function f(n As Integer) As Integer

If n = 1 Then

   f = 1

Else

   f = n + f(n - 1)

End If
End Function
过程的递归应用是一种特殊的过程嵌套，此思想运用的是一个过程调用过程本身。当一个大问题分解成同类型的小问题时，问题的规模在逐渐减小，而且小问题的解法与原来大问题的解法相同。另外此题有明确的结束递归的条件，所以运用递归思想解题过程更加简洁。