4.5.1从裴波那契的兔子问题看递归算法学案VisualBasic环境下用递归算法解决裴波那契的兔子问题请观看微课。任务4：在VB语言环境下用递归算法求n!，如图递归算法（任务1）其他算法（任务2）编写程序FunctionFib(ByValNAsInteger)AsLongIfN<3ThenFib=1Else:Fib=Fib(N-1)+Fib(N-2)EndFunctionPrivateSubCommand1_Click()N=Val(Text1.Text)Text2.Text="第"&N&"月的兔子对数是："&Fib(N)EndSubPrivateSubCommand1_Click()n=Val(Text1.Text)Ifn<3Thenc=1‘每月的兔子对数Elsea=1:b=1‘a每月小兔子b每月大兔子Fori=3Tonc=a+b:a=b:b=cNextiEndIfPrintcEndSub任务3（比较两种算法的效率）N=12时，运行所用时间N=40时，运行所用时间
