（加试题）数字个数统计。编写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）与上述程序中加框处代码运行效果等价的条件表达式可以是________。

（加试题）有1个升序排列的数组a(a(1)～a(n)，n≥3)，从左到右相邻两个元素的差值（后一个元素值减去前一个元素值）先由小到大、再由大到小，且相邻两个差值不相等，为了查找相邻两个元素的最大差值，小李编写的VB程序段如下：
i = 1 ：j = n
Do While i + 1 < j

m = (i + j) \ 2

If a(m + 1) - a(m) > a(m) - a(m - 1) Then

Else

End if

Loop
Label1.Caption="相邻两个元素的最大差值是" + Str(a(j) - a(i)) 
上述程序段两个方框处的语句分别为（   ）

A．① i = m ② j = m	B．① i = m ② j = m - 1
C．① i = m + 1 ② j = m – 1	D．① i = m + 1 ② j = m

有序（非降序）数组A有n个元素，用对分查找算法在数组A中查找key值所在的位置，如果有重复的元素，则显示最早出现该key值的位置。相应的VB程序段如下：
key = Val(Text1.Text)
i = 1: j = n
Do While i <= j
m = (i + j) \ 2
If a(m) > key Then
j = m - 1
ElseIf a(m) < key Then
i = m + 1
Else
If ① Then
j = m - 1
Else
Label2.Caption = Str(key) + "的起始位置是" + Str(m)
Exit Do
End If
End If
Loop
If i > j Then
Label2.Caption = "找不到" + Str(key)
End If
要使程序实现上述算法思想，则方框中的语句是

A．a(m - 1) = key

B．a(m) = key

C．m - 1 >= 0 And a(m - 1) = key

D．m - 1 >= 0 And a(m) = key

数组d中存放了一组数据如表所示，采用对分査找数组元素值86。第一次査找的数组元素是d4，第二组査找的数组元素是( )

d1	d2	d3	d4	d5	d6	d7
65	73	75	82	85	91	95

 

A．d2

B．d3

C．d5

D．d6

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

图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
在程序划线处填写适当的表达式或语句，以实现程序功能。
程序中①划线处应填入____________________________。
程序中②划线处应填入____________________________。