vb递归算法原理请问用递归法怎样写VB语句? 还有VB中的递归法是怎样的？

2021-03-14

1593

请问用递归法怎样写VB语句? 还有VB中的递归法是怎样的？Private Sub Form数load（）Dim i As Long，n As integer n=int（val（inputbox（“F

请问用递归法怎样写VB语句? 还有VB中的递归法是怎样的？

Private Sub Form数load（）Dim i As Long，n As integer n=int（val（inputbox（“Fibonacci”“Fibonacci”））For i=

1 To n Print Fibonacci（i）NextEnd SubPrivate Function Fibonacci（n As Long）As Long If n=1 Then Fibonacci=1 ElseIf n=

2 Then Fibonacci=1 Else Fibonacci=Fibonacci（n-1）Fibonacci（n-2）End IfEnd函数