有如下一段VB程序。
Private Sub Command1_Click()
Dim y As Long
Text1.Text = ""
y = f(3)
Label1.Caption = Str(y)
End Sub
Function f(n As Integer) As Long
Text1.Text =" Text1.Text" + Str(n)
If n <=" 1" Then
f = 1
Else
f =" f(n" - 1) + 2
End If
End Function
程序运行时，单击命令按钮Command1后，文本框Text1中显示的内容是（   ）

A．1

B．3

C．123

D．321

下列选项中，与语句“”功能相同的是（   ）

A．

B．

C．

D．

小明设计了如下所示累乘器程序，以完成式子：1×2×3×4×5×6的累乘计算。
Private Sub form_load()
Dim k As Long, i As Integer 
k = 0 ……… ①
For i =" 1" To 6 
k =" k" * i   ……… ② 
Next i 
MsgBox Str(k)
End Sub 
为了完成小明的计算，程序中标有①、②的两处语句，哪个语句应作相应的修改，修改后其正确的语句为（写出标号和正确的语句）_____________。

在ＶＢ中，有如下程序段，该程序段执行后，变量x的值是
x=0
for  i=1  to  5
x=x+i-1
next i

A．0

B．5

C．15

D．10

有如下VB程序段：
For i＝1To5
a(i)＝Int(Rnd*20)＋1
Next i
For i＝2 To 5
If i Mod 2＝1 And a(i－1)<a(i)Then
t＝a(i)：a(i)＝a(i－1)：a(i－1)＝t
Else
a(i)＝a(i)－1
End If
Next i
执行该程序段后，a(1)~a(5)各元素不可能的值是(    )

A．7  3  0  19  0	B．18  16  1  9  2
C．20  17  8  19  15	D．19  0  7  8  4