1. 窗体上有一个名称为List1的列表框，一个名称为Text1的文本框，一个名称为Label1、Caption属性为“Sum”的标签，一个名称为Command1、标题为“计算”的命令按钮。程序运行后，将把1～100之间能够被7整除的数添加到列表框。如果单击“计算”按钮，则对List1中的数进行累加求和，并在文本框中显示计算结果，如图所示。以下是实现上述功能的程序，请填空。

Private Sub Form_Load()

For i=1 To 100

If i Mod 7 =0 Then

_【 1_】__

End If

Next i

End Sub

Private Sub Command1_Click()

Sum =0

For i=0 To__【 2_】__

Sum =Sum+_【_3 】_____

Next i

Text1.Text=Sum

End Sub

2.按存储信息的形式分类，文件可以分为【 4 】和【 5 】。

3. 以下语句输出结果是 【 6 】 。

Print Int(12345.6789 * 100 + 0.5) / 100。

4.数学表达式 的VB算术表达式为【 7 】。

5.表达式Lcase(left(“ABCDEFG”,5)的值是【 8 】。

6.设有如下程序：

Option Base 1

Private Sub Command1_Click()

Dim arr1

Dim Min As Integer, i As Integer

arr1 = Array(12, 435, 76, -24, 78, 54, 866, 43)

Min = 【9】

For i = 2 To 8

If arr1(i) < Min Then 【10】

Next i

Print "最小值是："; Min

End Sub

以上程序的功能是：用Array函数建立一个含有8个元素的数组，然后查找并输出该数组中各元素的最小值。请填空。

（1）list1.additem i 　  list1.listcount-1   list1.list(i)

（2）ASCII文件 二进制文件

（3）12345.68

（4）Sqrt(x)/2/(x+y)+3^2-3*x

（5）abcdef

（6）Array(1)  min=array(1)