农农摘桃子。农农家的院子里有一棵桃子树，每到秋天树上都会结出很多桃子（假设桃子距地的高度为50—300厘米）。桃子成熟的时候，农农就会跑去摘桃子（假设农农碰到桃子，桃子就会掉下来）。农农有个30厘米高的板凳，当他不能直接用手摘到桃子的时候，就会踩到板凳上再试试。如果今天树上有10个成熟的桃子，请帮农农算一下他能够摘到多少个桃子。
（1）程序运行时界面如图所示，List1中桃子的高度数据由计算机随机产生，Text1中输入农农手伸直的最大高度，Text2中显示农农摘到的桃子数目。
设计如图所示应用程序界面时，应在图中所示的“属性窗口”中，将Form1的__________________属性设置为“农农摘桃子”；为添加列表框List1，应使用图中所示的“控件工具箱”中的______________（填写相应编号）。
（2）“开始摘果”按钮单击事件处理过程的流程图如图所示。请根据流程图将下列程序补充完整。
①___________________ ②___________________
Private Sub Command1_Click()
Dim a(1 To 10) As Integer,
Dim h As Integer, i As Integer, t As Integer
Randomize '初始化Rnd函数
h = Val(Text1.Text)
t=0
For i =" 1" To 10
'随机产生桃子的高度(50-300厘米)
a(i) =" Int(Rnd" * 251) +50
List1.AddItem "桃子"+Str(i)+"高度:"+Str(a(i))
If
① Then t =" t" + 1
Next i
② End Sub
