在VB中，若x=5，y=2，执行语句x=x+y : y=x-y : x=x-y后，x、y的值分别是 (    )

A．5、2

B．5、5

C．2、5

D．2、2

有一属于顺序结构的流程图，它不需要以下流程图中的哪个符号（   ）

A. B.     C.    D.

编写VB程序，界面设计如图所示，使其具有下列功能：在文本框Text1中输入一个小于20的正整数ｎ，单击“计算”按钮Command1，计算斐波那契数列中第ｎ项的值，并在标签Label2中输出结果；若输入错误，则在标签Label2中显示相应的提示信息。（斐波那契数列是指这样的数列：1，1，2，3，5，8，13…。即：第1项和第2项的值均为1，从第3项开始，每一项的值是它前面两项之和）

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

A．对象名／

B．属性名／

C．属性值／

D．事件名）

（2）为实现上述功能，请在划线处填入合适的代码。
Private Sub Command1_Click()
Dim n As Long, k As Integer
Dim f1 As Long, f2 As Long, f As Long
_______①_________ =Val(Text1.Text)
If n >=" 20" Or n <=" 0" Then
Label2.Caption = "输入的数据有误"
Else:Z+xx+k.Com
If n <=" 2" Then ' 第1，2个元素的值都为1
f = 1
Else
f1 = 1
f2 = 1
For k =" 3" To m
f =" f1" + f2
f1 = f2
f2 = f
Nextk
End If
Label2.Caption = "斐波那契数列第" + Str(n) + "项的值为" +    ②
End If
End Sub
（3）若在文本框Text1.Text输入21，则标签Label2显示的内容为 。

读下面VB程序段，
Dim j  As Integer, k  As Integer
List Clear
For k =" 1" To 100
j = Int(Sqr(k))
If j * j =" k" Then list1.AddItem Str(k)
Next k
分析程序功能，该程序的功能是（ ）

A．输出1到100以内的所有的质数

B．输出1到100以内的所有的奇数

C．输出1到100以内的所有的偶数

D．输出1到100以内所有的完全平方数

有一个对象属性面板如图所示，该对象名为（   ）

A．cmd_1

B．CommandButtom

C．Caption

D．lable