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

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

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栏目都是好人. --------------------编程问答-------------------- 总结一下：a(0)=a(1)=0,a(n)=a(n-1)+a(n-2),n>=2.这是著名的斐波那齐数列 --------------------编程问答-------------------- 几乎C++的教材都有这个例子！ --------------------编程问答-------------------- 1,1,2,3,5,8,13,21,用VB做,求第N组的数是多少,那应该怎么做啊,楼上的大哥!! --------------------编程问答-------------------- 把上面程序里的10换成你的N就行了. --------------------编程问答-------------------- 1,1,2,3,5,8,13,21,用VB做,求第N组的数是多少,控件怎么安排啊????
麻烦大哥们了,我这是作业啊,完不成就挨打!!!谢谢大家了!!! --------------------编程问答-------------------- 楼上已经说的很明白了，这个就是斐波那齐数列，用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
找本书好好看看吧。 --------------------编程问答--------------------

引用 1 楼 qianjin036a 的回复:

VB.NET codePrivate 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栏目都是好人.

确实感受到了最后一句是实话,"用不着跪求的,VB栏目都是好人..." 敬礼..!

补充：VB ,  基础类