（加试题）某VB程序段如下:
For m=1 To 9
　　s=m
　　For n=m+1 To 10
　　　　If　　　　Then s=n 
　　Next n
　　If s<>m Then pp=d(s):d(s)=d(m):d(m)=pp
Next m
现对数组元素d(1)到d(10)进行从大到小排序,则程序中划线处的语句是( 　　)

A．d(n)>d(s)

B．d(n)>d(m)

C．d(n)<d(m)

D．d(n)<d(s)

（加试题）以下 VB 程序段用插入排序的方法实现 10 个数据升序排序。
Dim tmp As Integer
Dim a(1 To 10) As Integer
Private Sub Form_Load
'随机生成 10 个不重复的数存入数组 a,代码略
End Sub
Private Sub Command1_Click
For i = 2 To 10
If a(i) < a(i- 1) Then tmp = a(i)
For j = ①     To 1 Step -1   '依次后移
If tmp > a(j) Then Exit For
②
Next j
③ '插入数据
End If
Next i End Sub 要实现上述功能，方框①②③中的语句分别是（   ）

A．i-1a(j+1)=a(j)a(j+1)=tmp

B．i-1a(j+1)=a(j)a(j)=tmp

C．10a(j)=a(j+1)a(j)=tmp

D．10a(j)=a(j+1)a(j+1)=tmp

（加试题）有如下程序段：
k = 0 : First = 1 : Last = 5 : Flag = True
Do While Flag
k = k + 1
p = False : Flag = False
For j = First To Last
If a(j) > a(j + 1) Then
t = a(j): a(j) = a(j + 1): a(j + 1) = t
Last = j : Flag = True
If p = False Then
First = j ：p = True
End If
End If
Next j
If First <> 1 Then First = First - 1
Last = Last - 1
Loop
数组元素a(1)到a(6)的值依次为“3,6,8,5,7,9”，经过该程序段“加工”后，下列说法正确的是( )

A．此过程中数据共交换了3次	B．此过程中该数组的数据共比较了7次
C．变量k的值为2	D．数组元素a(1)到a(6)的数未排成有序

下列 VB 程序段的功能为：对数组 a 中的 n 个元素进行排序，生成左右交替上升的数据系列。如排序前 a 中元素依次为：21，33，56，11，44，60，程序运行后  a 中元素依次为：11，33，56，60，44，21。
For i=1 To    ①     
k=i
For j=i+1 To n-i+1
If a(k)>a(j) Then k=   ②     
Next j
If k<>i Then t=a(k):a(k)=a(i):a(i)=t  For j=    ③     
If a(j)<a(j+1) Then    a(j)=a(j)+a(j+1) : a(j+1)=a(j)-a(j+1):a(j)=a(j)-a(j+1) Next j
Next i
上述程序段 3 个划线处的表达式分别为（   ）

A．①   n-1    ②    j+1    ③   i To n-i+1

B．①   n-1    ②    j+1    ③   i To n-i

C．①   n\2    ②    j    ③   i+1 To n-i

D．①   n\2    ②    j    ③   i+1 To n-i+1

下列VB程序段的功能为：生成n个不重复的随机整数，保存在数组a中，并升序排序。
Const n = 6
Dim a(1 To n) As Integer, f(1 To 10) As Boolean
Dim tmp As Integer, i As Integer, j As Integer, t As Integer
’f数组各元素的初值置为False，代码略
For i = 1 To    (1)  
t = Int(1 + Rnd * 10)
If Not f(t) Then
a(i) = t : f(t) = True
For j = (2)   
If a(j) < a(j - 1) Then
tmp = a(j): a(j) = a(j - 1): a(j - 1) = tmp
End If
Next j
Else
(3)  
End If
Next i
上述程序段3个方框处的表达式分别为

A．（1）n - 1 （2）2 to i    （3）i = i - 1

B．（1）n （2）i to 2 Step -1    （3）i = i - 1

C．（1）n - 1    （2）2 to i    （3）t = Int(1 + Rnd * 10)

D．（1）n （2）i to 2 Step -1    （3）t = Int(1 + Rnd * 10)