[问答题] 完成下列问题：在考生文件夹下有工程文件sjt4.vbp，其中的列表框中已经有2个选项(均为数字)。 程序功能是在文本框中输入一个整数n(例如30)，单击命令按钮，则在列表框中追加若干数字

[问答题] 完成下列问题：

在考生文件夹下有工程文件sjt4.vbp，其中的列表框中已经有2个选项(均为数字)。

程序功能是在文本框中输入一个整数n(例如30)，单击命令按钮，则在列表框中追加若干数字，所有追加的数字按以下规律排列：每个数是前面两个数之和，最后一个数是满足上述规律的最大的小于n的数。如图6所示。若再输入一个更大的整数(例如100)，单击命令按钮，则按上述规律继续追加数字。如图7所示。

程序已经给出但不完整，请将其中的注释符去掉，在横线处填写正确的内容，以实现上述程序功能。

注意：考生不得修改窗体文件中已经存在的控件和程序，最后程序按原文件名存盘。

[题目提供的源程序]

Private Sub Command1_Click()

Dim a%, b%, c%, n%

n=Val(Text1.Text)

a=Val( (1) )

b=Val(List1.List(List1.ListCount-1))

c=a+b

Do While c＜n

a= (2)

b=c

List1.AddItem (3)

c=a+b

Loop

End Sub