在VB中，下列程序段执行后，语句s=s+i重复执行的次数是  (   ) 
s=1
For  i=1 To 10 Step 3
s=s+i
Next i
Print s

A．3次

B．4次

C．5次

D．10次

（加试题）有如下VB程序段：
s = "7218634594" ：n = Len(s)
t = 0
For i = 1 To n - 1
a(i) = Val(Mid(s, i, 2))
Next i
For i = 1 To n - 2 Step 2
k = i
For j = i + 2 To n - 1 Step 2
If a(j) < a(k) Then k = j
Next j
If k <> i Then
temp = a(i): a(i) = a(k): a(k) = temp: t = t + 1
End If
Next i
Text1.Text = Str(t)
该程序段运行后，文本框Text1中显示的内容是

A．1

B．2

C．3

D．4

小秦用VB编写十进制数自动转换成二进制数的程序，运行界面如下图，运行代码如下：

Private Sub Command1_Click()
Dim a, i, n As Integer,s as string
n = Val(Text1.Text)
Do While n > 0
①
②
③
Loop
Text2.Text = s
End Sub
缺少部分的代码应填（    ）。

A．①a = n Mod 2    ②n = n \ 2 ③ s = Str(a) + s

B．①n = n \ 2 ②a = n Mod 2  ③ s = Str(a) + s

C．①a = n Mod 2    ②n = n \ 2 ③ s = s +Str(a)

D．①n = n \ 2 ②a = n Mod 2  ③  s = s +Str(a)

“某商场的店庆促销活动之一：店庆日购物满500元可在5折优惠后再减100元，否则只打5折”。用算法描述这一问题，可采用的算法结构是（   ）

A．顺序结构

B．选择结构

C．循环结构

D．树形结构

某VB程序代码如下：
Dim n As Integer
Dim s As String
n = 73
s = ""
Do While n > 0
s = Str(n Mod 8) + s
n = n \ 8
Loop
执行该程序段后，变量s的值是 （ ）

A．"121"

B．121

C．"111"

D．111