编写“提取数字”程序，实现如下功能：在文本框Text1中输入文本信息，点击“提取”按钮Command1，将文本信息中的数字以“，”间隔输出到文本框Text2中。程序运行界面如图所示。

（1）观察界面，程序中未使用到的控件是_____（填字母：

A．/

B．/

C．/

D．  ）

（2）根据题意，请将划线处代码补充完整。

Private Sub Command1_Click()

  Dim zf As String, tmp As String
Dim s As String, i As Integer, ch As String
__________________
tmp = ""
s = ""
For i = 1 To Len(zf)
ch = Mid(zf, i, 1)
If ch >= "0" And ch <= "9" Then
_______________
ElseIf tmp <> "" Then
s = s + tmp + ,
tmp = ""
End If
Next i

Text2.Text = s

End Sub

（3）当输入的文本信息如图所示，若删除加框代码，则文本框Text2中显示的内容为______。

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

1图
(1)在进行应用程序界面设计时，需要添加“计算”按钮，可使用如第2图所示的“控件工具箱”中的 (填写相应编号)，并在如第12题－3图所示的“属性窗口”中，将 属性值设置为“计算”。

(2)该程序的源代码如下，请根据题意将代码补充完整，使程序能正常运行。
Private Sub Command1_Click()
Dim ch As String, pos As Integer
 （3） ＝Text1.Text
pos＝Asc(ch) – 64
Label2.   （4）  ＝”第”＋Str(pos)＋”个字母”
End Sub

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

A．cmd_1

B．CommandButtom

C．Caption

D．lable

在ＶB中，用来描述对象的外部特征称为对象的

A．事件

B．方法

C．属性

D．驱动

MSGBOX    “这”，，“那”弹出的对话框中，其标题是（   ）

A．这

B．那

C．无

D．出错