该流程图描述的是求实数a绝对值的算法。

在流程图的空白处应填入_____________。

（加试）数组a存放n个学生的学号及成绩，a（2*i-1）存放第i个学生的学号，a（2*i）存放第i个学生的成绩，且成绩按降序排列（i=1,2,……n）。下列VB程序功能为:文本框Text1中输入成绩key，查找该成绩对应学生的学号，在文本框Tex2中显示。
Key = Val（Text1. Text）
i=1:j=( ① )
flag =False
Do While I <=j And Not flag
m=(i+j)\2
If key =a（2*m）Then
Flag = True
Elseif  ( ②  )  Then
j=m-1
Else
i=m+1
End If
Loop
If flag Then Text2.Text=Str（ ③ ） Else Text2.Text=“未找到！”
上述程序段3各方框处的代码分别为

A．（1）2*n （2）key>a(2*m) （3）a(2*m+1）

B．（1）2*n  （2）key<a(2*m)  （3）a(2*m+1)

C．（1）n   （2）key>a（2*m） （3）a(2*m-1)

D．（1）n  （2）key <a(2*m)    （3） a(2*m-1)

解决上问题所用的算法是:（    ）

A．枚举法

B．解析法

C．顺序查找

D．选择法

下列VB程序运行时，单击命令按钮Command1后，文本框显示的内容是
Private Sub Command1_Click()
a = 2
b = 2
Do While a <= 4
a =" a" * b
b =" a" * b
Loop
Text1.Text = Str(a)
Text2.Text = Str(b)
End Sub
Text1中显示 , Text2中显示 。

小李编写了一个 VB 程序，读取某数据库中的数据，数据表打开后界面及部分VB代码如下：
Dim conn As New ADODB.Connection
Dim rs As New ADODB.Recordset
Dim a(1 to 1000) as string,strconn as string
strconn="provider=Microsoft.AC

A．OLEDB.12.0;data source ="+ App.Path+"\score.accdb" conn.ConnectionString =strconn Conn.Open Set rs.ActiveConnection = conn rs.Open  "Select *  from  stuinfo" n=0 Do    While Not rs.EOF n=n+1 a(n)=rs.fields(1) rs.MoveNext Loop rs.Close conn.Colse 下列对于以上代码的理解正确的有    （ ） ① 连接的数据库文件名是“score.accdb” ② “ConnectionString“是 conn 对象的属性值 ③ 查询的数据表名称是“stuinfo” ④ 程序运行后，a(1)=”101” ⑤ 程序运行后，读取的记录总数共n条
B．①②③ B.①③④	C．①③⑤	D．②④⑤