有一个数列，它的前3个数为0，1，1，此后的每个数都是其前面3个数之和，即0，1，1，2，4，7，13，24，……要求编

有一个数列，它的前3个数为0，1，1，此后的每个数都是其前面3个数之和，即

0，1，1，2，4，7，13，24，……

要求编写程序输出该数列中所有不超过1000的数。

某人编写程序如下：

Private Sub Form_Click()

Dim i As Integer，a As Integer，b As Integer

Dim C As Integer，d As Integer

a=0：b=1：c=1

d=a+b+C

i=5

While d＜=1000

Print d；

a=b：b=C：C=d

d=a+b+c

i=i+1

Wend

End Sub

运行上面的程序，发现输出的数列不完整，应进行修改。以下正确的修改是

A．把While d＜=1000改为While d＞1000

B．把i=5改为i=4

C．把i=i+1移到While d＜=1000的下面

D．在i=5的上面增加一个语句：Print a；b；c；