计算机专业模拟卷
n = UBound(a)
For i = n To 2 Step -1 For j = 1 To n - 1 If a(j) < a(j + 1) Then
t = a(j): a(j) = a(j + 1): a(j + 1) = t End If Next j Next i
End Sub程序运行时，单击命令按钮后显示的结果是：____ ____________。 五、程序填空题（请正确填充下面的VB程序，使其完成所要求的功能。每空3分，共30分）
1．下面事件过程的功能是：输出100 以内个位数为8 且能被３整除的所有数，在横线上填上适当内容。
Private Sub Command1_Click() Dim i%, a%
For i = 0 To ____ _（1）___________ a = i * 10 + 8
If ____ （2） ____________Then Print a Next I End Sub
2．窗体上有一个名称为Combo1的组合框， 其初始内容为空，有一个名称为Command1、标题为“添加项目”的命令按钮。程序运行后，如果单击命令按钮，会将给定数组中的项目添加到组合框中，如图所示。请填空。