下列为部分VB程序语句代码：(    )
s=32
For i="1" To 10 Step
s=s/2
Next i
上述程序语句执行结束后，s的值为2，则循环语句的步长（划横线处）应填(    )

A．1

B．2

C．3

D．4

   编写VB程序，实现如下功能：在文本框Txt1中输入字符串，如“12321”、“abba”，点击Com1按钮，判断输入的字符串是否对称，即从左读到右与从右读到左完全一样，并在标签lab2上显示判断结果。

(1）   在程序代码中，第一行语句“Private Sub Com1_Click( )”中的Com1_Click( )是_____________(填字母：

A．对象名 /

B．事件名 /

C．事件处理过程名 /

D．方法名）

(2）为实现上述功能，请在划线处填入合适的代码或语句。

Private Sub Com1_Click()
Dim s As String, c1 As String, c2 As String
Dim n As Integer, i As Integer
Dim f As ①____________.
s = Txt1.Text
n = Len(s)
f = True
For i = 1 To n \ 2
c1 = Mid(s, i, 1)

②___________.

  If c1 <> c2 Then
③___________.
Exit For     '退出For循环
End If
Next i
If f = True Then
Lab2.Caption = "对称"
Else
Lab2.Caption = "不对称"
End If
End Sub

编写VB程序，实现如下功能：在文本框Text1、Text2中分别输入一个正整数，单击“计算累加和”按钮（Command1），在标签Label3中显示起始值和结束值之间所有奇数的累加和，界面如1图所示：
 
1图    2图
（1）在设计程序界面时，使用“控件工具箱”中（第11题-2图）的 （填编号）添加命令按钮，要使命令按钮Command1上显示“计算累加和”，应修改命令按钮的
属性值。
（2）为实现上述功能，请在划线处填入合适代码。
Private Sub Command1_Click()
Dim x1 As Integer,x2 As Integer,n As Integer
Dim sum As Long
x1=Val(Text1.Text)
x2=Val(Text2.Text)
sum=0
If  x1<x2  Then n="1" Else ①
For i=" x1" To x2 Step n
If   ②  Then
sum=sum+i
    ③
Next i
Label3.Caption=“从”& x1 & “到”& x2& “之间所有奇数的累加和=”&Str(sum)
End Sub

编写VB程序，要求实现功能是：在文本框Text1中输入一个a的分数值，单击“查询”按钮Command1，在文本框Text2输出等级。界面如图1所示：

1．在设计界面时，为使窗体的标题如图1显示，应在图2所示的属性窗口中设置Form1的________属性。
2.有如下Visual Basic程序，请根据题意将程序补充完整：
Private Sub Command1_Click()
a＝________
If a＞＝90 Then
Text2.Text＝“优秀”
ElseIf a＞＝80 Then
Text2.Text＝“良好”
ElseIf a＞＝70 Then
Text2.Text＝“中等”
ElseIf a＞＝60 Then
Text2.Text＝“及格”
Else
Text2.Text＝“不及格”
________
End Sub

TEXT1.TEXT=C和C=" TEXT1.TEXT" 都没有语法错误；（   ）