在VB中，把数学表达式πr²改写成VB表达式，下列选项中正确的是( )。

A．πr2

B．πrr

C．3.14r2

D．3.14*r*r

退出当前For循环的代码为（   ）

A．end

B．exit

C．sub

D．exit for

小陈申请了一个网银账号，登录网银账号时，要输入密码，一般情况下，如果密码输入的错误次数超过3次，那么当日网银账号将被锁定，次日自动解锁。下图是登陆网银的流程图，小陈不小心输入密码错误了2次，第3次才正确，那么她的操作流程应该是：（ ）

A．①②③①②③①②③④⑤

B．①②③①②③④⑤

C．①②③④⑤

D．①②③④⑤⑥

将表达式8=9的结果赋给变量x的是（    ）

A．x=8:x=9	B．x=8=9
C．8=9=x	D．x=8 And x=9

x是大于0小于45的数，用VB表达式表示正确的是（    ）

A．0<=x<45	B．0<=x<=45
C．0<x and x<45	D．0<=x and x<=45

   现要求编写VB程序（界面如图所示），实现下列功能：计算一个大写字母在26个字母中的位次。程序运行时，在文本框Text1中输入一个大写英文字母，单击“计算”按钮Command1，在标签Label2上输出其在26个字母中的位次。

（1）在进行应用程序界面设计时，需要添加“计算”按钮，可使用如下左图所示的“控件工具箱”中的________（填写相应编号），并在右图所示的“属性窗口”中，将________属性值设置为“计算”。
   
（2）该程序的源代码如下，请根据题意将代码中划线处补充完整，使程序能正常运行。
Private Sub Command1_Click()
Dim ch As String, pos As Integer
__________ = Text1.Text
pos = Asc(ch) – 64
Label2.Caption = "第" +______________ + "个字母"
End Sub

编写“因子分解”程序，实现如下功能：在文本框 Text1 中输入一个大于 1 的正整数，单击“求因子” 按钮 Command1，在列表框 List1 中显示该数的所有因子，以及所有因子之和。程序运行界面如图所示。

（1）代码“Private  Sub Command1Click()”中的 Command1Click 是________。
（单选，填字母：

A．对象名

B．事件名

C．事件处理过程名）

（2）实现上述功能的 VB程序如下，请在划线处填入合适的代码。
Private Sub Command1Click()
Dim sum As Integer
Dim n As Integer, i As Integer
n = Val(Text1.Text)
List1.Clear
sum = 1
List1.AddItem Str(sum)
For i = 2 To Int(Sqr(n))
If ①________Then
sum = sum + i
List1.AddItem Str(i)
If i <> n / i Then
sum = ②_____ 
List1.AddItem Str(n / i)
End If
End If
Next i
List1.AddItem Str(n) + "的所有因子之和是" + Str(sum)
End Sub
（3）运行该程序，在文本框中输入 9，单击“求因子”按钮后，所有因子之和是________。

有如下 Visual Basic 程序段：
x = 10
For i=1 to 10 step 3

x=x+i

Next  i 该程序段运行后, 变量 x 的值为（）。

A．14

B．20

C．26

D．32

设x=4,y=8,z=7,表达式x>z or z<x的值是(    )。

A．1

B．-1

C．true

D．false

长整型数据的存储空间是（   ）。

A．2个字节

B．4个字节

C．8个字节

D．16个字节