有如下一段VB程序:
s=0
For i=1  to  5   step  -2
s=s+i
Next i
执行上述代码后，下列说法正确的是（   ）

A．该循环执行了3次	B．该循环是无限循环
C．执行该循环后，s,i的值分别为0、1	D．循环体s=s+i仅被执行了1次

用VB编写“拆红包”程序，界面如图所示。在Text1中输入红包金额（元），在Text2中输入人数，点击“Command1”命令按钮，在列表框List1中显示分到的红包情况。

 

（1）把命令按钮Command1上显示的文字改成“拆红包”，应修改Command1按钮的__________属性。
（2）实现上述功能的VB程序如下，请在划线处填入合适的代码。
Private Sub Command1_Click()

Dim i As Integer

Dim num As Integer  '存储红包的个数

Dim money As Single '存储红包的剩余金额

Dim k As Single '存储每次分到的红包金额

money = Val(Text1.Text)

num = Val(Text2.Text)

For i = ①________ To 1 Step -1

If i = 1 Then
k = Int(money * 100) / 100   '保留两位小数
Else
k = Int(Rnd() * money / i * 100) / 100
End If
money = ②________
List1.AddItem Str(k)   
Next i
End Sub
（3）执行该程序，（选填：有 / 没有）________可能产生金额为0元的红包。

某算法的部分流程图如图所示，执行该部分后，变量的值an为

A．3

B．5

C．7

D．8

看下面流程图得结果，变量s和i的值分别是(   )。

A．5 和 3

B．6 和 3

C．8 和 6

D．6 和 6

（加试题）有如下VB程序段：
i = 1
Do While i<= 3

min = i

j = i + 1

Do While j <= 6

If a(j) < a(min) Then min = j

j = j + 1

Loop

If i<>min Then tmp = a(i): a(i) = a(min): a(min) = tmp

i = i + 1

Loop
数组元素 a(1)到 a(6)的值依次为7、8、3、9、6、2，则该程序段运行后，数组元素a(1)到 a(6)的值依次是

A．9,8,7,3,6,2

B．2,3,6,7,8,9

C．2,3,6,9,8,7

D．9,8,7,6,3,2