跪求!!!跪求!!!跪求!!!跪求!!!跪求!!!跪求!!!跪求!!!小弟是绝对的新手!!!!

Question

 1,1,2,3,5,8.13,21是个什么数列,用VB怎么做啊,大虾指教一下!!!

Answer 1

Private Sub Command1_Click()
Dim a As Integer, b As Integer, c As Integer
Dim i As Integer
a = 0
b = 1
For i = 1 To 10
    Print b
    c = a + b
    a = b
    b = c
Next i
End Sub用不着跪求的,VB栏目都是好人.

Answer 2

总结一下：a(0)=a(1)=0,a(n)=a(n-1)+a(n-2),n>=2.这是著名的斐波那齐数列

Answer 3

1,1,2,3,5,8,13,21,用VB做,求第N组的数是多少,那应该怎么做啊,楼上的大哥!!

Answer 4

1,1,2,3,5,8,13,21,用VB做,求第N组的数是多少,控件怎么安排啊????
麻烦大哥们了,我这是作业啊,完不成就挨打!!!谢谢大家了!!!

Answer 5

楼上已经说的很明白了，这个就是斐波那齐数列，用1楼的程序编写就可以了。你可以添加两个文本框，一个输入要求的N，一个输出结果。添加一个命令按钮，代码如下：
Private Sub Command1_Click()
Dim a As Integer, b As Integer, c As Integer, n As Integer
Dim i As Integer
a = 0
b = 1
n = Val(Text1.Text)
For i = 1 To n
  
    c = a + b
    a = b
    b = c
      Print b
Next i
Text2.Text = Val(b)
End Sub
找本书好好看看吧。