Question

怎么用vb表达数列的前10个数,每个数的和等于前2个数之和.比如1、1、2、3、5

Answer 1

代码如下：

Private Sub Command1_Click()

Dim a(10) As Integer

a(1) = 1

a(2) = 1

For i = 3 To 10

a(i) = a(i - 2) + a(i - 1)

Next i

For i = 1 To 10

Print a(i);

Next i

End Su