Vb编程问题？

私有子命令1_click()

cls

dim f(20)为整数

将I标注为整数

整数形式的点心

f(1)=1

f(2)=1

对于i=3到20

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

然后

总和=0

对于i=1到20

打印“第一”；我；"项目:"；答(一)

sum = sum+a(I)；

然后

打印“序列中前20项的总和等于:”；总和

末端接头

如果你有任何问题，请留言。