有如下 V B 程序段：
Dim s(1 To 6) As String
Text1.Text = ""
For i =" 1" To 5
For j =" i" + 1 To 6
If s(i) + s(j) < s(j) + s(i) Then
t =" s(j):" s(j) =" s(i):" s(i) = t
End If
Next j
Next i
For i =" 1" To 6
Text1.Text =" Text1.Text" + s(i)
Next i
如果程序运行，一开始当数组元素s(1)到s(6)的值依次为“4”、“343”、“312”、“12”、“246”、“121”，运行该段代码后，文本框Text1中显示的内容为（ ）

A．434331224612121	B．434331224612112
C．343312246121124	D．121122463123434

有一种数字，正读倒读都一样，如：98789，倒读也是98789，这样的数被称为回文数。
（1）程序填空。下面的程序代码，用于寻找三位数中的所有回文数，并且每行输出5个回文数。请将程序补充完整。
Dim i As Integer,x As Integer, y As Integer, N As Integer
N = 0
For i =" 100" To ___①___
x =" i" \ 100
y =" i" Mod 10
If ___②___ Then
N =" N" + 1
If ___③___  Then
Print i
Else
Print I,
End If
End If
___④___
（2）上述程序中应用了哪几种程序结构？
（3）上述程序在寻找三位数中的所有回文数时，采用了什么算法？利用这种算法编写程序通常应用什么语句？

有一个程序段的功能是画一个圆。如果调用该程序段画50个圆，则适合采用的算法结构是

A．顺序结构

B．选择结构

C．循环结构

D．树型结构

数学老师布置了一道题目“求1*2*3*……*100”，如果让你用计算机编程的方法求解，我们应该选择的程序结构是

A．顺序结构

B．选择结构

C．循环结构

D．流程图

某算法的流程图如图所示: 执行完流程图后，变量S的值为（  ）

A．0

B．9

C．13

D．27

某同学编写了VB程序其功能和界面如下所示。在文本框(text1)中输入一段英文，点击“统计删除”按钮，在标签(Label3)中显示该语句中最长的单词(如有多个长度相同的单词则显示靠后的单词)，在标签(Label5)中显示该单词的字符长度，在标签(Label7)中显示删除该单词后的句子。

Private Sub Command1_Click()
Dim s As Integer，imax As Integer，pimax As Integer，t As Integer
Dim source As String
source＝Text1.Text
s＝Len(source)
imax＝1
pimax＝1
t＝0
For i＝1 To s
d＝____①____
If (d＞＝“a” And d＜＝“z”) Or (d＞＝“A” And d＜＝“Z”) Then
____②____
Else
If t＞＝imax Then
imax＝t
____③____
End If
t＝0
End If
Next i
Label3.Caption＝Mid(source，pimax，imax)
Label5.Caption＝imax
Label7.Caption＝____④____＋Mid(source，pimax＋imax，s－imax)
End Sub
①处程序代码为_________________________________________________。
②处程序代码为_________________________________________________。
③处程序代码为_________________________________________________。
④处程序代码为_________________________________________________。

某算法的流程图如图所示：

执行该算法后，“a←a＋1”共被执行的次数是(  )

A．0	B．1
C．4	D．5

如图所示的部分流程图中，“s←s＋i”被执行次数为(  )

A．0	B．1
C．32	D．33

如图是求某地出租车收费的流程图。当输入里程数a的值为4.2时，则p的值为(  )

A．8	B．16.4
C．18	D．16

用VB编写的函数bubble_sort是一个用冒泡方法实现排序的函数，其调用时需要三个参数：布尔类型参数sx来确定是升序还是降序，sx为True时为升序，否则为降序；整数型数组a()是待排序的数据，数据从a(1)开始存放；整数型参数n表示传入的数组长度，该函数的返回值也是一个整数型数组。所以调用此函数实现排序非常方便：
比如有一个整数型数组a(1 to 10)需要降序排序，可以直接这样调用：
a()＝bubble_sort(False，a()，10)
该函数VB代码如下：
Function bubble_sort(sx As Boolean，a() As Integer，n As Integer) As Integer()
Dim i，j，t As Integer
For i＝1 To n－1
For j＝____①____ Step－1
If ____②____ Then
If a(j)＜a(j－1) Then t＝a(j)：a(j)＝a(j－1)：a(j－1)＝t
Else
If a(j)＞a(j－1) Then t＝a(j)：a(j)＝a(j－1)：a(j－1)＝t
End If
Next j
Next i
bubble_sort＝a()
End Function
请将代码补充完整：
①___________________________________________。
②___________________________________________。