某对分査找算法的VB程序段如下：
i=" 1" :  j =9  :  n ="0"
key="Val(" Textl.Text)
Do While i <= jZXXK
m="(i" + j) \ 2
If  key = d(m)  Then
Exit Do

j=" m" - 1
Else
i=m+1
End If
Loop
方框中的正确代码应为

A．End If	B．If key < d(m) Then
C．ElseIf key < d(m) Then	D．If key > d(m) Then

在窗体上画一个命令按钮，其Name属性为Command1，然后编写如下代码：
Option Base 1
Private Sub Command1Click
Dim a(4,4)
For i = 1 To 3
For j = 1 To 3
a(i,j)=(i-1)*3+j
Next j
Next i
PRINT   A（3，1）
End Sub
程序运行后，单击命令按钮，其输出结果为.

A．6

B．7

C．8

D．9

（加试题）有如下VB程序段：
For i = 5 To 4 Step -1
k = i
For j = 6 - i To 1 Step -1
If a(j) < a(k) Then k = j
Next j
If i <> k Then
t = a(i): a(i) = a(k): a(k) = t
End If
Next i
数组元素a(1)到a(5)的值依次为“41，66，70，83，31”，经过该程序段“加工”后，数组元素a(1)到a(5)的值依次为( ）

A．31，41，66，83，70	B．83，70，66，41，31
C．83，66，70，41，31	D．31，41，66，70，83

若已知当前的人均GDP水平和GDP年增长率，可以计算达到某个GDP水平所需年份。在文本框Text1、Text2、Text3中分别输入人均GDP、年增长率和达到的GDP水平，单击计算按钮Command1，在文本框Text4中输出所需年数。程序运行界面如下：

(1)在设计程序界面时，使应使用图b所示“控件工具箱”中的________(填写相应编号)添加“计算”按钮。
(2)实现上述功能的VB程序如下，请在划线处填入合适的代码。
Private Sub Command1_Click()
Dim gdp As Single，ddgdp As Single，zc As Single，y As Integer
gdp＝Val(Text1.Text)
zc＝Val(Text2.Text)
ddgdp＝Val(Text3.Text)
y＝0
Do While ____①____
　　  ____②____
gdp＝gdp*(1＋zc)
Loop
Text4.Text＝Str(y)
End Sub
划线处代码为①____________________________________________________
②________________________________________________________________

Sub test16()
X = 9
For i =" 2" To 51 Step 3
If (X / 2) >=" i" Then X =" X" + 1
Next i
For i =" 2" To -2 Step 3
If (X / 2) >=" i" Then X =" X" + 1
Next i
MsgBox (X+i)
End Sub
该程序的运行结果是（   ） 

A．64

B．13

C．61

D．62