有如下VB程序段:
Dim a(1 To 5)  As  Integer
Pos=-1
i=1
Do While i<=10
If  i Mod 2=0  Then  a(i)=i*2  Else  a(i)=i
i=i+1
Loop
i=10
Do While  i>=1
If  a(i)=12  Then  Pos=i
i=i-1
Loop
该程序段运行后,变量Pos值是(  )

A．1

B．2

C．6

D．10

有如下Visual Basic程序段：
s=0
n=1
for i="4" to 1 step -1
n=n*i
s=s+a
next i
问：该程序段运行后，
（1）共循环___________次。
（2）变量s的值是___________。

在VB中，下列程序段执行后，语句s=s+2执行的次数是（  ）
s=0
For i=1 To 3

s=s+2

Next i
Print s

A．1次

B．2次

C．3次

D．4次

现要求编写VB程序实现如下功能：在文本框Text1中输入正整数n（n为奇数），单击“生成”按钮后，在文本框Text2中会显示一个有规律的对称数字串，形成为“1 3 ...  n-2  n  n-2 ...3  1”。例如n=9时，显示的数字串为“1 3 5 7 9 7 5 3 1”。
 
（1）应用程序界面设计时，为添加按钮，就使用如左图所示的“控件工具箱”中_______（填写数字标号）；为将按钮上的字设置为“生成”，应在对应的属性窗口中______属性值修改为“生成”，根据代码可知，命令按钮“生成”的对象名是________。
（2）实现上述功能的VB程序如下。请在划线处填入合适的代码。
Private Sub Cmd1_Click()
Dim n As Integer,i As Integer,s As string
________________________
S=“”
For i=1 To n
If i<=n\2+1 Then

Else
S=s+ _______________
End if
Next i
Text2.Text=s
End Sub
(3)当n=9时，在实现程序功能的情况下，如果将程序中加框处的代码换成“s=str(2*i-1)+s”,单击“生成”按钮，其输出结果为___________________。

在窗体上画一个命令按钮，其Name属性为Command1，然后编写如下代码：
Option Base 1
Private Sub Command1Click
Dim a(4,4)
For i = 1 To 3
For j = 1 To 3
a(i,j)=(i-1)*3+j
Next j
Next i
PRINT   A（3，1）
End Sub
程序运行后，单击命令按钮，其输出结果为.

A．6

B．7

C．8

D．9