某VB程序在调试中弹出以下错误窗口，产生该错误的可能原因是（   ）

A．该VB程序代码中缺少Next

B．该VB程序窗体界面中，缺少某控件

C．该VB程序代码中，某个常量或变量没有声明

D．该VB程序设计软件没有正确安装

（加试题）在Excel中可采用双关键字排序，即先按主关键字排序，如主关键字相同再按次要关键字排序。小王学习了冒泡排序后，编写了一个VB程序模拟该排序过程。功能如下：在列表框 list1 中显示排序前数据（存储在数组 a、b 中），单击“排序”按钮 Command1 后，按主关键字数组 a 升序和次要关键字数组 b 升序排序，排序后的数据在列表框 list2 中显示。程序运行界面如图所示。
实现上述功能的 VB 程序如下，但加框处代码有错，请改正。

Const n = 10
Dim a(1 To n) As Integer,b(1 To n) As Integer
Private Sub Form_Load()
'各产生 10 个随机整数存数组 a、b，并在列表框 list1 中显示，代码略。
End Sub
Private Sub command1_Click()
Dim i As Integer, j As Integer
i = 1
Do While i <= n - 1
   ① 
Do While j >= i + 1
If a(j) < a(j - 1) Then
temp = a(j): a(j) = a(j - 1): a(j - 1) = temp
temp = b(j): b(j) = b(j - 1): b(j - 1) = temp
②
temp = a(j): a(j) = a(j - 1): a(j - 1) = temp
temp = b(j): b(j) = b(j - 1): b(j - 1) = temp
End If
j = j - 1  
Loop
i = i +1
Loop
For i = 1 To n
List2.AddItem Str(a(i)) + "  " + str(b(i))
Next i
End Sub
处代码改为______________________________________________ 
处代码改为______________________________________________

VB开发的应用程序的两个特征是“对象”和“事件驱动； （   ）

在日常生活中，我们常常会碰到各种各样的问题，以下描述中最适合我们用计算机编程方法来处理的是（ ）。

A．去新华书店买书

B．计算某个同学期中考试各科成绩总分

C．计算10000以内的奇数平方和

D．在因特网上查找自己喜欢的歌曲

有如下VB程序段：
For i =" 1" To 6
a（i） =" Int（Rnd" * 10） + 1
Next i
For i =" 1" To 5
If i Mod 2 =" 1" And a（i） > a（i + 1） Then
t =" a（i）" ： a（i） =" a（i" + 1） ^： a（i + 1） = t
Else
a（i） =" a（i）" + 1
End If
Next i
执行该程序段后，a（l）~a（6）各元素可能的值是

A．11，11，7，9，3，9	B．6，2，8，10，5，9
C．6，9，3，7，8，12	D．3，9，0，8，2，7