文本框没有(    )属性.

A．TEXT

B．LOCKED

C．CAPTION

D．PASSWORDCHAR

在Visual Basic中，某对象的属性窗口如下图所示：

该对象名是（   ）

A．Text1

B．Text_1

C．TextBox

D．Text

以下不属于流程图中标准的符号是（   ）

A．

B．

C．

D．

现要求编写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

某VB程序的事件过程代码如下： 
Private Sub Command1_Click() 
Dim a As Integer
Dim s As String
s = "data:"
a =" Int(Rnd" * 90)
s =" s" + a 
Text1.Text = Str(a)
End Sub
程序运行后，单击命令按钮Command1，弹出如第8题图所示的错误提示信息，产生此错误的语句是（   ）

A．s = "data:"

B．a =" Int(Rnd" * 90)

C．s =" s" + a

D．Text1.Text = Str(a)