（加试题）王老师在使用 VB 程序要实现 n! 的功能。
Private Sub Command1_Click()
Dim p As Integer
Dim sum As Long
　p = Val(Text1.Text)
　sum = fx(p)
　Text2.Text = CStr(sum)
End Sub
Function fx(x As Integer) As Long
　If x = 1 Then
　　  fx = 1
　Else
　　  fx =____________________
　End If
End Function
要该程序实现此功能，横线处的代码为（　　）

A．x(x)*(x-1)

B．fx(x)*x

C．fx(x-1)*x

D．fx(x-1)*(x-1)

对称字符串从左读到右和从右读到左完全一样，如“1221”“12321”。编写VB程序，判断输入字符串是否对称，程序运行界面如图a所示，在文本框Text1中输入字符串，单击Command1按钮，在标签Label2上显示判断结果。

图a

图b
（1）实现上述功能的VB程序如下，请在画线处填入合适的代码。
Private Sub Command1_Click()
Dim s As String, c1 As String, c2 As Integer
Dim n As Integer, i As Integer
Dim f As Boolean
s = Text1.Text
n = Len(s)
f = True
For i = 1 To n \ 2
c1 =  _______①______
c2 = Mid(s, n - i + 1, 1)
If c1 <> c2 Then
f = False
Exit For
End If
Next i
If  ②  Then
Label2.Caption = "对称"
Else
Label2.Caption = "不对称"
End If
End Sub
划线处代码应为
①________________
②________________
（2）运行该程序，在文本框中输入aba，单击“判断”按钮后，出现图b所示错误提示，引起该错误的原因是________________（单选，填字母：

A．变量s的数据类型错误；

B．变量c2的数据类型错误；

C．变量f的数据类型错误）。

FOR循环体的执行次数由（_______）,（_______）和（________）决定.

有一个VB程序，其程序界面中有一个按钮Command1及一个文本框Text1，并且其程序代码如下：

当点击Command1后，Text1中将显示(  )

A．3	B．4
C．5	D．6

.有如下VB程序段：
x=-3
Do While x<0
x=x+2
Loop
该程序段运行后，变量x的值是：

A．-3

B．-1

C．1

D．3