如何编程实现斐波那契数列

1、启动vb6，执行文件-新建工程命令，在弹出的对话框中选择第一个标准exe文件，点击确定进入窗口编辑区域。

3、在窗口中创建frame控件，修改其caption属性值为空，并调整其大小和位置使其布局美观。

5、在窗体创建image控件，点击其picture属性，弹出对话框，找到图片所存放的位置，点击打开命令。

7、在窗体上创建2个commmand控件，调节其大小和位置，并修改其caption属性值依次为“兔子总对数”，“退出”。

9、在代码区域输入代码内容Text2.Text = tuzizongshu(Text1.Text)，接着重新选择对象为通用，输入自定义函数Private Function tuzizongshu(ByVal intMonth As Integer) As Integer If intMonth = 1 Then '第1个月,新生兔子为1对 tuzizongshu = 1 ElseIf intMonth = 2 Then '第2个月,新生兔子为1对 tuzizongshu = 1 Else '第3月起,新生兔子为前两月新生兔子之和 tuzizongshu = tuzizongshu(intMonth - 1) + tuzizongshu(intMonth - 2) End IfEnd Function

12、执行文件-生成工程命令，在弹出对话框中输入“斐波那契”，然后点击确定按钮，这样就生成了可执行程序“斐波那契.exe”文件。