7位学生的身高(单位:cm)从高到低依次为:178,177,175,172,170,165,162｡用对分查找法找到178 的过程中,依次被访问到的数据是(  )

A．178

B．172,175,178

C．172,177,178

D．172,175,177,178

关于对分查找和顺序查找算法的叙述，正确的是（ ）。

A．顺序查找需要排序，效率低；对分查找不需要排序，效率高。

B．顺序查找不需要排序，效率低；对分查找需要排序，效率高。

C．顺序查找不需要排序，效率高；对分查找需要排序，效率低。

D．顺序查找需要排序，效率高；对分查找不需要排序，效率低。

小骆设计了一个程序，用来统计一段文字中句子的数量。规定以“。”或者“？”或者“！”结束的为句子。窗体界面和程序如下所示，请回答问题。

图1 图2
(1)应用程序界面设计时，用来输入文字的对象，使用了图2所示的“控件工具箱”中的 ________________(填写相应数字)，
(2)Private Sub Command1_Click()
Dim s As String, r As String, k As Integer
k ＝ 0
s＝Text1.Text
For i ＝ 1 To Len(s)
①
If r ＝"。" Or r ＝"！"  Or r ＝"？"  Then ②
Next i
Label1.Caption ＝"本段文字中含" + Str(k) + "句语句。"
End Sub
在程序划线处填写适当的表达式或语句，以实现程序功能。
程序中①划线处应填入____________________________。
程序中②划线处应填入____________________________。

（加试题）数字个数统计。编写VB程序，实现如下功能：在文本框Text1中输入仅由ASCII码字符组成的字符串（长度不超过100），单击“数字统计”按钮Command1，在列表框List1中输出字符串中包含的不同数字及其相应的个数，程序运行效果如下图所示。

（1）为方便调试，要让程序每次运行时文本框Text1中的初始内容为“ab12*{}78ab12()778ab34”，应修改文本框Text1的________属性。
（2）实现上述功能的VB程序如下，请在划线处填入合适代码。
Private sub command1_click()
Dim a(0 to 9) as integer   ’数组元素a(i)中存放数字i的个数
Dim s as string , ch as string
Dim t as integer
For i=0 to 9
a(i)=0
next i
s=text1.text
for i=1 to len(s)
①____________    
if ch>=”0”and ch<=”9” then
t= ②________
a(t)= a(t)+1
end if
next i
list1.clear
for i=1 to 9
if  a(i)<>0   then
list1.additem  ”数字：”+str(i)+ ”，共有”+ str(a(i))+ ”个”
end if
next i
end sub
（3）与上述程序中加框处代码运行效果等价的条件表达式可以是________。

把一个数组最开始的若干个元素搬到数组的末尾，我们称之为数组的旋转。输入一个递增排序的数组的一个旋转，输出旋转数组的最小元素。
数组元素a(1)至a(5)依次为5，22，28，42，55，在a(3)处分成两段，交换位置后为：

a(1)	a(2)	a(3)	a(4)	a(5)
28	42	55	5	22

 
旋转数组a的最小元素是5。
数组d(1)至d(5)依次为0，1，1，1，1，在d(5)处分成两段，交换位置后为：

d(1)	d(2)	d(3)	d(4)	d(5)
1	0	1	1	1

 
旋转数组d的最小元素是0。
小明依据查找算法思想，设计一个查找旋转数组d最小元素的程序，功能如下：运行程序时，利用“添加”按钮Command1和文本框Text1依次输入旋转数组d的值，在列表List1中显示旋转数组，单击“求解”按钮Command2，在标签Label2中显示旋转数组d最小元素值。运行效果图所示，实现该功能的的VB程序如下。

(1)要使程序运行时，文本框Text1无显示内容，下列方法不能实现该要求的是_______（单选，填字母：A.在Form_Load事件处理过程中添加语句“Text1.Text=""”/B.在Command1_Click事件处理过程中添加语句“Text1.Text=""”/C.设计程序界面时，在属性面板设置文本框Text1的Text属性值为空）
(2)程序代码中，加框处有错，请改正。
(3)程序代码中，将划线处代码补充完整。
(4)程序代码中，虚线框内自定义函数中主要采用的算法是__________(单选，填字母：A.冒泡排序/B.选择排序/C.顺序查找/

A．对分查找)。

Dim n As Integer
Dim d(1 To 100) As Integer '数组 d 存储待排序数据
Private Sub Command1_Click()
'按旋转数组规则将数据存入数组d中，代码略
End Sub
Private Sub Command2_Click()
Dim mid As Integer, L As Integer, R As Integer
L = 1: R = n
mid = L
Do While d(L) >= d(R)
If L=R Then'改错
mid = R
Exit Do
End If
mid = (L + R) \ 2
If d(L)=d(R) And d(mid)=d(R) Then
mid =______________    '填空
Exit Do
End If
If d(L) < d(mid) Then
L = mid

ElseIf d(mid) < d(R) Then

R = mid
End If
Loop
Label2.Caption = "最小值为" + Str(d(mid))
End Sub

End If
Next i
End Function